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Assembler und 
Maschinenspra¬ 
che: für viele ein 
unerhört reizvol¬ 
les Wort. Denn 
man verbindet 
mit Maschinen¬ 
sprache sowohl 
Schnelligkeit als 
auch Flexibilität. 

Wer einmal Assembler-Luft gerochen 
und seine ersten Programme geschrie¬ 
ben hat, kann sich nur noch schwer der 
Faszination entziehen. Es eröffnen sich 
Möglichkeiten, die von Basic aus nicht 
erreicht werden können. Dabei tun sich 
viele Leser noch schwer, über die 
ersten Schritte hinwegzukommen. Zu 
fremd scheinen ihnen die Befehle zu 
sein, zu tückisch die Fehler, die auftre- 
ten können. Mit Basic haben sie ange¬ 
fangen und es gibt, so sagen sie viel¬ 
leicht, eigentlich keinen Grund, umzu¬ 
steigen. Aber stimmt das wirklich? 

Schnelligkeit ist Trumpf 

Es gibt einige Gründe, weshalb nicht 
auf die Maschinensprache verzichtet 
werden kann: 

Ein wichtiges Argument ist die 
Schnelligkeit. Manche Programme kön¬ 
nen mehrere hundertmal schneller sein 
als entsprechende in Basic und erlau¬ 
ben erst dadurch deren sinnvolle Nut¬ 
zung. Stellen Sie sich nur einmal Hi- 
Eddi, Grafik 2000 oder Hypra-Ass in 
Basic vor. Allein der Gedanke daran 
macht schon müde. 

Doch es gibt noch mehr Argumente. 
Manche Probleme lassen sich in Basic 
überhaupt nicht lösen, zum Beispiel 
interruptgesteuerte Programme, die 
Programmierung von Druckertreiber 
und Floppy oder der Zugriff auf den Zei¬ 
chensatz des C 64. 

Neuer Kurs 

Viele Programmierer, die mit Basic 
angefangen haben, versuchen auch in 


Maschinenspra¬ 
che Fuß zu fas¬ 
sen. Deshalb 
haben wir für Sie 
den Assembler- 
Kurs »Assem¬ 
bler ist keine 
Alchimie« orga¬ 
nisiert, der im 
64'er, Ausgabe 
9/84 begann und in der Ausgabe 10/85 
endete. In diesem Sonderheft wird er 
noch einmal vollständig überarbeitet 
abgedruckt. Ein zweiter neuer Kurs 
schließt sich dem an. Er vermittelt an 
Hand von vielen Programmen und Bei¬ 
spielen, mit einer Menge Tips und 
Tricks, Programmiertechniken für 
Anfänger und Fortgeschrittene. Falls 
Sie noch keinen Assembler oder einen 
Maschinensprache-Monitor besitzen - 
wir drucken hier noch einmal einen 
kompletten, erweiterten »Werkzeug¬ 
satz« ab: Hypra-Ass, SMON mit allem 
drum und dran und einen zu Hypra-Ass 
kompatiblen Reassembler. Mit diesem 
Programmpaket sind Sie in der Lage, 
jede noch so kniffelige Aufgabe in 
Maschinensprache optimal zu lösen. 

Tips und Tricks für Anfänger und 
Fortgeschrittene 

Wir geben Ihnen viele Hinweise und 
Hilfen für den Einstieg und zeigen 
Ihnen, wie man mit einem Assembler 
arbeitet, was Makros sind und wie sie 
eingesetzt werden. 

Natürlich fehlen auch die Listings 
nicht, alle mit dokumentiertem Quell¬ 
code, damit Sie nachvollziehen können, 
wie bestimmte Probleme in Maschinen¬ 
sprache gelöst werden. 

Am Schluß dieses Sonderheftes 
haben wir noch einen Leckerbissen für 
Sie. Die wichtigsten Tabellen zusam¬ 
mengefaßt, die Sie sonst aus mehreren 
Heften und Büchern zusammensuchen 
müßten und zum Teil nirgends in dieser 
Form finden. (gk) 


Disketten und Kassettenservice 

Wer keine Zeit oder keine Lust hat, alle Programme selbst in mühevoller 
Kleinarbeit abzuschreiben, kann wieder auf den bewährten Disketten- und 
Kassettenservice zurückgreifen. Alle Programme, die mit dem Disketten¬ 
symbol H im Inhaltsverzeichnis gekennzeichnet sind, gibt's auf Diskette. 
Wenn sie mit dem Kassettensymbol Bl versehen sind, auch auf Kassette. 

Wichtiger Hinweis: 

Einige auf Kassette angebotenen Programme sind vom Autoren auf die 
Benutzung des Floppy-Laufwerks abgestimmt. Für den Einsatz mit der Data- 
sette müssen einige Programmteile von Ihnen selbst verändert werden. Wir 
sind gerne bereit, Informationen über entsprechende Anpassungen im 64’er 
zu veröffentlichen, beziehungsweise Kontakte zu vermitteln. Wir können 
jedoch leider nicht bei den einzelnen Anpassungen behilflich sein. 

Disketten: Bestellnummer L6 85 S8D / 29,90 Mark 
Kassetten: Bestellnummer L6 85 S8K / 19,90 Mark 
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Assembler ist 
keine Alchimie 

Den kompletten Assembler-Kurs in einem 
Stück wünschten sich viele 64’er-Leser. In 
diesem Sonderheft können wir diesen 
Wunsch realisieren. Der Kurs soll nicht 
unbedingt ein Buch über Maschinenspra¬ 
che ersetzen, er wird Ihnen jedoch helfen, 
diese Sprache leichter zu verstehen. 

V ermutlich hat es Ihnen auch schon ab und zu in den 
Fingern gejuckt, wenn Sie von Wunderdingen gelesen 
haben, die man per Maschinensprache mit dem 
Computer machen kann. Vielleicht haben Sie sogar schon 
mal nichtsahnend angefangen einzutippen, was Sie als 
Assemblerlisting sahen. Doch schon nach dem ersten »C000 
LDA # $00« und RETURN weigerte sich der Computer mit 
einem lapidaren »SYNTAX ERROR«. Wieso, werden Sie sich 
gefragt haben, das ist doch nun die Sprache unserer 
Maschine, nämlich Maschinensprache, was habe ich falsch 
gemacht? 

Dann sind Sie sicherlich mal auf diese merkwürdigen 
Basii, r:ogramme gestoßen, in denen ein langer Wurm von 
DATA-Zeilen mit einem kleinen FOR..NEXT.. POKE-Kopf 
vorne und einem SYS-Schwanz hinten enthalten ist, und die 
man Basic-Lader nennt. Sie haben fleißig Zahlen eingetippt - 
das Ganze hoffentlich sofort gespeichert-, vorschriftsmäßig 
mit dem SYS-Befehl gestartet und auf einen scheintoten 
Computer geschaut, der nur noch durch Aus- und Einschal¬ 
ten wiederzubeleben war. Wenn Sie dann nach langer Fehler¬ 
suche den irrtümlich eingetippten Punkt durch ein Komma 
ersetzt haben (oft finden Sie auch keinen Fehler, denn bei lan¬ 
gen DATA-Sequenzen schlägt der Druckfehlerteufel mit Vor¬ 
liebe zu), werden Sie sich gefragt haben, warum in aller Welt 
dieses kleine Mißgeschick den ganzen Computer abstürzen 
läßt. Sie merken vermutlich schon, daß mir das alles und noch 
mehr (worüber ich schamhaft schweige) passiert ist. Die Kon¬ 
sequenz war, daß ich losging, um ein schlaues Buch zu erwer¬ 
ben. Aber merkwürdig, damals tauchte der Begriff »Maschi¬ 
nensprache« in keinem Titel auf. Irgendwann begriff ich, daß 
Assembler und Maschinensprache irgend etwas miteinander 
zu tun haben. 

Aber da fing das ganze Elend erst richtig an: Da gab es 
6502-, Z80-, 8080-, 8085-, 6800-Assembler, da waren 
irgendwelche Schaltpläne, anscheinend, wie man wo was 
hinlötet- für mich als Nichtelektroniker eine Art moderner 
Kunst-, da war von CPU, Bussen, negativen Flanken, Zwei¬ 
phasentakten die Rede. 

Ich habe mich furchtbar geärgert über die Geheimsprache, 
die es dem Uneingeweihten verwehrt, etwas zu verstehen. 
Seither hat sich einiges verändert. Die Geheimnisse sind 
keine mehr und ich werde Ihnen in dieser Serie ohne ver¬ 
schlüsselte Sprache die magischen Zirkel der Assembler- 
Alchimisten offenbaren. Heute gibt es auch Bücher über 
»Maschinensprache auf dem Commodore 64« und es sei 
Ihnen angeraten, ruhig auch das eine oder andere durchzu¬ 
arbeiten. Sie werden allerdings feststellen, daß die meisten 
davon gerade dort aufhören, wo es anfängt spannend zu wer¬ 
den: bei der Benutzung von Routinen des Betriebssystems 
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und des Interpreters. Deswegen soll der Schwerpunkt dieses 
Artikels woanders liegen: 

Wir werden das notwendige Grundwissen über die Hard¬ 
ware nur ganz knapp behandeln, dann das Vokabular des 
65xx-Assemblers kennenlernen. Den Hauptteil des Artikels 
verbringen wir aber mit Dingen, über die es kaum Literatur 
gibt, nämlich wie man für eine Unzahl von Programmierauf¬ 
gaben nicht nochmal das Rad erfinden muß, weil es schon 
längst in unserem Computer existiert. 

Bevor wir loslegen, will ich Ihnen noch etwas Literatur 
empfehlen: 

a) Wenn wir über Speicheraufbau, das binäre und das hexa¬ 
dezimale Zahlensystem reden, sollten Sie die Serie »Reise 
durch das Wunderland der Grafik« gelesen haben, die in der 
64'er in den Folgen 1 und 2 (Ausgaben 4/84 und 5/84) diese 
Themen grundlegend behandelt hat. (Auch als Buch unter 
gleichnamigem Titel erschienen.) 

b) Als Nachschlagebuch sehr wertvoll ist das Buch von Raeto 
West: C64 Computer Handbuch. Hier finden Sie auch viele 
Tips und Tricks. 

c) Später wird Ihnen dieses Buch fast unentbehrlich Vorkom¬ 
men: R. Babel, M. Krause, A. Dripke: Systemhandbuch zum 
Commodore 64 (und VC 20), München 1983 

Weitere Literaturempfehlungen werde ich Ihnen von Fall zu 
Fall geben und Sie finden sie auch in der Bücherecke. Gerade 
zu unserem Computer erscheint fast jeden Monat ein neues 
Buch und es ist nicht einfach, die Spreu vom Weizen zu 
trennen. 

1. Einige Begriffsklärungen 


Zunächst einmal muß ich Sie enttäuschen: Ich glaube kaum, 
daß Sie mit Ihrem Computer je einmal in Maschinensprache 
verkehren werden! Maschinensprache, das ist die einzige, 
die der Computer direkt versteht, das sind vorhandene oder 
nicht vorhandene Stromimpulse oder Magnetisierungszu¬ 
stände, die bei unserem Computer durch 8-Bit-Binärzahlen 
auszudrücken sind. Was wir mit unserem Computer reden 
werden ist Assembler. Mit dem Computer sprechen soll hei¬ 
ßen: Mit dem Gehirn unseres Computers, dem Prozessor, oft 
auch CPU (von Central Processing Unit=Zentraler Arbeits¬ 
baustein) genannt, verkehren, also ihm Befehle zu geben. 
Solche CPUs werden bei verschiedenen Firmen hergestellt, 
sind daher unterschiedlich aufgebaut und auch unterschied¬ 
lich ansprechbar. Ein weit verbreiteter Prozessortyp ist der 
6502, der das Gehirn des C 64 und auch des VC 20 ist. 
Genau genommen ist das Gehirn des C 64 allerdings der 
6510, ein dem 6502 fast identischer Prozessor. Auf den klei¬ 
nen Unterschied werden wir noch zu sprechen kommen. 
Beide (6502 und 6510) sind in 6502-Assembler zu program¬ 
mieren und wenn wir diese Sprache sprechen, sind für uns 
alle 6502-Computer zugänglich: Commodore, Apple, Atari 
und einige andere. Nun wissen Sie aber immer noch nicht, 
was Assembler eigentlich ist. Das englische Wort »assemble« 
heißt auf deutsch etwa montieren, zusammenstellen. Es han¬ 
delt sich also um eine Programmiersprache und weil sie sehr 
eng am Computer orientiert ist, spricht man von einer 
»maschinenorientierten« Programmsprache im Gegensatz 
zu »problemorientierten« Programmsprachen wie Basic, Pas¬ 
cal, Cobol etc., die - so sollte es jedenfalls sein - auf jedem 
Computertyp gleich aussehen. 

Ein Assembler ist aber noch etwas anderes, nämlich ein 
Software-Instrument, das einen in Assembler geschriebenen 
Befehl in die Maschinensprache übersetzt. Man spricht vom 
Vorgang des Assemblierens. Das umgekehrte leistet ein 
Disassembler, welcher uns Maschinensprache durch Rück¬ 
übersetzung lesen hilft. Um die Verwirrung noch etwas zu 
steigern, sage ich Ihnen auch noch, was ein Monitor ist. In 



diesem Zusammenhang ist kein Bildschirmgerät damit 
gemeint, sondern ebenfalls ein Software-Instrument, das den 
Einblick in die Register und Speicher des Computers 
gewährt. 

Damit Sie nun den Überblick völlig verlieren, sei abschlie¬ 
ßend zu diesem Sprachenwirrwarr noch erzählt, daß 
Software-Pakete, die sowohl Assembler als auch Disassem¬ 
bler als auch Monitor enthalten und noch eine Menge anderer 
brauchbarer Dinge, oft als »Assembler« angeboten werden. 
Das ist ein alter Trick der Alchimisten, verschiedenen Dingen 
den gleichen Namen zu geben! 

2. Basic contra Assembler 


Um das Nachfolgende deutlich zu machen, schalten Sie bitte 
Ihren Computer an und tippen die beiden folgenden Pro¬ 
gramme ein, die beide genau dasselbe tun: Das obere Viertel 
unseres Bildschirmes mit dem Buchstaben A füllen (beim 
VC 20 ist es die obere Hälfte). Zunächst einmal in Basic: 

10 FOR 1 = 1024 + 255 TO 1024 STEP-1 
20 POKE I, 1:POKE 1+54272,14 
30 NEXTI 

Für den VC 20 (Grundversion und 3-KByte-Erweiterung) 
ist zu setzen: anstelle von 1024 jetzt 7680, statt 54272 jetzt 
30208 und statt 14 die 6. Wenn Sie mehr als die 6,5 KByte 
im VC 20 haben, dann setzen Sie statt 1024 jetzt 4096, statt 
54272 jetzt 34304 und ebenfalls statt 14 die 6. Das Pro¬ 
gramm braucht 55 Byte + 7 Byte für die Variable I, macht 
zusammen 62 Byte Speicherplatz. Es geht ganz schnell und 
wenn Sie es schaffen, können Sie ja mal mitstoppen, wie 
lange ee »on RUN bis READY braucht: zirka 4 Sekunden. 

Jetzt dasselbe in Assembler. Weil wir aber noch nicht 
soweit sind, erst mal als Basic-Lader, der uns das Programm 
in den Speicher bringt (wir kommen dazu gleich noch). 
Geben Sie also NEW ein und dann: 

10 FOR 1 = 7000 TO 7000 + 16 
20 READ A:POKE l,A:NEXT I :END 
30 DATA 160,255,162,14,169,1,153,255, 
3,138,153,255,215,136,208,244,96 

Beim VC 20 geben Sie bitte statt der 14 (Zeile 30,4.Zahl) 
eine 6 ein. Starten Sie den Basic-Lader mit RUN und nach 
dem READY geben Sie NEW und CLR ein: wir brauchen ihn 
nicht mehr. Ab Speicherstelle 7000 steht jetzt unser Assem¬ 
blerprogramm als Maschinencode. Daß es wirklich dasselbe 
tut wie das Basic-Programm erfahren Sie durch SYS 7000. 
Da hatten Sie vermutlich gar keine Zeit mehr, auf die Stoppuhr 
zu drücken! (5,4 Millisekunden etwa dauert das ohne die 
Zeit, die der Basic-Interpreter für den Befehl SYS benötigt). 
Außerdem braucht das Programm 17 Byte Speicherplatz. 

Genau das ist es, was die Assemblerprogrammierung so 
reizvoll macht: Der Speicher faßt mehr an Programm und die 
Ausführung des Programmes geht fast lOOOmal so schnell! 
Dazu kommen natürlich noch einige andere Kriterien, denn 
viele Probleme sind zum Beispiel in Basic nicht lösbar, son¬ 
dern nur mit dem vielseitigeren Assembler. 

Unser Computer ist darauf vorbereitet, daß wir ihn in Basic 
ansprechen. Er enthält im Normalfall sofort nach dem Ein¬ 
schalten ein stets präsentes Übersetzungsprogramm, den 
Interpreter, welcher unsere Basicanweisungen für ihn ver¬ 
ständlich interpretiert. Auch das ist ein Unterschied zu 
Assemblerprbgrammen: Ist ein solches Programm erst ein¬ 
mal assembliert (also als Maschinensprache im Speicher vor¬ 
handen), braucht man kein Übersetzungsprogramm mehr. 
Basic-Programme dagegen müssen bei jedem Durchlauf von 
vorne bis hinten ständig übersetzt werden, sie laufen nicht 
ohne vorhandenen Interpreter. Wie so ein Interpreter im Prin¬ 
zip arbeitet und was ihn von einem sogenannten Compiler 
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unterscheidet, können Sie im 64’er, Ausgabe 4/84 und im 
64'er Sonderheft 6 (Top-Themen) im Artikel von M. Törk über 
seinen Strubs-Precompiler nachlesen. 

Dort sehen Sie dann auch, daß ein Compiler zwar ein Basic- 
Programm enorm beschleunigen kann, aber bei weitem nicht 
an die Geschwindigkeit reiner Assemblerprogramme heran¬ 
reicht, vom Speicherplatzbedarf ganz zu schweigen. 

3. Wie sag ich’s meinem Computer? 


Leider haben weder der C 64 noch der VC 20 einen Assem¬ 
bler implementiert. (Sie merken, daß jetzt von dem Software- 
Paket die Rede ist!). Es gibt einen etwas mühseligen Weg, 
dieses Handicap zu umgehen: den Basic-Lader. Wie ist also 
der Weg, mit einem solchen Lader eigene Maschinenpro¬ 
gramme in den Computer zu bekommen? 

a) Erstellen des Assemblerprogrammes. Das zu lernen ist 
die Hauptaufgabe in diesem Artikel. Das Ergebnis wird eine 
Kette von Befehlen sein, zu denen zum Beispiel der Befehl 
RTS gehört. 

b) Jedem Befehl in Assembler entspricht in Maschinen¬ 
sprache ein Binärcode in einer Speicherstelle. Diese Codes 
sind in Listen nachschlagbar: RTS entspricht dem Binärcode 
0110 0000 . 

c) Der Code muß in eine Speicherstelle eingegeben wer¬ 
den. Das geschieht von Basic aus mit dem POKE-Befehl. 
Weil aber Basic keine Binärzahlen kennt, muß der Code ins 
Dezimalsystem umgerechnet werden. Glücklicherweise sind 
in den Tabellen meist schon die Codes als Dezimal- oder 
wenigstens als Hexadezimalzahlen enthalten. RTS ist dezimal 
96 (oder hexadezimal 60, das auch $ 60 geschrieben wer¬ 
den kann). Man POKEt nun an die richtige Adresse den Wert 
96, also zum Beispiel POKE 7016,96 

d) Auf diese Weise wird Byte für Byte in der Programmab¬ 
folge verfahren. Das reine POKEn geschieht dann eben in 
der Form wie im oben gezeigten Basic-Lader. Mühsam, müh¬ 
sam! Auch kann man leider nur mit dem PEEK-Kommando 
nachsehen, was denn nun im Speicher steht (PEEK (7016) 
gibt uns den Wert 96, entsprechend RTS). 

Ein anderer Weg ist, den in diesem Sonderheft abgedruck¬ 
ten »SMON« abzutippen, oder sich die Leser-Service- 
Diskette zu bestellen. 

Assembler (das Software-Paket) gibt es in den unter¬ 
schiedlichsten Ausführungen. Es gibt beispielsweise Direkt- 


Assembler, die jede Programmzeile sofort nach dem 
RETURN assemblieren, aber auch 2-Pass-Assembler, bei 
denen das erst nach Abschluß des Programms insgesamt 
durch einen Befehl (zum Beispiel ASSEMBLE) geschieht. Bei 
einigen kann man (ähnlich wie bei Basic mit REM) Kommen¬ 
tare anfügen, bestimmten Programmstellen Namen geben 
(LABEL), ganze Programmabschnitte mit einem Merknamen 
aufrufen (MAKROS) und so weiter. Was Sie für sich bevorzu¬ 
gen, bleibt Ihnen natürlich überlassen. Die in diesem Artikel 
beschriebenen Programme werden am Anfang auf diese 
schönen Erleichterungen verzichten, es wird sozusagen der 
nackte Assembler verwendet. Was Sie aber außer dem rei¬ 
nen Assembler noch brauchen, ist ein Disassembler und ein 
Monitor (ich habe schon erklärt, welchen ich meine), damit 
wir unseren Computer (fast) immer im Griff haben. 

4. Wie funktioniert unser Computer? 


Weil das Programmieren in Assembler einen viel engeren 
Kontakt zu technischen Einzelheiten unseres Computers 
erfordert, ist es notwendig, ein wenig über diese Innereien 
und ihre Funktion zu wissen. Sehen Sie sich dazu bitte das 
Bild 1 an. 

Da sehen wir zunächst unseren Mikroprozessor, der meist 
eine Menge Funktionen in sich vereinigt (dazu kommen wir 
noch). Im Prinzip ist das unsere CPU (Zentraler Arbeitsbau¬ 
stein). Der Prozessor steht über eine Reihe von Leitungen mit 
dem Rest des Computers in Verbindung. Diese Leitungen 
werden im Fachjargon BUSSE genannt. Da ist zunächst ein¬ 
mal der sogenannte Adreßbus, auf dem 16-Bit-Adressen 
transportiert werden, die der Prozessor erzeugt, und die die 
Herk "';t oder auch das Ziel von Daten festlegen, die über 
den Datenbus laufen. Dieser kann 8-Bit-Daten transportie¬ 
ren, und zwar schreibend oder lesend, also zum Beispiel vom 
Prozessor zum RAM (schreibend), vom RAM zum Prozessor 
(lesend) und so weiter. Außerdem gibt es da noch einen Steu¬ 
erbus, der verschiedene Synchronisationsaufgaben durch¬ 
führen hilft. Links vom Prozessor ist ein Taktgeber angedeu¬ 
tet. Damit nichts durcheinander kommt, läuft alles im Compu¬ 
ter sozusagen im Gleichschritt. Diese Uhr ist gewissermaßen 
der Trommler, den Sie vielleicht von den alten Ruder- 
Galeeren kennen. Dann sehen Sie einen ROM-Bereich, also 
einen Nur-Lese-Speicher (Read Only Memory). Daß man hier 
nur herauslesen kann, ist durch den Pfeil zum Datenbus 
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gekennzeichnet. Doppelpfeile finden wir aber beim RAM 
(Random Access Memory), einem Speicher für beliebigen 
Zugriff, also lesend und schreibend, und bei den Ein- und 
Ausgabebausteinen, die den Kontakt des Computers mit der 
übrigen Welt erlauben, also auch mit uns. Dieses Aufbauprin¬ 
zip finden wir bei allen 8-Bit-Computern. 

5. Das Innenleben eines Mikroprozessors 


Um es gleich nochmal zu sagen: Was hier erzählt wird, ist 
nicht dazu geeignet, Elektronik-Freaks den totalen Durch¬ 
blick zu geben. Wenn Sie das aber gerne möchten, dann 
sehen Sie sich zum Beispiel die Blockschaltbilder an im »Pro- 
grammer's Reference Guide« für den Commodore 64 auf 
Seite 404 oder im »MOS-Hardware-Handbuch« auf Seite 34. 
Auch Rodney Zaks’ Buch »Programmierung des 6502« ist zu 
empfehlen. Er hat sich viel Mühe gegeben, sich verständlich 
auszudrücken. Mir kommt es nur auf den allgemeinen Über¬ 
blick an. Den sollen Sie bekommen, wenn wir uns jetzt 
zusammen Bild 2 betrachten. 

Da sehen Sie zunächst als Herzstück des Prozessors, die 
ALU (Arithmetik Logical Unit), also den arithmetisch¬ 
logischen Baustein. Die ALU hat die Fähigkeit, Rechen¬ 
operationen auszuführen mit Daten, die sie über den Daten¬ 
bus und normalerweise vom Akkumulator erhält. Das Ergeb¬ 
nis wird ebenfalls im Akkumulator abgelegt (daher auch der 
Name: von akkumulieren, etwas ansammeln). Der Akkumula¬ 
tor ist das Register, das uns als Programmierer am häufigsten 
beschäftigen wird. Er ist die Sammel- aber auch die Verteiler¬ 
stelle für fast alle Daten, die wir hin- und herschieben wollen. 
Sowohl der Akku (so werde ich ihn, in der Hoffnung auf Ihr 
wohlwollendes Verständnis, künftig bezeichnen) als auch alle 
anderen Register, das heißt, die höchste Zahl, die darin bear¬ 
beitet werden kann, ist 255 (binär 1111 1111). Nahezu 
ebenso oft wie den Akku werden wir die beiden sogenannten 
Index-Register X und Y benutzen. Warum man sie 
Index-Register nennt, werden Sie noch im Verlauf des Kurses 
sehen. Als nächstes zum Prozessor-Statusflaggen-Register 
(hier P genannt). Man findet darin angezeigt, ob eine Rechen¬ 
operation ein negatives Ergebnis hatte, ob eine Null aufge¬ 
taucht ist oder ob ein Übertrag stattgefunden hat. Auch die¬ 
ses Register wird uns noch häufig begegnen. Das Stapelregi¬ 
ster, auch Stackpointer (Stapelzeiger) genannt, gibt uns Aus¬ 
kunft über den Füllungsgrad eines 256 Byte großen 


speziellen Speichers, der vom Prozessor direkt verwaltet 
wird. Auch damit werden wir noch oft zu tun haben. Schließ¬ 
lich kommen wir zur vorhin erwähnten Ausnahme, zum Pro¬ 
grammzähler (PCL, PCH). Das ist ein 16-Bit-Register, das 
sich aus zwei 8-Bit-Registern (PCL für das LSB und PCH für 
das MSB) zusammensetzt und daher alle 65535 Speicher¬ 
plätze ansprechen kann. Hier ist immer die Adresse des 
nächsten abzuarbeitenden Befehls enthalten. 

Ich will an dieser Stelle nicht in die Einzelheiten der Be¬ 
fehlsabarbeitung einsteigen (das können Sie auch bei Rod¬ 
ney Zaks nachlesen, wenn Sie es genau wissen wollen). Es 
soll nur gesagt sein, daß sich die Verarbeitung in drei Schritte 
unterteilen läßt: 

a) den nächsten Befehl holen 

b) den Befehl decodieren 

c) den Befehl ausführen 

Zu c) ist noch zu sagen, daß es Befehle gibt, die der Pro¬ 
zessor ohne weitere Angaben ausführen kann. Für andere 
müssen erst noch weitere Daten aus dem Speicher geholt 
oder dort abgelegt werden. Deswegen brauchen die Befehle 
unterschiedliche Zeiten zur Ausführung. Die Zeit wird als 
Anzahl von sogenannten Taktzyklen in den Befehlstabellen 
angegeben. Unser Computer hat eine Taktfrequenz von rund 
1 MHz, was bedeutet, daß ein Taktzyklus etwa eine Mikrose¬ 
kunde (10 -6 Sekunden) dauert. Auf diese Weise wurde die 
Zeitdauer für unser kleines Demonstrationsprogramm zu 
Anfang berechnet. Auch das werden Sie noch lernen. 


6. Der Speicher unseres Computers: 
eine Straße mit 65536 Hausnummern 



Dieser Artikel ist für den VC 20 und den C 64 geschrieben. 
Den Speicheraufbau des Commodore 64 finden Sie in der 
April-Ausgabe '84 dieser Zeitschrift ab Seite 119. Deswegen 
soll hier nur der des VC 20 gezeigt werden. Man muß beim 
VC 20 zwei Konfigurationen unterscheiden — sehr zum Leid¬ 
wesen der Benutzer. In Bild 3 ist die Aufteilung gezeigt, die 
in der Grund- und der um 3 KByte erweiterten Version 
vorliegt. 

In Bild 4 sehen Sie die Speicheraufteilung, die bei mehr als 
6,5 KByte eingestecktem Speicher gültig ist. 

Wenn Sie die VC 20 Speicherarchitekturen mit der des 
C64 vergleichen, werden Sie eine Reihe von Unterschieden 



Bild 2. Aufbauschema eines 6510-Prozessors 
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feststellen. Genau besehen gibt es an den wichtigen Punk¬ 
ten aber eine Menge Gemeinsamkeiten! Der VC 20 kennt nur 
Speicher-Häuser mit Erdgeschoß, im Gegensatz zum C 64, 




wo manche Bereiche sogar zwei Etagen haben (soll heißen: 
mehrfach belegt sind). Durch die Eigenart des C 64 aber, im 
Normalfall das Basic-ROM, die Ein- und Ausgabebausteine 
und das Betriebssystem eingeschaltet zu haben, kann man 


ihn eigentlich genauso behandeln wie einen VC 20, bei dem 
die genannten ROM-Bausteine, - und zwar das Basic-ROM 
—, um 8 KByte verschoben sind. Die Unterschiede der ROM- 
Inhalte können fast vernachlässigt werden. Wir werden im 
Einzelfall darauf zu sprechen kommen. Bei den Ein- und Aus¬ 
gabebausteinen liegen allerdings größere Unterschiede. 

Die Seiten 0 bis 3 (eine Seite oder auch page enthält 256 
Byte und man zählt oft auch in diesen Seiten, wenn vom Spei¬ 
cher die Rede ist), sind sich ebenfalls sehr ähnlich und die 
wenigen Unterschiede werden uns ebenfalls noch beschäfti¬ 
gen. Der Bildschirm liegt bei der Grundversion und der mit der 
3-KByte-Erweiterung von 7680 bis 8191, in der Version mit 
mehr als 6,5 KByte von 4096 bis 4607 und beim C 64 von 
1024 bis 2047. Der Bildschirmfarbspeicher liegt - bei glei¬ 
cher Reihenfolge - von 37888 bis 38399, beziehungsweise 
von 38400 bis 38911 und schließlich von 55296 bis 
56295. Der Basic-RAM-Bereich beginnt beim C64 im Nor¬ 
malfall bei 2048 und endet bei 40959. Beim VC 20 ist das 
natürlich wieder von der jeweiligen Erweiterung abhängig 
(Tabelle 1). 


Grundversion 
+3-K-Erweiterung 
+8-k-Erweiterung 
+ 16-K-Erweiterung 
+24-K-Erweiterung 


Basic-Start 4096 
— 1024, 

4608, 

—4608, 
—4608, 


Basic-Ende 7679 
—7679 
—16383 
—24575 
32767 


Tabelle 1. Basic-Start und -Endadressen beim VC 20 mit 
verschiedenem Speicherausbau 

Dies gilt - wie Sie leicht auch aus Bild 4 sehen können - 
auch '•■inn, wenn zu den 8 KByte/16 KByte/24-KByte- 
Erweiterungen noch die 3-KByte-Erweiterung und die 
’KByte-Erweiterung im hohen Speicherbereich (40960 bis 
49151) verwendet werden. Diese letztgenannten Adressen¬ 
bereiche sind dann gut als geschützte RAM-Bereiche für 
Maschinensprache zu verwenden, ebenso wie beim C 64 
der Speicherabschnitt von 49152 bis 53247. 


7. Auskunft über das Befinden unseres 
Computers: die Register-Anzeige 


Bisher haben wir uns mit dem Innenleben unserer Computer 
auseinandergesetzt und die wichtigsten Teile der Hardware 
kennengelernt. Jetzt kommen wir zur Software, nämlich zum 
Assembler. Wenn Sie jetzt den SMON einschalten, meldet er 
sich mit einer Registeranzeige (Bild 5). 

Die angezeigten Werte sind Beispiele, wie sie beim C 64 
auftreten können. PC ist der Programmzähler, der immer auf 
den nächsten zu holenden Befehl zeigt. (Der Wert $E147 
rührt vom SYS-Aufruf, mit dem ich meinen Assembler starte). 
IRQ zeigt uns an, auf welche Adresse der sogenannte 
Interrupt-Vektor gestellt ist. Das ist das Byte-Paar 788 (LSB) 
und 789 (MSB). Auf den Wert $EA31 zeigt es im Normalfall. 

Die nächsten acht Angaben beziehen sich auf das Prozes¬ 
sorstatusregister, das wir zuletzt P genannt haben. Die 
Bedeutung der einzelnen »Flaggen« zeigt Ihnen Bild 6. 

AC ist der aktuelle Inhalt des Akkus. XR zeigt an, was im 
X-Register und YR was im Y-Register enthalten ist. SP (von 
Stackpointer = Stapelzeiger) gibt uns Auskunft über den 
freien Platz im Stapelregister. Damit wissen wir genau, was in 
diesem Moment in unserem Computer vorgeht. So fremd 
Ihnen das alles im Augenblick noch vorkommt, bald werden 
Sie mit dieser Registeranzeige auf vertrautem Fuß stehen. 
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8. Wie sieht ein Assemblerprogramm aus? 


Das menschliche Gehirn hat dem des Computers vieles vor¬ 
aus. Dazu gehört beispielsweise, daß ein Mensch allerlei 
Dinge gleichzeitig tun kann: gehen, sprechen, Musik hören, 
lächeln, Handbewegungen ausführen, womöglich dabei 
auch noch etwas kauen und so weiter. Ein Computer ist dazu 
nicht imstande. Er erledigt eine kleine Aufgabe nach der 
anderen. Weil er das so schnell macht, hat es für uns den 
Anschein, es geschähe alles gleichzeitig. Das Maschinen¬ 
programm ist eine Kette solcher kleiner Aufgaben. Das erste 
Glied daraus, das wir kennenlernen wollen ist der Befehl 

LDA. 

Das bedeutet: Lade den Akkumulator. Alle Assembler- 
Befehlsworte bestehen aus drei Buchstaben wie dieser hier 
auch. Wir haben in der ersten Folge schon gesagt, daß einem 
solchen Befehl eine 8-Bit-Codezahl entspricht. Das ist hier 
$A9 oder binär 1010 1001 oder schließlich dezimal 169. Die 
Codezahl muß in einem Speicherplatz stehen, zum Beispiel 
in $1500 (entspricht dez. 5376). Assemblerlistings sehen 
dann so aus: 

1500 LDA 

Hier tritt also die Speicherplatznummer mit einem nachfol¬ 
genden Befehl anstelle der von Basic gewohnten Zei¬ 
lennummer. 

Es fehlt noch etwas Entscheidendes: Was soll denn in den 
Akku geladen werden? Genauso wie es in Basic Befehle gibt, 
die für sich alleine stehen können wie CLR oder LIST, gibt es 
auch im Assembler solche Befehle. Weitaus häufiger sind 
aber hier Befehle, die ein Argument erfordern (in Basic zum 
Beispiel PEEK(IOO). Dabei ist 100 das Argument). In Assem¬ 
bler gibt es zwei Sorten von Argumenten. Solche, die in 
einem Speicherplatz unterzubringen sind und andere, die 
zwei Byte brauchen. Mit dem Befehlswort (hier also LDA) 
zusammen, existieren in Assembler also I-Byte-Befehle, 
2-Byte-Befehle und 3-Byte-Befehle. 


PC 

E147 

IRQ 

EA31 

NV-BDIZC 

10110000 

AC 

00 

XR 

00 

VR 

00 

SP 

F8 

Bild 5. Eine Registeranzeige 
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Bild 6. Das Prozessor-Status-Register P: die Flaggen 


Befehls¬ 

wort 

Adressierung 

Byte¬ 

anzahl 

Code 

HEX DEZ 

Dauer 

In 

Takt¬ 

zyklen 

Beein¬ 

flussung 

von 

Flaggen 

LDA 

unmittelbar 

2 

A9 

169 

2 

N, Z 


absolut 

3 

AD 

173 

4 

N, Z 

LDX 

unmittelbar 

2 

A2 

162 

2 

N, Z 


absolut 

3 

AE 

174 

4 

N, Z 

LDY 

unmittelbar 

2 

AO 

160 

2 

N, Z 


absolut 

3 

AC 

172 

4 

N, Z 

STA 

absolut 

3 

8D 

141 

4 

keine 

STX 

absolut 

3 

8E 

142 

4 

keine 

STY 

absolut 

3 

8C 

140 

4 

keine 

RTS 

implizit 

1 

60 

96 

6 

keine 


Bild 7. Die ersten sieben Befehle 



Das Argument von LDA ist also das, was in den Akku soll. 
Laden wir deshalb mal eine 1 in den Akku: 

1500 LDA #$01 

Wir haben jetzt einen 2-Byte-Befehl erzeugt. Was aber 
bedeuten »#« und »$« dabei? $ ist leicht zu erklären. Die 
große Mehrzahl der Assembler nimmt bei Zahlenangaben 
Hexadezimalzahlen an. Bei einigen muß man dies durch das 
$-Zeichen kennzeichnen. Manche Assembler lassen auch 
Binärzahlen, Dezimalzahlen und sogar ASCII-Zeichen als 
Argumente zu. Für jede Eingabeart steht dann vor dem Argu¬ 
ment ein Zeichen, das die Art des Argumentes angibt, zum 
Beispiel häufig »I« für Dezimalzahlen oder»%«für Binärzah¬ 
len. Nun zum #-Zeichen. Es gibt viele Arten, den Akku zu 
laden. Direkt mit einer Zahl - wie wir hier —, aber zum Beispiel 
auch mit dem Inhalt eines anderen Speichers und so weiter. 
Man spricht von der sogenannten Adressierung. 

Es gibt eine ganze Menge davon und jede wird auf eindeu¬ 
tige Weise gekennzeichnet. Wenn wir in unserem Akku eine 
Zahl laden, dann ist das die »unmittelbare« Adressierung und 
die kennzeichnet man mit dem #-Zeichen. 

Wenn in Speicherstelle $1500 die Codezahl für LDA steht, 
dann muß die 1 in der Speicherstelle $1501 stehen, wie es 
sich für einen 2-Byte-Befehl gehört. Wenn Sie nun die 
Assemblerzeile eingegeben haben und (RETURN) drücken, 
dann taucht auf dem Bildschirm eine Fehlermeldung auf (bei 
vielen Assemblern). Wir müssen vorher nämlich noch unse¬ 
rem Software-Instrument sagen, jetzt zu assemblieren. Wie 
das geschieht, ist auch wieder von Assembler zu Assembler 
verschieden. Die meisten erwarten, daß man vor der Zeile 
noch ein A eingibt (zum Beispiel bei dem C 128): 

A 1500 LDA #$01 

Wenn Sie jetzt (RETURN) drücken, zeigt der Bild- 
s^ m: 

A 1500 LDA #$01 
A 1502 

und meistens einen blinkenden Cursor, der auf die nächste 
Eingabe wartet. $ 1502 ist die nächste freie Speicherstelle, 
und wenn beim Programmablauf der Programmzähler nach 
dem LDA #$01 auf $1502 deutet, dann erwartet er dort den 
nächsten Befehl. Wenn dort Unsinn steht, dann stürzt der 
Computer im allgemeinen ab, je nachdem, welcher Code 
dann hier zufällig enthalten ist. Wir haben ja 256 Möglichkei¬ 
ten dafür: $00 bis $FF. Im Gegensatz zu Basic, wo man durch 
den Interpreter die Möglichkeit hat, Zeilennummern zu bauen 
wie man will, muß hier das Programm eine ununterbrochene 
Perlenschnur von Befehlen in Speicherstellen sein. Durch 
einige Befehle läßt sich dieses Prinzip allerdings durch¬ 
brechen. 

Damit wir die Wirkung von Befehlen sehen können, greife 
ich auf einen Befehl vor, der ähnlich dem STOP in Basic einen 
Programmabbruch bewirkt: BRK. Die genaue Funktion soll 
erst später erklärt werden, aber wir sehen jedenfalls dann, 
wenn ein Maschinenprogramm auf einen BRK-Befehl läuft, 
die Registerinhalte angezeigt. Das ist in den meisten Assem¬ 
blern eingebaut. Wir ergänzen jetzt: 

A 1502 BRK 

Damit erstmal genug. Steigen Sie aus dem Assembler aus 
und starten Sie das Programm. In den meisten Assemblern 
geht das mit 
G 1500 

oder sonst von Basic aus mit SYS 5376. Jetzt werden wieder 
die Register angezeigt. Der Programmzähler steht auf 1503, 
im Akku steht 01, alle Flaggen außer der Breakflagge sind 
Null (die unbenutzte Flagge steht immer auf 1). Jetzt ändern 
wir das Argument: 

A 1500 LDA #$00 
A 1502 BRK 

Wir starten wieder und sehen uns die Register an: Pro¬ 
grammzähler 1503, Akku jetzt 00, aber bei den Flaggen hat 

a 
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sich etwas verändert: Die Zero-Flagge ist auf 1 gesetzt. Wir 
sehen also: Diese Flagge bleibt so lange ungesetzt, solange 
nicht eine Null im Akku auftaucht, erst dann wird sie 1. 
Noch einmal ändern wir das Programm: 

A 1500 LDA #$FF 
A 1502 BRK 

Nach erneutem Start steht das Erwartete in den Registern, 
nur bei den Flaggen ist etwas Merkwürdiges passiert: Die 
Vorzeichenflagge steht auf 1. Das bedeutet, im Akku soll eine 
negative Zahl stehen! Nun wissen wir aber, daß $FF = dez. 
255 ist. Dieses Rätsel wird uns noch eine Weile begleiten. Es 
sei hier nur bemerkt, daß kein Fehler vorliegt: Immer wenn in 
einer Zahl das Bit 7 gleich 1 ist, geht die Vorzeichenflagge 
auf 1. Die Lösung des Rätsels werden wir bei den negativen 
Binärzahlen finden. 

Wir schließen aus alledem: Der LDA-Befehl beeinflußt die 
Vorzeichen- und die Zeroflagge. 

9. Die absolute Adressierung 


STA heißt »STore Accumulator«, also »lege Akkuinhalt ab« 
Wie Sie sich denken können, muß auch hier ein Argument 
auftauchen, nämlich wohin abgelegt werden soll. Wir legen 
unseren Akkuinhalt in die erste Bildschirmspeicherstelle 
(C 64:$0400, VC 20 Grundversion: $1E00, VC 20 mit Er¬ 
weiterung: $1000). Unser Programm muß also so aussehen: 
A 1500 LDA #$01 
A 1502 STA $0400 
oder die entsprechende Adresse 
(siehe oben). 

Mit diesem STA-Befehl lernen wir eine neue Adressie¬ 
rungsart kennen: die »absolute« Adressierung. Sie ist daran zu 
erkennen, daß kein besonderes Merkmal verwendet wird. 
Die Adresse $ 0400 ist nicht in einem Byte darstellbar, son¬ 
dern wird aufgeteilt auf zwei Bytes. Im Speicher steht jetzt: 

1500 LDA # 

1501 $ 01 

1502 STA 

1503 $ 00 »das ist das LSB« 

1504 $ 04 »das ist das MSB« 

Hier liegt also ein 3-Byte-Befehl vor und die nächste freie 
Speicherstelle ist $ 1505. 

Vom Basic her wissen Sie, daß 1 der Bildschirmcode für 
den Buchstaben A ist und daß man jeder Bildschirmspeicher- 
stelie auch eine Bildschirmfarbspeicherstelle zuordnet. Um 
ein eingeschriebenes Zeichen vom Hintergrund abzuheben, 
muß man dort dann eine Farbinformation eingeben. Der Start 
dieses Bildschirmspeichers liegt so: 

C 64: $ D800 

VC 20 (Grundv.): $9400 
VC 20 (Erw. Vers.): $9600. 

Der Farbe Schwarz entspricht die Codezahl 0. Wir ergän¬ 
zen unser Programm durch: 

A 1505 LDA #$00 

A 1507 STA $D800 (oder entsprechender Speicher, siehe 
oben). Die nächste freie Adresse ist nun $150A. Unser Pro¬ 
gramm soll jetzt abgeschlossen sein. Damit der Computer 
aber beim Programmzählerstand $150A nicht Unsinn vorfin¬ 
det, muß - ähnlich wie bei END in Basic - das Programm auf 
irgendeine Weise beendet werden. Das kann durch BRK 
geschehen. Wir wollen aber den dritten Assembler-Befehl 
kennenlernen: 

RTS 

Das heißt »Return From Subroutine«, also »Rückkehr aus 
Unterprogramm«. In unserem Fall bewirkt das eine Rückkehr 
zum Basic. Wie Sie sehen, ist das ein 1-Byte-Befehl, also 
ohne Argument. Auch hier spricht man von einer Adressie¬ 


rungsart, nämlich der »impliziten«-Adressierung. Man 
erkennt sie am Fehlen des Argumentes. Die Adresse ist impli¬ 
zit, das heißt im Befehl selbst enthalten. Dies ist nämlich ein 
Befehl, der immer an den Programmzähler gerichtet ist. Der 
Computer holt sich vom Stapel-Speicher die dort zuoberst 
liegende Adresse, das ist die, bei der der Computer in ein 
Unterprogramm gesprungen ist oder aber die, bei der der 
Computer Basic verlassen hat. Wir ergänzen also noch: 

A 150A RTS 

und starten das Programm, zum Beispiel von Basic aus mit 
SYS 5376. Natürlich taucht dann in der linken oberen Ecke 
des Bildschirmes ein schwarzes A auf. Hier noch der 
Basic-Lader: 

10 FOR 1 = 5376 TO 5386:READ A:POKE l,A:NEXT l:END 
20 DATA 169,1,141,0,4*,169,0,141,0,216*,96. 

Die mit * markierten Zahlen müssen für den VC 20 verän¬ 
dert werden: Grundversion: 30 und 148. 

Erweiterung: 16 und 150. 


10. Vier neue Befehle 


Eine Kombination von LDA mit STA ist vergleichbar mit dem 
POKE-Befehl in Basic. Man kann in Assembler nicht direkt 
eine Zahl in einen Speicher einschreiben, sondern muß den 
Umweg über den Akku machen. Außer dem Akku eignen sich 
dazu aber auch das X-Register und das Y-Register. Hierfür 
gibt es die Befehle LDX (lade X-Register), STX (lege X- 
Register-Inhaltab), LDY (lade Y-Register) und schließlich STY 
(lege Y-Register-Inhalt ab). Sie können das übungshalber an 
unserem kleinen Programm ausprobieren. An dem folgenden 
Prog r -'i m sehen Sie noch eine Eigenart der drei Register 
(Akku, X-Register, Y-Register): 

A 1500 LDA #$01 
A 1502 LDX #$00 
A 1504 LDY #$02 
A 1506 STA $0400 
A 1509 STX $D800 
A 150C STY $0401 
A 150F STX $D801 
A 1512 STA $0402 
A 1515 STX $D802 
A1518 RTS 

Für den VC 20 werden die entsprechenden Speicherstel¬ 
len für Bildschirm- und Bildschirmfarbspeicher eingesetzt. 
Dieses Programm druckt - wie erwartet - »ABA« in die linke 
obere Ecke des Bildschirms. Dabei ist das X-Register dreimal 
ausgelesen worden und der Akku zweimal. Sie sehen also, 
daß die Registerinhalte durch die STA-, STX-, STY-Befehle 
nicht verändert werden. 

Wir wollen noch etwas ausprobieren. Bisher haben wir den 
LDA-Befehl nur mit der »unmittelbaren« Adressierung ken¬ 
nengelernt. LDA, LDX, LDY können auch »absolut« adressiert 
werden. 

A 1518 LDA $D800 

Damit laden wir den Inhalt der Speicherstelle $ D800 (beim 
VC 20 die anderen Adressen des Bildschirmfarbspeichers) 
in den Akku. Der Inhalt ist seit $1509 eine Null. Jetzt weiter: 
A 151B STA $0403 
A 151E STX $D803 
A 1521 RTS 

Das müßte beim Ablauf des Programms noch einen Klam¬ 
meraffen (@mit Bildschirmcode 0) an die vierte Stelle plazie¬ 
ren, was Sie durch SYS 5376 leicht nachprüfen können. Sie 
sehen, daß man mit diesen sieben Befehlen schon eine 
Menge anfangen kann. 

Wir kommen noch einmal zur Adressierung. Ich hatte Ihnen 
gesagt, daß LDA #$01 ein 2-Byte-Befehl mit unmittelbarer 


10 







C 64/VC 20 


Kurs 


Adressierung ist (ein Byte für LDA und eines für 01), LDA 
$D800 ist ein 3-Byte-Befehl (ein Byte für LDA, je eines für 
das LSB und das MSB von $D800) mit absoluter Adressie¬ 
rung. Da werden Sie sich doch sicher schon gefragt haben, 
wo die Adressierung bleibt! Wenn aber kein Byte für die 
Adressenmarkierung (zum Beispiel #) reserviert ist, muß die 
Kennzeichnung irgendwie anders sein. Wenn Sie einen 
Disassembler zur Verfügung haben, dann sehen Sie sich 
damit unser Programm an. Fast jeder Disassembler gibt 
neben dem Assemblertext auch Byte für Byte in Hexadezi¬ 
malzahlen die Codes an. Wenn Sie nun die beiden Befehle 
LDA #$01 und LDA $d800 von den Codes her untersu¬ 
chen, sehen Sie folgendes: 

1500 A9 01 LDA #$01 
und 

1518 AD 00 D8 LDA $D800 

Offensichtlich gehört jeweils das erste angezeigte Byte zu 
LDA. Sie sind aber verschieden! Wir sehen daraus, daß die 
Codezahl für einen Befehl gleich zwei Informationen enthält: 
das Befehlswort selbst (LDA) und die Adressierungsart. 

Genauso wie man LDA sowohl unmittelbar als auch absolut 
ausführen kann, ist das auch mit LDX und LDY möglich. Bei 
den Befehlen STA, STX, STY ist eine unmittelbare Adressie¬ 
rung sinnlos. Für RTS kennt man nur eine implizite Adressie¬ 
rung. Wir fassen das alles in Bild 7 zusammen. 

In den letzten Spalten von Bild 7 ist noch angegeben, 
inwieweit durch diese Befehle das Prozessorstatusregister 
beeinflußt wird, so wie wir es für den Befehl LDA schon aus¬ 
probiert haben. In der vorletzten Spalte sehen Sie, wie lange 
die Ausführung eines Befehls dauert. Wenn sie für einen Takt¬ 
zyklus etwa eine Mikrosekunde rechnen, dann müßten Sie 
jetzt ausrechnen können, wie lange unser letztes Programm 
zur Bearbeitung braucht: 48 Mikrosekunden. Ein vergleich¬ 
bares Basic-Programm braucht dazu etwa hundertmal so 
lange: zirka 0,05 Sekunden. 


11. Die Zahlen der Assembler-Alchimisten 


Ein bißchen von Assembler-Alchimie verstehen Sie jetzt 
schon mit diesen sieben Befehlen. Wir wollen uns nun die 
Zahlen ansehen, die hier Verwendung finden: das Binär¬ 
system und das Hexadezimalsystem. 

Die einzigen Ziffern, die unser Computer kennt, sind 0 und 
1. Sie stehen für »Strom an« oder »Strom aus«, oder für »keine 
magnetische Erregung« oder »magnetische Erregung«. Des¬ 
halb ist es für uns als angehende Assembler-Alchimisten von 
großer Bedeutung - wir arbeiten ja ganz eng an der Hardware 
- dieses binäre Zahlensystem handhaben zu können. Das 
Hexadezimalsystem kennt der Computer eigentlich gar nicht. 
Wir verwenden es deswegen, weil es in einem besonders 
engen Zusammenhang mit Binärzahlen und dem Aufbau 
unseres Computers steht: Die größte einstellige Hex-Zahl ist 
$F, das entspricht genau 1111 im Binärsystem, also dem 
maximalen Füllungsgrad eines halben Bytes, das Nibble 
genannt wird. Ein ganzes Byte kann maximal $FF enthalten 
(binär 1111 1111) und der gesamte Speicheradressenbereich 
unseres Computers geht bis $FFFF (dezimal 65535). Eine 
einstellige Hex-Zahl paßt also in ein Nibble, eine zweistellige 
in ein Byte und eine dreistellige oder vierstellige in zwei Byte, 
weshalb man solche Hex-Adressen auch recht leicht in das 
LSB und das MSB (auch Low- und High-Byte genannt) auftei¬ 
len kann: 

$ D8 00 
MSB LSB 

Rechnen werden wir mit Hexadezimalzahlen nicht, dazu 
benutzen wir dann das Dezimalsystem oder - wenn es sich 
um computerinterne Vorgänge handelt - das Binärsystem. 


Das Rechnen mit Binärzahlen funktioniert genauso wie das 
mit Dezimalzahlen. Es gilt also 
0 + 0=0 
0 + 1=1 
1+0=1 
1 + 1=10 

wobei binär 10 gleich dezimal 2 ist. Als Beispiel können wir 
mal 2 + 1=3 im Binärsystem rechnen: 

10 entspricht dez. 2 
+ 01 entspricht dez. 1_ 

11, was ja dezimal 3 ergibt. 

Die Addition erfolgt also spaltenweise wie beim gewohnten 
dezimalen Addieren. Auch mit dem Übertrag läuft es wie im 
dezimalen. Beispiel: 2+2 = 4: 

10 entspricht dez. 2 

+10 entspricht dez. 2_ 

100, was dezimal eine 4 ergibt. 

In der zweiten Spalte wurde nach der Regel verfahren: 
1+1=10. Rechnen wir noch 3+3 = 6: 

11 entspricht dez. 3 

+11 entspricht dez. 3 _ 

110, was dezimal eine 6 ergibt. 

In der ersten Spalte wurde gerechnet 1 + 1 = 10, wobei nach 
dem alten Motto: 0 hin, 1 im Sinn die 0 unter den Strich 
gesetzt wurde. In der zweiten Spalte wird dann so verfahren: 
1 + 1 + 1 (das ist die 1, die wir »im Sinn« hatten) = 11. Ich meine, 
daß Sie ohne Probleme die folgenden Übungsaufgaben 
lösen und dann jeweils dezimal das Ergebnis nachprüfen 
können: 10 + 5, 7 + 1, 16 + 16, 240+16, 62+65. 

12. Eine Zauberformel der Assembler- 
Alchimisten: 

INX, INY, INC, DEX, DEY, DEC? 


Wir wissen ja schon, daß man diese »Zauberformeln« entzau¬ 
bern kann. INX heißt einfach »INCrement X-Register«, also 
Inhalt des X-Registers um 1 erhöhen. Es wird Ihnen sicher 
einleuchten, daß INY dasselbe mit dem Y-Register tut. Etwas 
weniger deutlich ist das bei INC. Das bedeutet »INCrement 
memory«, also zähle zum Inhalt einer Speicherstelle eins 
dazu. INX und INY enthalten alles, was dem Computer zu 
sagen ist, sind also offensichtlich I-Byte-Befehle mit der in 
der letzten Folge schon kennengelernten impliziten Adres¬ 
sierung. Bel INC muß dem Computer noch gesagt werden, 
welche Speicherstelle er um 1 erhöhen soll. Es gehört also 
noch eine Adresse dazu. Das läßt diesen Befehl im allgemei¬ 
nen zu einem 3-Byte-Befehl werden. 

Das Umgekehrte leisten die Befehle DEX, DEY und DEC. 
Sie bedeuten nämlich »DECrement X-Register«, also »zähle 
das X-Register um eins herunter«, beziehungsweise das 
Y-Register oder - bei DEC - die angegebene Speicherstelle. 
Für die Adressierungsart und die Anzahl Bytes pro Befehl gilt 
hier das gleiche wie für die INX...-Befehle. Sehen wir uns das 
an einem kleinen Beispiel an: 


1500 LDA #00 

1502 LDX #01 

1504 STA D800 

1507 STX 0400 

150A INX 

150B STA D801 

150E STX 0401 

1511 DEX 

1512 STA D802 

1515 STX 0402 

1518 BRK 
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Wenn Sie das kleine Programm mit G 1500 starten, dann 
sollten Sie in der linken oberen Ecke des Bildschirms ABA in 
schwarzer Schrift stehen haben. Was ist geschehen? Wir 
haben den Inhalt des Akkus (=0, also Farbcodefürschwarz) in 
das Bildschirm-Farbregister geschrieben (#D800), dann 
den Inhalt des X-Registers (1 = POKE-Code für den Buch¬ 
staben A) in die erste Bildschirm-Speicherzelle (#0400). 
Anschließend wurde das X-Register um 1 erhöht (2 = POKE- 
Code für den Buchstaben B) und dieser Inhalt in die zweite 
Bildschirmzelle geschrieben. Außerdem mußte natürlich 
auch dieser Bildschirm-Farbspeicherplatz mit dem Farbcode 
0 belegt werden. Durch DEX wurde das X-Register wieder 
heruntergezählt, somit wieder ein A erzeugt und in die dritte 
Bildschirmstelle gedruckt. 

Sie haben sicher schon bemerkt, daß man auf diese Weise 
Abläufe mitzählen kann. Soll zum Beispiel ein Vorgang 20 mal 
wiederholt werden, dann packt man ins X-Register (oder ins 
Y-Register oder in eine andere Speicherstelle) den Anfangs¬ 
wert 0, läßt den Computer eine Arbeit ausführen, erhöht das 
entsprechende Register oder die Speicherzelle um 1 mitINX, 
INY oder INC, prüft dann, ob dieser Inhalt schon 20 geworden 
ist und so weiter. Wie man diese Prüfung vornimmt, dazu 
kommen wir erst später bei den BRANCH-Befehlen. Das ist 
also ähnlich wie in Basic bei den FOR...NEXT-Schleifen: Dort 
wird eine Variable als Zähler verwendet, hier ein Register 
(oder eine Speicherstelle). Ebenso wie in Basic bei diesen 
Schleifen kann man auch hier rückwärts zählen mit DEX, DEY 
oder DEC. Das hat oft gewisse Vorzüge, was uns aber noch 
nicht kümmern soll. 

Wenn wir diese Befehle als Zähler verwenden, sollten wir 
im Auge behalten, daß eine Speicherstelle (auch ein X- oder 
Y-Register) Zahlen nur von 0 bis 255 enthalten kann. Die 
höchste 8-Bit-Zahl ist ja: 

dez. 255 = bin. 1111 1111 
+ 1 1 


ergibt: (1)0000 0000 

Wenn wir also über 255 hinauszählen, ergibt sich wieder 
0 und so weiter, weil ein Überlauf stattgefunden hat. Das 9.Bit 
paßt nicht mehr in das Byte hinein. Um nochmal genau sehen 
zu können, was unser Computer da tut, probieren Sie einmal 
aus: 

1500 LDA #01 
1502 BRK 

Das soll uns die Register zunächst mal im Ausgangszu¬ 
stand zeigen. Nach G 1500 werden sie angezeigt: 

AC XR YR N V -BDIZC 
01 00 00 0 0 110 000 

Im Akku steht jetzt die dort eingeladene 1. Nun wollen wir 
das X-Register laden mit 255 (also $FF). Dazu ändern wir das 
Programm: 

1502 LDX # FF 
1504 BRK 

Nach erneutem G 1500 zeigen die Register: 

AC XR YR N V -BDI ZC 
01 FF 00 1 0 110 000 

Im X-Register steht nun die Zahl $FF. Bei den Flaggen hat 
sich die N-Flagge (die negative Zahlen anzeigen soll) auf 1 
geschaltet! 

Nun wollen wir das X-Register über 255 hinauszählen. Wir 
verändern das Programm nochmal: 

1504 INX 

1505 BRK 

Der Start mit G 1500 liefert uns die folgende Register¬ 
anzeige: 

AC XR YR N V - BDI ZC 
01 00 00 0 0 110 010 

Wie erwartet, ist der Überlauf des X-Registers eingetreten: 
Es ist jetzt Null. Die N-Flagge hat ihren gewohnten Wert 0 wie¬ 


der angenommen und die Z-Flagge, die uns anzeigt, ob die 
letzte Operation eine Null erzeugt hat, ist jetzt gesetzt. Bei 
weiterem Hochzählen verschwindet die Z-Flagge wieder: 

1505 INX 

1506 BRK 

G 1500 liefert den Registerinhalt: 

AC XR YR N V- BDIZC 
01 01 00 0 0 110000 

Das gleiche passiert bei Verwendung des Y-Registers als 
Zähler, wie Sie leicht durch Austauschen aller auf X bezoge¬ 
nen Befehle feststellen können. Sehr nett ist es, diesen 
Befehlsablauf einmal für den INC-Befehl auf die Speicher¬ 
stelle $0400 (Bildschirmspeicher links oben) bezogen 
ablaufen zu lassen. Wenn man darauf achtet, daß kein Hoch¬ 
scrollen des Bildschirms eintritt, kann man das Ergebnis 
außer in den Registern auch noch als Zeichen auf dem Bild¬ 
schirm verfolgen. Der Beginn der Befehlsequenz ist dann 
sinnvollerweise: 

1500 LDA # FF 
1502 STA 0400 
1505 BRK 

Im folgenden setzt man dann anstelle von INX immer INC 
0400 ein. 

Was passiert beim Herunterzählen unter Null? Sie können 
das mit der gezeigten Befehlskette leicht verfolgen, indem 
Sie immer statt INX jetzt DEX setzen und die Register nicht 
mit$FF, sondern mit 01 laden. Es zeigt sich, daß beim Herab¬ 
zählen nach der Null wieder 255 ( = $FF) im Register zu fin¬ 
den ist. Die Reaktion der N- und der Z-Flagge auf den jeweili¬ 
gen Registerinhalt ist die gleiche wie beim Hochzählen. 

Es ist uns nun deutlich, daß diese sechs Befehle die N- 
Flagge und die Z-Flagge beeinflussen können. Diese Tatsa¬ 
che wi, J später noch eine große Rolle spielen, wenn es um 
die bereits erwähnte Schleifenkontrolle geht. 


13. Noch ein alchimistischer Zahlentrick: 

BCD 


Die Assembler-Alchimisten haben noch viel mehr Arten der 
Zahlen- und Zeichendarstellung auf Lager. Eine davon ist die 
Codierung als BCD-Zahlen. BCD kommt vom englischen 
»binary coded dezimal«, was bedeutet: Binär codierte Dezi¬ 
malzahlen. 

Zwischendurch möchte ich noch eine Bemerkung loswer¬ 
den, die Sie als Trost auffassen sollen: Auch wenn wir später 
andere Zahlendarstellungen kennenlernen werden, es wird 
nicht so schwierig! Sogar so komplette Idioten wie Computer 
verstehen das, obwohl man ihnen alles haarklein vorkauen 
muß. 

Wenden wir uns nun wieder den einfachen BCD-Zahlen zu. 
Alle Zahlen von 0 bis 9 lassen sich binär mit nur 4 Bit 
ausdrücken: 

Binär Dezimal 

0000 0 

0001 1 

0010 2 

0011 3 

0100 4 

0101 5 

0110 6 

0111 7 

1000 8 

1001 9 

Die weiteren Werte 1010 bis 1111 werden in der BCD- 
Codierung nicht benutzt. Liegt nun eine Dezimalzahl (zum 
Beispiel 12) vor, dann wird jede Stelle dieser Zahl (also die 1 
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und die 2) getrennt binär codiert. In unserem Beispiel mit der 
12 wäre das dann 0001 für die 1 und 0010 für die 2. Somit 
ist die 12 im BCD-Code 0001 0010. Jede Ziffer erhält so ihr 
Nibble. Eine Zahl im BCD-Format hat deswegen keine feste 
Anzahl von Bytes, sondern die Byte-Zahl hängt von der 
Anzahl der Stellen ab. Die Zahl 1984 beispielsweise braucht 
2 Byte: 0001 1001 1000 0100. 

Schwierig gestaltet sich das Rechnen mit diesen Zahlen 
wegen der sechs unbenutzten Codes. Aber auch da habe ich 
einen Trost für Sie: Wir werden damit nicht rechnen. Wozu 
das ganze dann, werden Sie sich fragen? Der Grund für das 
alles ist, daß BCD-Zahlen im Gegensatz zu den Zahlen mit 
festem Format (die sonst verwendet werden) so eingegeben 
und verarbeitet werden können, wie sie vorliegen. Das ist im 
kaufmännischen Bereich manchmal notwendig, wo eben 
1000 mal 0,1 Pfennigei Mark ergeben und Fehler unzulässig 
sind. Sollten Sie also vor dem Problem stehen, mit BCD- 
Zahlen rechnen zu müssen, grämen Sie sich nicht: Unser 
Prozessor kennt den Dezimalmodus. Er ist dann eingeschal¬ 
tet, wenn die Dezimal-Flagge auf 1 gesetzt ist. 

Damit sollen Sie dann auch noch gleich zwei neue Befehle 
kennenlernen: SED und CLD. Der erstere hat nichts mit Par¬ 
teien zu tun, sondern ist die Abkürzung für »SEt Dezimal¬ 
flag«, also setze die Dezimalflagge. So schalten Sie den 
Dezimal-Modus ein. Wie Sie sicher schon messerscharf 
geschlossen haben, heißt CLD »CLear Dezimal-flag«, also 
setze die Dezimalflagge auf Null, wodurch dieser Modus wie¬ 
der auszuschalten ist. 

Wichtig! Wenn Sie argwöhnen, daß in einem Programm 
irgendwann mal die Dezimal-Flagge gesetzt sein könnte, 
dann gehen Sie auf Nummer sicher und schieben Sie vor eine 
Rechenoperation, die nicht im Dezimalmodus laufen soll, ein 
CLD. 

Beide Befehle sind 1-Byte-Befehle mit implizierter Adres¬ 
sierung, Sie beeinflussen lediglich die Dezimalflagge. 

Wie schon mal betont: Der Computer ist strohdumm. Er 
kann nicht einmal auf normale Weise voneinander abziehen! 
Deswegen geht er den komplizierten Weg: Er addiert eine 
negative Zahl. Nur: Wie sehen negative Binärzahlen aus? Wir 
werden diese Frage in drei Etappen beantworten, 

a) Man könnte eine Flagge setzen, die 1 ist bei negativen und 
0 bei positiven Zahlen. Bei einigen Fließkommazahlen wird 
das auch so gemacht. Hier aber setzt man die Flagge direkt 
in die Zahl ein: Bit 7 jeder Zahl ist jetzt ein Vorzeichenmerk¬ 
mal. Wenn dieses Bit 0 ist, handelt es sich um eine positive, 
wenn es 1 ist, um eine negative Zahl. Auf diese Weise ist also 
+ 1 wie bisher 0000 0001, wohingegen—1 jetzt 1000 0001 
hieße. Damit wird allerdings der Zahlenbereich, der durch ein 
Byte auszudrücken ist, verschoben. 255=binär 1111 1111 
kann so nicht mehr verwendet werden. Die größte Zahl, die 
jetzt ausgedrückt werden kann, ist 0111 1111 = dezimal 127. 
Die kleinste Zahl ist dann 1111 1111 =—127. Probieren wir 
mal aus, wie sich damit rechnen läßt: 

+ 10 0000 1010 

—6 1000 0110 


ergibt 1001 0000 =—16, 
was offensichtlich falsch ist, denn nach Adam Riese sollte 
+4 herauskommen. So kann man also nicht rechnen! 

Man nenntdieseArtder Zahlendarstellung übrigens»signed 
binary«-Format, also in Deutsch: markierte Binärzahlen, 

b) Der nächste Schritt ist das sogenannte Einerkomplement. 
Dabei tritt für die positiven Zahlen keine Änderung ein. Die 
negativen entstehen aus den positiven durch Komplement¬ 
bildung, das heißt jedes Bit der positiven Zahl wird in sein 
Gegenteil verkehrt, wie es das folgende Beispiel zeigen soll: 

0000 1100 ist+ 12, 
dann ist das Einerkomplement: 

1111 0011 =— 12 . 



Interessanterweise taucht hier auch wieder das Merkmal 
der »signed binary«-Zahlen auf: die 1 in Bit 7 bei negativen 
Zahlen. Beschränkt man sich auf den Zahlenbereich, der für 
die »signed binary«-Zahlen gültig war, dann hätten wir jetzt 
beide Darstellungsweisen miteinander vereint. Nun müssen 
wir natürlich noch feststellen, ob man so auch rechnen kann. 
+8 0000 1000 

-6 1111 1001 

in Einerkomplementdarstellung 


ergibt (1)0000 0001 

was 1 mit einem Übertrag ergäbe, jedenfalls nicht 2, wie es 
sich gehört. Also ist auch die Einerkomplementdarstellung 
noch nicht das Gelbe vom Ei. 

c) Ich will Sie nicht länger auf die Folter spannen: Wenn man 
zum Einerkomplement einer Zahl noch 1 dazuzählt, erhält 
man das Zweierkomplement. Und genauso werden negative 
Zahlen in unserem Computer gehandhabt. Die positiven Zah¬ 
len bleiben unverändert. Von den negativen bildet man das 
Zweierkomplement wie zum Beispiel hier mit der Zahl —12: 
12 0000 1100 normale Binärdarstellung 

—12 1111 0011 Einerkomplement 
+ 1 0000 0001 addieren 


—12 11110100 Zweierkomplement 


Jetzt wollen wir auch diese Zahlenart ausgiebig testen: 
Wir rechnen nochmal 8-6: 

+ 8 0000 1000 

—6 11111010 das ist—6 in der 

Zweierkomplementdarstellung. 


ergibt 

1 i ’ 0000 0010 

also 2 mit einem Übertrag, der ignoriert wird. Das Ergebnis 
ist richtig. Wenn bei einer solchen Rechnung eine negative 
Zahl herauskommt, ist sie nicht leicht zu erkennen. In solchen 
Fällen kehrt man das Vorzeichen um, indem man das Zweier¬ 
komplement berechnet. Das machen wir mal am Beispiel 
5—6: 

+ 5 0000 0101 

—6 11111010 das ist wieder unser Zweier¬ 
komplement von 6, also —6 

ergibt 1111 1111 

das ist —1 in der Zweierkomplementdarstellung. Zur Kon¬ 
trolle nun die Vorzeichenumkehr durch Umrechnen ins Zwei¬ 
erkomplement: 

Einerkomplement davon 0000 0000 
plus 1 0000 0001 


ergibt 0000 0001 

also wie erwartet +1. 

Auf diese Weise rechnet unser Computer mit negativen 
Zahlen. Negative ganze Zahlen speichert er im Zweierkomp¬ 
lement-Format. Auch wenn wir nun etwas vorgreifen müssen, 
wollen wir uns das ansehen. Dazu schalten Sie am besten 
erst einmal den Computer aus und laden dann den SMON 
beziehungsweise ihren Assembler. Dann bauen wir ein klei¬ 
nes Basic-Programm: 

10 A%=—12 
20 END 


14. Wie Variable im Speicher stehen 


Noch nicht RUN eingeben! Zuerst schalten Sie den Maschi- 
nensprachmonitor ein und wir sehen uns das Programm so 
an, wie es im Speicher steht. Der Basic-Speicher des C 64 
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beginnt im Normalfall bei $0800. Wir geben also den Moni¬ 
torbefehl M 0800. 

Uns genügen schon die Speicherplätze bis $081C. Nun 
sehen wir das nackte Basic-Programm im Speicher, so wie es 
uns C. Sauer in seinem Artikel »Der gläserne VC 20, Teil 1« 
im 64’er, Ausgabe 9/84 auf Seite 156 beschrieben hat. 

In Bild 8 ist unser Speicherinhalt kommentiert zu sehen. 
Das Programm endet im Speicherplatz $0813. Das Kennzei¬ 
chen für Programmende sind zwei aufeinanderfolgende 
Bytes mit dem Wort Null. Dahinter werden die Variablen abge¬ 
legt, sobald das Programm gestartet wird. Wir steigen aus 
dem Monitor durch X aus und starten das Programm mit RUN. 
Jetzt sehen wir nochmal in den Speicher. Bis $0813 hat sich 
nichts verändert. Danach aber ist jetzt in 7 Bytes die Variable 
A% abgelegt. Das zeigt Bild 9. 

Zunächst einmal die Bytes $0814 und $0815: Hier wird 
der Variablenname und -typ angegeben. Der Typ ist aus den 
Bits 7 zu erkennen. Sind beide (wie hier) gleich 1, dann han¬ 
delt es sich um eine Integervariable (also eine ganze Zahl). 
Läßt man die Kennbits außer acht, zeigt sich, daß in $0814 
der Code für den Buchstaben A steht und $0815 nur den 
Wert 0 enthält. Nun zum Rest: Der C 64 legt Integers in nur 
2 Byte ab - die restlichen 3 Byte $0818 bis $081A bleiben 
unbenutzt. Das ist auch dann der Fall, wenn danach noch wei¬ 
tere Variable kommen. Es bringt also keine Speicher¬ 
ersparnis (VC 20-Benutzer aufgepaßt!), wenn man mit Ganz- 
zahlvariablen arbeitet! 

In $0817 steht $F4, welches binär ausgedrückt 1111 
0100 ist. Das kennen wir noch von weiter oben als die —12 
im Zweierkomplement-Format. Woher kommt $FF in Spei¬ 
cherzelle $0816? Wie gesagt, die Integers werden in 2 Byte 
gespeichert, und wenn wir —12 in 16 Bit ausdrücken, dann 
sieht das so aus: a 

+ 12 0000 0000 0000 1100 

Einerkomplement: 1111 1111 1111 0011 

plus 1 0000 0000 0000 0001 


ergibt—12: 1111 1111 1 111 01 Op 

MSB LSB 

als 16-Bit-Zweierkomplement. - $ FF: -$F4 

Die größte positive ganze Zahl, die man in 2 Byte aus¬ 
drücken kann, ist 32767, was binär 
0111 1111 1111 1111 
ergibt. Die kleinste ist 

1000 0000 0000 0000 

also —32760. Das isl üer Grund üa(ür, daß Oer C 04 Integers 
größer als 32767 oder kleiner als —32767 dankend mit 
ILLEGAL QUANTITY ERROR ablehnt, wenn sie als Argument 
verwendet werden. (Die Zahl —32768 kann als Ergebnis von 
logischen Operationen auftauchen.) 


Damit will ich Sie erstmal von den Zahlenspielereien erlö¬ 
sen. Sie können die Art des Abziehens von Zahlen durch 
Addieren des Zweierkomplementes bis zum nächsten Mal an 
weiteren Beispielen üben. Wenn Sie das mit 16-Bit-Zahlen 
tun, werden Sie bald feststellen, daß noch nicht alles so funk¬ 
tioniert wie es sollte... 

Wir können jetzt übrigens auch das Rätsel lösen, weshalb 
bei positiven Zahlen (zum Beispiel LDA # FF) die Negativ- 
Flagge auf 1 geht: Die Flagge wird immer dann gezückt, wenn 
eine Zahl auftritt, die in Bit 7 eine 1 aufweist. Ganz einfach, 
gell? 

15. Ein wirkungsvolles Zweiglein: BNE 


Vermutlich raucht Ihnen nach soviel Zahlensalat der Kopf. 
Deshalb sollen Sie zur Entspannung noch einen neuen 
Assembler-Befehl kennenlernen und auch gleich ein nützli¬ 
ches Programmbeispiel dazu. 

BNE heißt »Branch if Not Equal zero«, was man übersetzen 
kann mit »verzweige, wenn ungleich Null«. Genauer gesagt: 
Es wird dann verzweigt - also zu einer angegebenen Adresse 
gesprungen —, wenn die Z-Flagge (die haben wir bei den 
INX.DEX...-Befehlen genauer untersucht) nicht gesetzt ist, 
also 0 zeigt. Sehen wir uns das mal an der nachfolgenden 
Verzögerungsschleife an, deren Flußdiagramm Bild 10 zeigt. 

Das Programm dazu: 


1500 

LDX #FF 

1502 

LDY #FF 

1504 

DEY 

1505 

BNE 1504 

1507 

DEX 

1508 

BNE 1502 

150A 

BRK 


Zunächst einmal werden das X- und das Y-Register als Zäh¬ 
ler initialisiert (also mit einem Ausgangswert geladen). Mit 
dem vorhin behandelten Befehl DEY wird dann das Y-Regi¬ 
ster um 1 heruntergezählt, was jetzt $FE ergibt. Für die Null¬ 
flagge (Z) bedeutet das den Inhalt 0, denn es liegt kein Grund 
vor, sie zu setzen (also eine 1 dort anzuzeigen), weil noch 
keine Null aufgetreten ist. Bei der nachfolgenden Prüfung 
durch BNE wird also eine Verzweigung nach 1504 das Er¬ 
gebnis sein, worauf das Y-Register weiter verringert und dann 
die Z-Flagge erneut geprüft wird und so weiter. Das geht so 
lange, bis nun wirklich endlich die Null im Y-Register erreicht 
Ist. In diesem Fall zahlt DEX nun das X-rtegister herunter und 
der nächste BNE-Befehl führt zum Sprung nach 1502, wo 
das Y-Register wieder auf $FF gesetzt wird. Auf diese Weise 
wird die äußere Schleife 255mal und die innere 65025mal 
durchlaufen. 
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Sie haben beim Eingeben des Programmes vermutlich 
etwas gestutzt, als der Assembler nach dem BNE 1504 als 
nächste Adresse statt dem erwarteten 1508 eine 1507 aus¬ 
gegeben hat. Der Befehl sieht zwar wie ein 3-Byte-Befehl 
aus, ist aber nur ein 2-Byte-Befehl! Das liegt an der speziellen 
Art der Adressierung von solchen Branch-Anweisungen: Der 
sogenannten relativen Adressierung, die wir aber erst später 
mit den anderen Branch-Befehlen behandeln werden. 

Wenn Sie das Programm mit G 1500 starten, werden Sie 
- obwohl alles in Maschinensprache schnell läuft - eine merk¬ 
liche Verzögerung feststellen, bevor die Registeranzeige auf¬ 
taucht. Noch längere Verzögerungen lassen sich ohne weite¬ 
res erreichen, indem man mehr Schleifen ineinanderschach- 
telt. Dabei verwendet man dann den DEC-Befehl. 

In der Tabelle 2 sind auch die Zyklen angegeben, die die 
neu gelernten Befehle zur Abarbeitung benötigen. Mit sol¬ 
chen Angaben lassen sich recht genau definierte Zeiten ein¬ 



Bild 10. Flußdiagramm zur Verzögerungsschleife 



stellen, in denen der Computer nichts anderes tut als durch 
das Programm zu flitzen. Wozu das dient, braucht wohl kaum 
noch gesagt werden: Wenn Sie zum Beispiel einen Text auf 
dem Bildschirm lesen wollen, bevor das Programm weiter¬ 
läuft oder wenn Sie mit Peripherie arbeiten, die langsamer als 
das Programm ist oder... Allerdings muß noch gesagt werden, 
daß es noch elegantere Methoden zur Verzögerungs-Pro¬ 
grammierung gibt als das Lahmlegen des Computers, aber 
dazu kommen wir erst später. 


16. Herr Carry und der V-Mann 


Neun neue Befehle haben wir bisher kennengelernt und wir 
wissen nun, wie unser Computer ganze Zahlen (sogenannte 
Integers) abspeichert. Zur Erinnerung: Das geschieht im 
Zweierkomplement-Format. Das Bit 7 einer 8-Bit-Zahl dient 
dabei als Vorzeichen-Merkmal: Wenn es 0 ist, liegt eine posi¬ 
tive Zahl vor, die genauso aussieht, wie wir bislang immer 
Binärzahlen kannten. Ist das Bit 7 aber eine 1, dann haben wir 
es mit einer negativen Zahl in der Zweierkomplement-Darstel- 
lung zu tun. Wenn wir - wie unser Computer - zur Verarbei¬ 
tung ganzer Zahlen 16 Bits (also 2 Bytes) verwenden, dann ist 
eben Bit 15 anstelle von Bit 7 das Vorzeichenbit. 

Wenn Sie ein bißchen mit solchen Zahlen gerechnet haben, 
konnten Sie sicher feststellen, daß zwar oft das richtige 
Ergebnis herauskam - aber leider nicht immer. 

Keine Angst, wir sind nicht ins Krimi- oder Agentenmilieu 
gewechselt! Wir haben es mit zwei Flaggen zu tun, der Carry- 
und der V-Flagge. »To carry« heißt auf deutsch etwa »tragen«. 
In der Registeranzeige ist diese Flagge immer mit C gekenn¬ 
zeichnet. 1 "las wird denn hier getragen? Das ergründen wir am 
besten an einem Beispiel. Dazu rechnen wir mit normalen 
Binärzahlen (also ohne Rücksicht auf Vorzeichenbits). Wir 
zählen die Zahlen 128 und 130 zusammen: 

128 10000000 
+ 130 + 10000010 


258 (1)00000010 

Das Ergebnis 258 ist richtig - auch in der Binärdarstellung 
- nur es paßt nicht mehr in 8 Bits. Ein Bit wurde überTRAGEN 
in ein extra dafür vorgesehenes Plätzchen: In das Carry-Bit. 
Jedesmal also, wenn so ein Übertrag in einer Rechenopera¬ 
tion des C 64 stattfindet, zeigt die Carry-Flagge eine 1 (Bild 
11 ). 

Je nach Art der von uns programmierten Aufgabe können 
wir nun dieses Carry-Bit weiterverarbeiten. Es gibt Situatio¬ 
nen, in denen man es einfach ignorieren darf (dazu kommen 
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Bild 11. Das Carry-Bit als Bit 8 einer Rechenoperation 


wir gleich noch) oder aber solche, wo man es weiter in der 
Rechnung verwendet. Schließlich kann es auch noch einen 
Fehler anzeigen: Dann nämlich, wenn das größte zulässige 
Ergebnis 1111 1111 sein darf. Natürlich kann das Carry-Bit 
auch gesetzt werden, wenn man in der Zweierkomplement¬ 
form rechnet. Die Verhältnisse sind dann aber für ein leicht 
überschaubares Beispiel des Übertrages zu verwickelt, wie 
Sie gleich sehen werden. 

Wenn wir nämlich mit den Zweierkomplement-Zahlen 
rechnen, dann interessieren uns auch Fälle wie bei der Addi¬ 
tion von 64 und 66: 

64 01000000 

+ 66 +01000010 


Der andere Fall tritt auf bei der Addition von zwei negativen 
Zahlen wie -125 und -64: 

-125 10000011 

- 64 11000000 


( + 67) (1)01000011 

Auch das ist offensichtlich falsch: Es hat wieder »verse¬ 
hentlich« ein Vorzeichenwechsel stattgefunden. Dies ist also 
der Fall, wo zwar ein Übertrag ins Carry-Bit stattfand aber kein 
Übertrag von Bit 6 nach Bit 7. Auch dieses Problem läßt sich 
durch Verwendung von 16-Bit-Zahlen lösen. Eine kleine Trai¬ 
ningsaufgabe für Sie! 

Man kann also sagen: Immer dann, wenn bei 8-Bit-Rech- 
nungen der mittels Zweierkomplementzahlen darstellbare 
Bereich (127 bis -128) über- oder unterschritten wird, fuhr¬ 
werkt man im Vorzeichen-Bit herum und verfälscht das 
Ergebnis. Dann leuchtet wie eine rote Ampel die Überlauf(V)- 
Flagge auf und sagt uns, daß wir besser in diesen Fällen mit 
16-Bit-Zahlen arbeiten sollten. 

Nun noch zum Ignorieren des Carry-Bits, das ich weiter 
oben erwähnt habe. Bei allen 8-Bit-Rechenoperationen mit 
Zweierkomplementzahlen kann das Carry-Bit vernachlässigt 
werden. Zwei Beispiele sollen das wieder illustrieren. Wir 
addieren +4 und -2: 


(-126) 10000010 

Das ist offensichtlich falsch. Bei der Addition ist durch das 
Zusammenzählen der Bits 6 plötzlich Bit 7 gesetzt worden. 
Da wir es aber mit einer Zweierkomplementzahl zu tun haben, 
bei der dieses Bit 7 eine negative Zahl anzeigt, folgt ein Feh¬ 
ler. Es ist also von Bedeutung, so einen Überlauf (englisch: 
’overflow') erkennen zu können um eine entsprechende pro¬ 
grammtechnische Reaktion zu starten. Es wird die Überlauf- 
Flagge V auf 1 gesetzt. Leider ist die Sache aber nicht so ein¬ 
fach, daß sie immer gesetzt würde, wenn von Bit 6 nach Bit 7 
ein Übertrag stattfindet. Gesetzt wird diese V-Flagge nur in 
folgenden zwei Fällen: 

1) Es findet ein Übertrag von Bit 6 nach Bit 7 statt, aber kein 
äußerer Übertrag (wie beim Carry) 

2) Es findet kein interner Übertrag von Bit 6 nach Bit 7 statt, 
aber ein äußerer Übertrag passiert. 

Merken kann man sich das am besten so: Immer dann, 
wenn gewissermaßen das Vorzeichenbit 7 »versehentlich« 
verändert wurde, wird die V-Flagge auf 1 gesetzt. Das ist ein 
harter Brocken! Wir sind es ja gewohnt, daß wir uns um diese 
Dinge beim Computer eigentlich gar ment mehr kümmern 
müssen. Außerdem würde das ja erfordern daß man sich bei 
allen Operationen vorher überlegen muß, welche Fehler also 
durch »versehentliches« Vorzeichenändern passieren kön¬ 
nen! Genauso ist es - in der Programmierpraxis wird Ihnen 
aber das ganze Problem nicht mehr so groß Vorkommen. Wir" 
wollen uns dieses Zusammenspiel der Überträge 1 von Bit 6 
nach Bit 7 und von Bit 7 nach Bit 8 (also in Carry-Bit) hpeh 
anhand einiger Beispiele klarer machen. 

Im obigen Beispiel der Addition von 64 und 66 haben wir 
einen Fall schon behandelt: Es fand ein Übertrag von Bit 6 
nach Bit 7 statt, aber kein äußerer Übertrag in Carry-Bit. Des¬ 
wegen wurde dann auch die V-Flagge gesetzt. Das Problem 
läßt sich hier ganz einfach lösen zum Beispiel durch Verwen¬ 
dung von 16-Bit-Zahlen: 

64 0000000001000000 

+ 66 + 0000000001000010 


130 0000000010000010 

Bei 16-Bit-Zahlen ist ja Bit 15 das Vorzeichenbit, welches 
hier keine Änderung erfährt. 


+4 00000100 

+ -2 + 1111 1110 

+ 2 (1)00000010 

Das Carry-Bit wird außer acht gelassen. Anderes Beispiel: 
Wir addieren zwei negative Zahlen, -4 und -6: 

-4 11111010 

+ -2 + 11111110 

-6 ( 1)1111 1000 

Auch hier kann man (sogar: muß man) das Carry-Bit ver¬ 
nachlässigen. Beide Ergebnisse sind richtig. 

Nun wissen Sie alles über die Art, wie unser Rechner mit 
ganzen Zahlen arbeitet. Probieren Sie mal ein paar Aufgaben 
aus zur Übung. 

Wir verlassen jetzt den Zahlendschungel und widmen uns 
der Praxis. 


17. Der Computer rechnet: ADC, CLC 


ADC ist der erste Arithmetik-Befehl des 6502 (und natürlich 
auch des 6510), den wir kennenlernen. Er bedeutet »ADd 
with Carry«, also »addiere mit Carry-Bit«. An einem 8-Bit- 
Beispiel wollen wir uns das mal ansehen. ZAHL1 und ZAHL2 
sollen addiert werden. Beide sollen positive 8-Bit-Zahlen 
sein, die so klein sind, daß kein Überlauf zu erwarten ist. Die 
ZAHL1 wird in den Akku gegeben: 

LDA #ZAHL1 
Wenn wir nun den Befehl 

ADC #ZAHL2 

folgen lassen, sorgt die ALU (arithmetisch-logische Einheit, 
siehe Folge 1) dafür, daß beide Zahlen addiert werden und das 
Ergebnis im Akku erscheint. ZAHL1 ist dann vom Ergebnis 
überschrieben worden. An sich ist damit alles erledigt. Weil 
wir aber häufig wissen wollen, was denn nun bei der Addition 
herausgekommen ist, speichern wir den Akku-Inhalt noch 
irgendwo ab mittels »STA Speicherstelle«. Außerdem war da ja 
noch die Sache mit dem Carry-Bit. Wir haben oben festge¬ 
stellt, daß bei einer 8-Bit-Addition kein Carry-Bit berücksich- 
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tigt werden soll. Nun gibt es aber eine ganze Menge von Vor¬ 
gängen in einem Assembler-Programm, die das Carry-Bit 
beeinflussen. Man kann eigentlich vor einer Addition nie ganz 
sicher sein, ob es denn nun 1 oder 0 ist. Weil jedoch ADC 
auch das Carry-Bit mitaddiert, sollte man dafür sorgen, daß es 
vor dem Zusammenzählen wirklich gelöscht ist. Dazu gibt es 
den Befehl CLC was die Abkürzung für »CLear Carry«, also 
»lösche Carry-Bit« ist. Sei ZAHL1 = 12 und ZAHL2 = 7, dann 
würde unser vollständiges 8-Bit-Additions-Progrämmchen 


also lauten: 



1200 

CLC 


1201 

LDA 

#$0C 

1203 

ADC 

#$07 

1205 

STA 

1500 


Sehen wir mal davon ab, daß dieses Programm natürlich 
unsinnig ist (das kann man ja im Kopf schneller rechnen!), 
dann erkennen wir: CLC ist ein I-Byte-Befehl mit impliziter 
Adressierung, welcher sich nur auf die C-Flagge (also das 
Carry-Bit) auswirkt. ADC ist in der hier verwendeten Form ein 
2-Byte-Befehl und liegt in der »unmittelbar« genannten 
Adressierung vor. Wie wir oben gesehen haben, kann ADC - 
je nach Art der Rechnung - auf einige Flaggen wirken: Da 
wären zunächst natürlich die V-Flagge und die C-Flagge. 
Dann aber kann beim Auftreten eines gesetzten Bit 7 auch die 
N-Flagge und beim Überschreiten von $FF eventuell auch die 
Z-Flagge verändert werden. 

Viel interessanter wird unser Mini-Programm schon, wenn 
man anstelle von 

1201 LDA #$0C 

jetzt die absolute Adressierung verwendet, zum Beispiel 
1201 LDA 1400 

Weil das ein 3-Byte-Befehl ist, verschiebt sich natürlich der 
Rest des Programmes um 1 Byte. So kann man immerhin 
schon zu unterschiedlichen Inhalten von 1400 den gleichen 
Betrag addieren. 

Am interessantesten allerdings ist die Tatsache, daß auch 
ADC absolut adressierbar ist. Wir können so zum Beispiel den 
Inhalt der Speicherzelle 1300 zum Inhalt der Zeile 1400 hin¬ 
zuzählen und dann das Ergebnis in 1500 ablegen: 


1200 

CLC 


1201 

LDA 

1400 

1204 

ADC 

1300 

1207 

STA 

1500 


Hier ist der ADC-Befehl dann 3 Byte lang geworden. 

Vergessen Sie bitte nicht - das gilt vor allem für die nachfol¬ 
genden Rechenoperationen - dann, wenn die Wahrschein¬ 
lichkeit besteht, daß der Dezimal-Modus eingeschaltet ist 
(also die D-Flagge auf 1 gesetzt ist), noch den Befehl CLD vor 
solche Programme zu stellen. 

Solche 8-Bit-Rechnungen kommen recht häufig vor: Wenn 
man in Schleifen nicht mit mehrfach wiederholten INX (bezie¬ 
hungsweise INY oder INC, DEX, DEY oder DEC) arbeiten will, 
addiert man eben immer die Sprungweite mittels ADC hinzu. 
Der Akku kann nicht als Zähler dienen, denn es gibt für ihn kei¬ 
nen Befehl, der dem INX und so weiter vergleichbar wäre, 
weswegen man ihn - sollte es nötig sein - mittels ADC 
hochzählt. 

Häufiger und in der Praxis bedeutender sind 16-Bit-Rech- 
nungen. Wie Sie sicher noch aus den vorangegangenen Fol¬ 
gen wissen, teilt man so eine T6-Bit-Zahl auf in zwei Byte (das 
LSB und das MSB). Nehmern wir für unser nachfolgendes 
Beispiel wieder an, daß die Zahlen so gebaut sind, daß kein 
Überlauf zu befürchten ist. ZAHL1 hätten wir vorher in die 
Speicherstellen 1300 (LSB) und 1301 (MSB) gepackt, 
ZAHL2 liegt in den Zellen 1400 (LSB) und 1401 (MSB). 
Zunächst wieder die Vorbereitungsmaßnahmen: 

1200 CLD 

1201 CLC 



Dabei ist CLD nicht immer nötig, wie schon gesagt. Nun 
addieren wir zuerst die LSBs: 


1202 

LDA 

1300 

1205 

ADC 

1400 

1208 

STA 

1500 


Ein Überlauf kann hier nicht stattgefunden haben, denn das 
Vorzeichenbit ist ja im MSB als Bit 15 enthalten, wohl aber 
kann ein Übertrag stattgefunden haben: Das Ergebnis könnte 
größer als 2 55 ($FF) gewesen sein. War das der Fall, dann ist 
jetzt eine 1 im Carry-Bit. Wir addieren nun die MSBs: 

120 BLDA 1301 

120 EADC 1401 

1211 STA 1501 

Egal, was im Carry-Bit stand: Es wurde jetzt hinzuaddiert. 
Das Ergebnis unserer Rechnung steht nun in 1500 (LSB) und 
1501 (MSB). Sehen wir uns das ganze nochmal am Zahlen¬ 
beispiel an. Wir addieren die Zahlen 2176 (binär: 0000 1000 
1000 0000) und 1009 (binär: 0000 0011 1111 0001). Die 
Speicherinhalte sind dann: 

1300 10000000 LSB Zahll 

1301 00001000 MSB 

1400 11110001 LSB Zahl2 

1401 00000011 MSB 
Jetzt addieren wir die LSBs: 

1300 10000000 

1400 11110001 

Carry 0 


1500 01110001 

Carry: 1 

Nun folgt der zweite Teil der Addition mit den MSBs: 
Lin$9* . | 00001000 

1401 00000011 

Carry: 1 


1501 00001100 

Damit steht nun das Ergebnis 3185 (binär 
000011000111 0001) säuberlich aufgeteilt in LSB (Spei¬ 
cher 1500) und MSB (Speicher 1501) fest. Das Carry-Bit 
steht auch nach vollendeter Rechnung noch auf 1, so daß es 
vor erneuter Addition wieder mit CLC zu löschen ist. 

Damit wäre alles über die Addition berichtet. Wie immer in 
Programmiererkreisen die Empfehlung: üben, üben,.... 

Wir wenden uns jetzt der gegenläufigen Operation zu: der 
Subtraktion. 



18. Noch mehr Rechnen: SBC, SEC 


Daß das Abziehen von Zahlen im Computer durch das Hin¬ 
zuzählen des Zweierkomplementes geschieht, haben wir mit 
viel Gehirnschmalzverbrauch schon in vorangegangenen 
Abschnitten erfahren. Nun sollen Sie die dazu nötigen 
Befehlsworte des Assemblers kennenlernen. Zunächst ein¬ 
mal ist da SBC. Das heißt »SuBtract with Carry« oder auf 
deutsch etwa »ziehe unter Berücksichtigung des Carry-Bits 
ab«. Ebenso wie bei der Addition mit ADC, wirkt das Argument 
des SBC-Befehls auf den Akku-Inhalt ein - wobei das Ergeb¬ 
nis im Akku landet, diesen also überschreibt. Komplizierter ist 
hier die Verwendung des Carry-Bits, worauf wir aber nicht 
detailliert eingehen wollen. (Wen es interessiert: Nachlesen 
in L.A. Leventhal, »6502 Programmieren in Assembler«, 
3. Auflage, München 1983, Seite 3-100). Für uns soll einfach 
die nicht ganz korrekte Analogie zum »Borgen« bei der Sub¬ 
traktion ausreichen. Für den Fall, daß ein solches Borgen ein- 
treten muß, sollte auch das dazu nötige Carry-Bit vorhanden 
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sein (also auf 1 gesetzt sein). Wie Sie sicherlich schon er¬ 
raten haben, heißt SEC »SEt Carry«, also »setze das Carry- 
Bit« (auf 1). 

Merke: Vor einer Addition immer Löschen des Carry-Bits 
mit CLC, 

vor einer Subtraktion immer Setzen des Carry-Bits mit 
SEC! 

Zwei Beispiele für die Subtraktion sollen das bisher 
Gesagte erläutern: Zunächst eine 8-Bit-Subtraktion von 
ZAHL1 (in Speicherzellle 1300) minus ZAHL2 (in Zelle 
1400). Das Ergebnis wird nach 1500 geschrieben: 

1200 CLD 

1201 SEC 

1202 LDA 1300 

1205 SBC 1400 

1208 STA 1500 

SBC kann - wie hier - absolut adressiert werden, aber auch 
unmittelbar (also zum Beispiel SBC #$40). Der Befehl ist 
dann im ersten Fall ein 3-, im anderen Fall ein 2-Byte-Befehl. 
SEC ist ebenso wie vorher schon CLC ein implizit adressier¬ 
barer 1-Byte-Befehl. 

Das zweite Beispiel ist eine 16-Bit Subtraktion. In den Spei¬ 
chern steht vor dem Aufruf dieser kleinen Routine: 

1300 ZAHL1 LSB 

1301 ZAHL1 MSB 

1400 ZAHL2 LSB 

1401 ZAHL2 MSB 

Das Ergebnis soll nach 1500 (LSB) und 1501 (MSB) 


gebracht werden: 


1200 

CLD 


1201 

SEC 


1202 

LDA 

1300 

1205 

SBC 

1400 

1208 

STA 

1500 


Jetzt sind die beiden LSBs voneinander abgezogen und die 
Differenz abgespeichert als LSB des Ergebnisses. 


1 20B 

LDA 

1301 

120E 

SBC 

1401 

1211 

STA 

1501 


Damit ist die Aufgabe beendet. Auch die MSBs sind subtra¬ 
hiert und das MSB des Ergebnisses steht in 1501. 

SBC beeinflußt die gleichen Flaggen wie der Befehl ADC. 


19. Ein Programmprojekt 


Damit die so kennengelernten Arithmetik-Befehle nicht so 
trocken auf weiter Flur stehen, wollen wir nun ein Programm 
entwickeln, aus dem zweierlei zu lernen ist: 

1) Die Anwendung bisher gelernter Befehle und 

2) ein häufig angewendetes Verfahren, Assemblerpro¬ 
gramme in Basic-Programme einzubinden. 

Besonders dieser zweite Aspekt scheint noch vielen 
Lesern unklar zu sein (das zeigen mir Zuschriften). Es gibt 
eine ganze Reihe von Möglichkeiten, zum Einbau von 
Assembler-Routinen in Basic-Programme; die werden wir alle 
nach und nach kennenlernen. Von Ihnen wurde der SYS- 
Befehl sicherlich schon häufig angewendet (zum Beispiel für 
SYS 58640 und vorherigem POKE214,Zeile und POKE211, 
Spalte zum Setzen des Cursors an die Stelle Zeile, Spalte). 
Damit haben Sie ein Maschinenprogramm aufgerufen, das im 
System unseres Computers schon enthalten ist. 58640 ist 
die Startadresse des Programmes und man kann diesen SYS- 
Befehl eigentlich wie eine Art »GOTO Maschinenprogramm- 
Startadresse« ansehen. Nichts hindert uns also, auf diese 


Weise eigene Assembler-Programme anzuspringen! Das 
Problem liegt nun nur noch darin, wie man Parameter, die 
unsere Maschinenroutine benötigt, übergeben kann. Eine 
offensichtliche - aber leider auch relativ langsame - Methode 
ist das POKEn der Werte im LSB/MSB-Förmat in die Spei¬ 
cherzellen, aus denen sie sich unser ML-Programm dann 
abholt. Wir wollen dieses Verfahren nun an einem Programm¬ 
beispiel verwenden. 

Eine arithmetische Reihe werden viele von Ihnen schon 
kennen. Wenn man A als erstes Glied, D als Differenz und N 
als die Anzahl der Glieder bezeichnet, dann ist die Summe 
einer solchen Reihe: 

S=A+(A+D) + (A+2*D) +.+ (A+(N-1)*D) 

Ein Beispiel ist die Summe der ersten zehn ganzen Zahlen: 

S=1+2+3+4+5+6+7+8+9+10 

Hier ist A=1, D=1 undN = 10. Daß die Summe S im Beispiel 
55 ist, kann man schnell berechnen, was aber, wenn wir 
wesentlich mehr als nur zehn Glieder haben? Es gibt natürlich 
auch Formeln zur Berechnung von S. Aber eigentlich ist es 
ganz reizvoll, ohne solche Formeln den Computer die Summe 
bilden zu lassen. Wir bauen also ein Programm zur Berech¬ 
nung der Summe der ersten N ganze Zahlen, wobei N frei 
gewählt werden kann. Das Ergebnis soll eine 16-Bit-Zahl sein, 
also nicht größer als 32767. Das beschränkt uns bei N auf 
Werte von 1 bis 255 (Warum, können Sie ja mal mit dem ferti¬ 
gen Programm ausprobieren). N benötigt also nur 1 Byte 
Speicherplatz und soll in $1300 abrufbar sein. A soll 1 sein 
ebenso wie D. Für eventuelle Programmänderungen ist es 
aber sinnvoll, A und D als 16-Bit-Zahlen aufzubewahren und 
zwar in $1310/1311 (A in LSB/MSB-Förmat) und in 
$1320/1321 (D im gleichen Format). Das Ergebnis soll in 
$1400/1401 zu finden sein. Das Maschinenprogramm legen 
wir r.aJi $1200. 

Zuerst kümmern wir uns um das Basic-Aufrufprogramm: 

Zu diesem Programm gibt es nur noch zu bemerken, daß 
die Zahlen bei POKE, PEEK oder SYS die Dezimalwerte unse¬ 
rer oben gewählten Adressen sind. 

Nun endlich zum Assemblerprogramm. Sehen Sie sich 
dazu bitte das Flußdiagramm im Bild 12 an. 

Wir bereiten den Ablauf vor, indem wir aus $1300 die 
Anzahl der Glieder ins X-Register laden und zur Vorbereitung 
der Addition das Carry-Bit löschen. Schalten Sie also bitte 
den SMON ein und tippen Sie AI 200 < RETURN >. Es 
erscheint die Startadresse 1200. Jetzt können Sie Zeile für 
Zeile das Assembler-Programm eingeben (nach jeder Zeile 

ein RETURN, das die nächste Zeilennummer erzeugt): 

1200 LDX 1300 

1203 CLC 

Die nächsten sechs Zeilen summieren jeweils das neueste 
Glied zur bis dahin erzeugten Summe. Jetzt zu Beginn ist 


10 REM * ‘AUFRUF SUMME ARITHMETISCHE REIHE' * 

20 POKE5120,0:POKE5121,0:REM ERGEBNISSPEICHER AUF 

NULL 

30 PRINTCHR$(147)CHR$(17)CHR$(17) 

40 INPUT’ANZAHL DER GLIEDER N=";N 
50 IFN< 1 OR N>255 THEN PRINTCHR$(17)"1 <=N 
< = 255"':GOTO40 

60 POKE4864,N:REM EINSPEICHERN VON N 
70 POKE4880,1:POKE4881,0:POKE4896,1: 

POKE4897,0:REM EINSPEICHERN VON A UND D 
80 SYS4608:REM AUFRUF UNSERES MASCHINEN¬ 
PROGRAMMES 

90 M=PEEK(5121):L=PEEK(5120):REM AUSLESEN DES 

ERGEBNISSES 

100 E=256*M + L:PRINTCHR$(17)CHR$(17) 

110 PRINT "DIE SUMME DER ERSTEN "N" GANZEN ZAHLEN 
IST:”:PRINTE 
120 END 
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$1400/1401 noch leer und in $1310/1311 steht noch das 
Anfangsglied A=1. Später mit Durchlaufen der Schleife, steht 
in $1400/1401 immer die bis dahin gebildete Summe und in 
$1310/1311 das letzte Glied der Reihe. Es handelt sich um die 
oben kennengelernte 16-Bit-Addition: 


1204 

LDA 

1400 

1207 

ADC 

1310 

120 

ASTA 

1400 

Das neue LSB ist berechnet und in $1400 geschrieben. 

1200 

LDA 

1401 

1210 

ADC 

1311 

1213 

STA 

1401 

Das war nun noch das neue MSB. Als nächstes berechnen 
wir das momentan letzte Glied der Reihe durch Addieren von 

D zum alten letzten Glied. Das entspricht dem Basic-Befehl 
A=A+D in einer Schleife. Dies ist eine neue 16-Bit-Addition, 
weshalb wir wieder CLC vorgeben müssen: 

1216 

CLC 


1217 

LDA 

1310 

121 

AADC 

1320 

121 

DSTA 

1310 



Bild 12. Flußdiagramm des Assembler¬ 
programmes »Summe einer arithmetischen Reihe« 


Das war wieder das LSB. Nun zum MSB: 


1220 

LDA 

1311 

1223 

ADC 

1321 

1226 

STA 

1311 


Wir zählen nun das X-Register um 1 herunter und prüfen, ob 
es schon Null geworden ist, ob also schon alle N-Glieder sum¬ 
miert worden sind: 

1229 DEX 

122 ABNE 1203 

Wenn noch nicht alle Glieder berechnet und summiert sind, 
kehren wir an den Schleifenanfanq zurück. Ansonsten sprin¬ 
gen wir zurück ins Basi&Aufrufprqgramm: 

122 CRTS ** 

Wenn Sie beide Programme eingetippt haben, dann spei¬ 
chern Sie sie vorsichtshalber ab (das Assemblerprogramm 
mit dem S-Befehl des SMON). Beim neuen Einladen brau¬ 
chen Sie den SMON nicht mehr. Nach dem Laden unseres 
Maschinenprogrammes (mit ,8,1 bei Diskette oder ,1,1 bei 
Kassette) geben Sie NEW < RETURN > ein, damit die Zeiger 
vor dem Einladen des Basic-Programmes wieder auf Normal¬ 
werte gesetzt werden. Zwischen dem dann qingeladenen 
Basic-Programm und unserer Assembler-Routine ist genug 
Platz. Sollten Sie aber irgendwann mal das Basic-Programm 
vergrößern, schützen Sie bitte unseren Bereich ab $1200. 

Unser Assembler-Beispiel ist so aufgebaut, daß auch A und 
D variabel gehalten sind. Sie müßten dann nur noch 
Eingabemöglichkeiten im Basic-Programm schaffen und 
anstelle der Werte 1 oder 0 in Zeile 70 die LSBs und MSBs 
der von Ihnen eingegebenen Größen A und D einPOKEn. Auf 
diese Weise sind dann beliebige ganzzahlige, arithmetische 
Reihen berechenbar, wie zum Beispiel S=7+10+13+16+... 
und so weiter. Das überlasse ich Ihrer Basic-Programmier- 
fertigkei’ ■ ur eines noch: Sie müssen darauf achten, daß die 
Summe S nicht größer als 32767 wird. Ihrer Phantasie sind 
- wie immer in diesem Metier - keine Grenzen gesetzt. Sie 
könnten sich ja mal überlegen, wie man größere Summen 
zulassen kann (wer sagt denn, daß wir Zahlen immer nur in 
2 Byte darstellen dürfen?). Oder Sie könnten sich überlegen, 
welches eindeutige Merkmal auftritt, sobald der Maximalwert 
überschritten wird (ein Tip: Lesen Sie doch mal den Abschnitt 
über die V-Flagge nach). 


20. Die Branch-Befehle 


Der 6502 (und auch der damit identische 6510) kennt acht 
bedingte Verzweigungen, von denen wir bisher BNE schon 
verwendet haben. Alle diese Branch-Befehle (von branch = 
verzweigen) prüfen Flaggen des Statusregisters. 

BNE und BEQ beziehen sich auf die Z-Flagge, die anzeigt, 
ob im Verlauf der letzten Operation eine Null aufgetreten ist. 
Ist das der Fall, steht in der Z-Flagge eine 1. BNE verzweigt 
zur angegebenen Adresse, wenn in der Z-Flagge eine 0 ent¬ 
halten ist. BEQ (»Branch if EQual zero« = »verzweige, wenn 
gleich Null«) tut das dann, wenn die Z-Flagge auf 1 gesetzt 
ist. Da muß man etwas aufpassen, daß man sich nicht vertut! 

BCC und BCS haben ihre Aufmerksamkeit auf die C- 
Flagge, also das Carry-Bit gerichtet. BCC kommt vom engli¬ 
schen »Branch if Carry Clear«, was heißt: »verzweige, wenn 
das Carry-Bit gelöscht ist«. Ein gesetztes Carry-Bit (also 
lnhalt= 1) veranlaßt BCS (»Branch if Carry Set« = verzweige, 
wenn das Carry-Bit gesetzt ist) zum Sprung an die angege¬ 
bene Adresse. 

Diese vier bedingten Verzweigungen sind an sich die 
bedeutsamsten und am häufigsten verwendeten Branch- 
Befehle. Man kann wohl getrost sagen, daß über 90% der von 
Programmierern verwendeten bedingten Sprünge, damit 
absolviert werden. R. Mansfield warnt sogar ausdrücklich in 


21 











































Kurs 


C 64/VC 20 


seinem Buch »Machine language for beginners«, einem in 
den USA sehr verbreitetem Werk, vor der Verwendung der 
Befehle BPLund BMI! 

Dafür liegt absolut kein einsehbarer Grund vor. Viele pro¬ 
grammtechnischen Aufgabenstellungen lassen sich elegant 
und leicht mit BPL, BMI, BVS und BVC lösen. Man muß nur 
wissen, wie sie funktionieren und - da liegt vermutlich der 
Hund begraben - man muß auch die Art kennen, wie Zahlen 
vom Computer behandelt werden. Genau das aber wissen wir 
und deswegen sollten wir diese Kenntnis für uns auch nut¬ 
zen. Also ohne Scheu heran an dteVerfehmten Befehle! 

BMI und BPL (»Branch, on Mlnys« = »verzweige, wenn 
negativ« und Branch on Pilus« = »verzweige, wenn positiv«) 
hängen mit der Negativ-Flagge N zusammen. Das Rätsel die¬ 
ser Flagge konnte in den vorangegangenen Folgen gelöst 
werden: Immer dann, wenn bei einer Operation eine Zahl auf¬ 
trat, deren Bit 7 eine 1 war, wurde die N-Flagge auf 1 gesetzt. 
Wir wissen jetzt, daß dieses Bit bei 8-Bit-Zahlen das Vorzei¬ 
chenbit ist. Bit 7 sagte uns bei einer 1, daß eine negative Zahl 
im Zweierkomplement-Format vorliegt oder aber überhaupt 
ein Speicherzelleninhalt vorhanden ist, der größer als 0111 
1111 = 127 ist. BMI fyhrtzum Sprung in diesem Fall, weil die 
N-Flaggeauf 1 steht. Andernfalls führt BPL zur Verzweigung. 

Ebenso einfach sind BVS und BVC zu erklären: Sie bezie¬ 
hen sich auf die V-Flagge, unsere rote Ampel, die Überlauf bei 
Rechenoperationen anzeigt. Kann es was bequemeres 
geben zur Behandlung solcher Fehlrechnungen als ein 
»Branch on oVerflow Set« = »verzweige, falls die Überlauf- 
Flagge gesetzt ( = 1) ist« mit BVS? Oder anders herum bei 
BVC »Branch on oVerflow Clear« = »verzweige bei freier 
Überlauf-Flagge«. Wenn man - wie Sie jetzt - weiß, unter wel¬ 
chen Umständen diese V-Flagge auf 1 gesetzt wird, sollte 
man ohne Skrupel BVS und BVC ausgiebig benutzen. Man 
könnte damit zum Beispiel programmieren, daß die Rechen¬ 
genauigkeit automatisch von 16-Bit auf 24- oder 32- (oder 
wie es gerade beliebt) Bit gesteigert wird, ohne daß man sich 
bei jeder Programmaufgabe Gedanken über das größtmögli¬ 
che Ergebnis machen muß. Dazu aber ein andermal mehr. 

Alle hier vorgestellten Branch-Befehle sind ebenso wie 
BNE 2-Byte-Befehle, was an der speziellen Art der Adressie¬ 
rung liegt: Der relativen Adressierung. Tabelle 3 zeigt eine 
Übersicht der neuen Befehle aus den letzten fünf Kapiteln. 


Befehls¬ 

wort 

Adressierung 

Byte¬ 

an¬ 

zahl 

Code 

hex dez 

Dauer 

in 

Takt¬ 

zyklen 

Beeinflussung 
von Flaggen 

ADC 

unmittelbar 

2 

69 

105 

2 








N,V,Z,C 


absolut 

3 

6D 

109 

4 


CLC 

Implizit 

1 

18 

24 

2 

0-C 

SBC 

unmittelbar 

2 

E9 

233 

2 








N.V.Z.C 


absolut 

3 

ED 

237 

4 


SEC 

implizit 

1 

38 

56 

2 

1 -C 

BEQ 

relativ 

2 

FO 


2 

keine Änderung 

BCC 

relativ 

2 

90 


2 

keine Änderung 

BCS 

relativ 

2 

BO 


2 

keine Änderung 

BMI 

relativ 

2 

30 


2 

keine Änderung 

BPL 

relativ 

2 

10 


2 

keine Änderung 

BVC 

relativ 

2 

50 


2 

keine Änderung 

BVS 

relativ 

2 

70 


2 

keine Änderung 


+ 1 bei Verzweigung 
+ 2 bei Überschreiten 
einer Seitengrenze 


21. Die relative Adressierung 


Als wir den BNE-Befehl das erstemal verwendet haben, stell¬ 
ten wir fest, daß zum Beispiel BNE 1200 nicht — wie eigent¬ 
lich zu erwarten war — ein 3-Byte-Befehl, sondern ein 
2-Byte-Befehl ist. Damals mußten wir uns mit der Bemerkung 
zufrieden geben, es läge an der besonderen Art der Adres¬ 
sierung, nämlich der relativen Adressierung. Relativ bedeutet 
ja »bezogen auf etwas«. Wenn wir also beispielsweise BNE 
1200 schreiben, liegt es nur an der Benutzerfreundlichkeit 
des SMON und vieler anderer Assembler, daß dieser die so 
geschriebene absolute Adresse 1200 in die richtige Form, 
nämlich die relative umrechnet. In Wahrheit verlangt der 
6502 (und natürlich ebenso der 6510) eine Angabe darüber, 
wieviele Bytes nach vorne oder hinten im Programm er zur 
weiteren Programmverarbeitung springen (verzweigen) soll. 
Es gilt nun also, zwei Fragen zu klären: 

1. Relativ wozu wird gesprungen und 

2. Wie berechnet sich die Angabe, um wieviele Bytes nach 
vorne oder hinten im Programm der Sprung vollzogen werden 
soll. 

Zur Klärung verwenden wir ein hypothetisches Programm¬ 
segment mit einem Sprungbefehl und sehen uns das Disas- 
semblerlisting an: 


2000 

AD 0030 

LDA 

3000 

2003 

FO 05 

BEQ 

200A 

2005 

A9 00 

LDA 

#00 

2007 

8D 0030 

STA 

3000 

200A 

60 

RTS 



Die? s Programm-Teilchen lädt den Inhalt der Speicher¬ 
stelle 3000 in den Akku, überprüft dann, ob dieser Inhalt Null 
ist und verzweigt beim Vorliegen der Null zum Rücksprung 
(RTS). Ist der Inhalt von 3000 nicht Null, dann wird 3000 auf 
Null gesetzt. 3000 könnte zum Beispiel eine Flagge sein. 

Der Pfad, dem der Computer bei der Abarbeitung des Pro¬ 
grammes folgt, wird durch den Programmzähler vorbereitet. 
Dieser ist dann, wenn der BEQ-Befehl an der Reihe ist, schon 
einen Schritt weiter, nämlich im Programmzähler steht dann 
die Adresse 2005. 

Relativ zu dieser Adresse hat dann der Sprung zu erfolgen. 
Zum Inhalt des Programmzählers muß also die Sprungweite 
(auch häufig Offset genannt) addiert werden. Soweit zur 
Frage 1. 

Zur Klärung von Frage 2 listen wir uns mal Byte für Byte 
unser Programm auf: 


Byte 


Inhalt 

Bedeutung 

2000 


AD 

LDA 

2001 


00 

LSB von 3000 

2002 


30 

MSB von 3000 

2003 


FO 

BEQ 

2004 


05 

Offset 

2005 


A9 

LDA # 

2006 

1 

00 


2007 

2 

8D 

STA 

2008 

3 

00 

LSB von 3000 

2009 

4 

30 

MSB von 3000 

200A 

5 

60 

RTS 


Neben der Byte-Nummer ist noch die Entfernung zu 2005 
geschrieben. Daraus ist deutlich zu erkennen, daß die 
Sprungweite, die zum Programmzähler addiert wird, 05 sein 
muß, wenn der Sprung zum RTS erfolgen soll. Für Vorwärts- 
Verzweigungen gilt also: Von der Adresse des Befehls an, der 
auf den Branch-Befehl folgt, zählt man die Byte-Anzahl bis 
zum Sprungziel. Das Ergebnis ist der Offset. 



Tabelle 3: Die 11 neuen Befehle 
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Nun gibt es genauso häufig Rückwärts-Sprünge. In den bis¬ 
her gezeigten Programmen sind sie mehrmals aufgetreten. 
Wie berechnet man den Offset in diesen Fällen? Sehen wir 
uns wieder das Disassembler-Listing eines solchen Pro¬ 
grammsegmentes an: 


1000 

A2 00 

LDX #00 

1002 

E8 

INX 

1003 

DOFD 

BNE 1002 

1005 

00 

BRK 


Dieses Progrämmchen tut nichts anderes, als das vorher 
auf Null gesetzte X-Register hochzuzählen, bis es über 255 
läuft (dann tritt ja wieder 0 auf!). Solange der Inhalt des 
X-Registers ungleich Null ist, erfolgt ein Sprung zurück bis 
zur INX-Anweisung in Zeile 1002. Erst wenn die Null durch 
den Überlauf aufgetreten ist, endet das Programm mit einem 
BRK in Zeile 1005. 

Wir wissen schon, daß der Programmzähler beim Verarbei¬ 
ten des BNE-Befehls auf 1005 steht. Sehen wir uns auch 
dieses Programm Byte für Byte an: 


Byte 


Inhalt 

Bedeutung 

1000 


A2 

LDX # 

1001 


00 


1002 

3 

E8 

INX 

1003 

2 

DO 

BNE 

1004 

1 

FD 

Offset 

1005 


00 

BRK 


Wieder ist neben der Bytenummer die Entfernung vom 
aktuellen Programmzählerstand angegeben. Wir müssen 
also vom Inhalt des Programmzählers 3 abziehen, um zum 
INX-Befehl in Byte 1002 zu gelangen. Das kennen wir aber 
schon aus den vergangenen Ausgaben: Wenn der Computer 
eine Zahl abzieht, dann addiert er das Zweierkomplement die¬ 
ser Zahl. Hier soll nun 3 subtrahiert werden. Wir berechnen 
das Zweierkomplement: 

3 = 0000 0011 (binär) 

Das Einerkomplement davon ist: 

1111 1100 

Dann wird eine 1 addiert 

1111 1101 

Dies ist das Zweierkomplement. In hexadezimal ausge¬ 
drückt heißt diese Zahl $FD und ist unser Offset. Für 
Rückwärts-Verzweigungon gilt also: Von der auf die Branch- 
Anweisung folgenden Speicherstelle an zählt man die Bytes 
zurück bis zum Sprungziel. Das Zweierkomplement der sich 
dadurch ergebenden Byte-Anzahl ist der Offset. 

Das sieht reichlich kompliziert aus, aber zum einen haben 
Sie ja einen ganz freundlichen Assembler und nur in seltenen 
Notfällen müssen Sie den Offset berechnen. Zum anderen 
gibt es noch eine Faustregel, mit der man sich das ganze ver¬ 
einfachen kann. Die soll durch folgendes Schema erläutert 
werden: 


Byte 

Inhalt 

Offset 

1995 


F9 

1996 


FA 

1997 


FB 

1998 


FC 

1999 


FD 

2000 

BNE 

FE 

2001 

Offset 

FF 

2002 

Program m- 
zählerstand 


2003 


01 

2004 


02 



2005 


03 


Bei Vorwärtssprüngen ist ohnehin alles klar: Bei einem 
Sprung nach Adresse 2005 müßte man in vorliegendem Fall 
einen Offset von 03 eingeben. Bei Rückwärts-Ver- 
zweigungen zählt man einfach von $FF an rückwärts bis zur 
Zieladresse. Eine Verzweigung nach 1996 würde im vorlie¬ 
genden Fall also einen Offset von $FA erfordern. 

Eine Einschränkung der relativen Adressierung können Sie 
nun auch sofort verstehen, wenn Sie an Zweierkomplement¬ 
zahlen denken: Der Offset belegt ein Byte. Die größte posi¬ 
tive Zahl in einem Byte ist 

0111 1111 = +127 = $7F 

und die kleinste negative Zahl ist 

1000 0000 =—128 =($80) 

Es sind keine größeren Vorwärts-Verzweigungen als um 
127 Byte möglich, weil in diesem Fall ein Offset größer als 
$7F, also mit einem Bit 7 gleich 1 nötig wäre, was aber wieder 
als negative Zweierkomplementzahl verstanden und einen 
Rückwärtssprung verursachen würde. Ähnliches gilt anders 
herum: Es ist kein weiterer Rücksprung als um 128 Byte mög¬ 
lich, weil das im Offset zum gelöschten Bit 7 führen würde, 
also zu einem Offset kleiner als $80, was wiederum anstelle 
des Rücksprunges eine Vorwärts-Verzweigung herbeiführen 
würde. 

Darauf sollte man achten beim Erstellen eines Assem¬ 
bler-Programmes, daß man nie weitere Rückwärtssprünge 
als um 128, beziehungsweise Vorwärtssprünge um 127 Byte 
verlangt. Auch wenn man im Assembler gar nicht auf relative 
Adressierung Rücksicht nehmen muß, weil der Assembler 
sich mit den Absolutadressen begnügt, sollte man wissen, 
daß zurr ^iispiel folgende Zeile aufgrund dieser Einschrän¬ 
kung nicht möglich ist: 

3000 BNE 1000 

Die meisten Assembler reagieren auf solch eine Zeile mit 
einer Fehlermeldung (beim Hypra-Ass mit »Branch too far«) 
oder so wie der SMON, der klammheimlich die Programm¬ 
startadresse statt 1000 einsetzt. Aber es ist doch ärgerlich, 
wenn man auf dem Papier ein Programm fertig hat und erst 
beim Eintippen feststellt, daß der Computer das so nicht 
haben will. 


22. Zeropage-Adressierung 


Weil wir nun gerade mit der Adressierung so schön in 
Schwung sind, stelle ich Ihnen noch eine andere vor: Die 
Adressierung der Zeropage. Was ist die Zeropage? Auf 
deutsch heißt das Nullseite. Am besten versteht man das, 
wenn man sich in Erinnerung ruft, wie Adressen in unserem 
Computer verwaltet werden. Da haben wir doch ein LSB 
(Least Significant Byte) und ein MSB (Most Significant Byte), | 
zum Beispiel $1F 04 (mit 1F als MSB und 04 als LSB). Nun 
hat unser C 64 65535 Adressen von $0000 bis $FFFF. Bei 
den ersten 256 Adressen von $0000 bis $00FF ist das MSB 
$00. Man nennt so einen 256-Byte-Block eine Seite (engl, 
page). Weil hier für alle Adressen dieser ersten Seite des 
MSB Null ist heißt sie Nullseite = Zeropage. Messerscharf 
werden Sie schließen, daß man die Seite mit den MSBs $01 
als erste Seite bezeichnet, die mit den MSBs $02 als zweite 
Seite und so weiter. 

Wenn wir nun zum Beispiel den Akku mit dem Inhalt der 
Zeropageadresse $00FA laden wollen, dann könnten wir 
schreiben: 

3000 LDA OOFA 

Unser Mikroprozessor versteht uns aber auch, wenn wir 
nur schreiben: 

3000 LDA FA 
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Das ist sje, die Zeropage-Adressierung. Anstelle eines 
3-Byte-Befehlsist das jetzt ein 2-Byte-Befehl, was Speicher¬ 
platz und vor allem Rechenzeit einspart. Auf diese Weise 
kann man von den bisher kennengelernten Befehlen fol¬ 
gende adressieren: 

LDA, LDX, LDY, STA, STX, STY, INC, DEC, ADC und SBC 

Sie können sich merken, daß man (bis auf zwei Ausnah¬ 
men, die wir noch kennenlernen werden) alle absolut adres¬ 
sierbaren Befehle auch Zeropage-absolut anwenden kann. 
Genauere Angaben über die Codes, die Ausführungszeiten 
und die Beeinflussung der Flaggen (letztere ist identisch mit 
der absoluten Adressierung) entnehmen Sie bitte der ange¬ 
fügten Tabelle 4. 

Zum Thema Geschwindigkeit: Wenn Sie die benötigten 
Taktzyklen von absolut und von 0-absolut adressierten 
Befehlen in den Tabellen miteinander vergleichen, werden 
Sie jeweils einen Unterschied von einem Zyklus feststellen. 
Das mag Ihnen läppisch Vorkommen. Bedenken Sie aber, daß 
Sie sehr häufig Schleifen programmieren müssen, die meh¬ 
rere 100 Mal durchlaufen werden, die vielleicht als oft zu ver¬ 
wendende Unterprogramme dienen... Sie werden bald fest¬ 
stellen, daß da schnell beachtliche Zeitunterschiede auftre- 
ten können: Für zeitkritische Programme ist die Verwendung 
der Zeropage-Adressierung dringend geboten. 

Dieser Tatsache waren sich leider auch die Schöpfer unse¬ 
res Betriebssystems und des Basic-Interpreters voll bewußt. 
Die Zeropage ist nahezu randvoll mit Speicherstellen, in 
denen sich beide Programmkomplexe tummeln. Fast jede 
Kernel- und Interpreter-Routine notiert sich irgendwelche 
Werte auf der Seite Null. Das macht es uns als 
Assembler-Programmierer nicht gerade leicht, die Zeropage¬ 
adressierung zu verwenden, wenn wir außerdem den Inter¬ 
preter oder das Betriebssystem benutzen wollen. Es kann 
geradezu katastrophale Folgen haben, einige Zeropage- 
Adressen zu überschreiben. Andere werden ständig neu 
beschrieben durch das Betriebssystem oder den Interpreter, 
was unseren eigenen — vielleicht gerade in so einer Spei¬ 
cherzelle gelagerten — Zwischenwerten den Garaus 
machen würde. Man sollte sich also die ersten 256 Speicher¬ 
stellen ganz genau ansehen, bevor man sie adressiert oder 
aber auf das Betriebssystem und den Basic-Interpreter ver¬ 
zichten. Ersteres erleichtern uns Tabellen der Speicherbe¬ 
legung (zum Beispiel Babel, Krause, Dripke »Das Interface 
Age Systemhandbuch zum Commodore 64«, Interface Age 


Be¬ 

fehls¬ 

wort 

Adressierung 

Byte¬ 

an¬ 

zahl 

Code 

Hex Dez 

Dauer In 
Taktzyklen 

Beeinflus¬ 
sung von 
Flaggen 

LDA 

O-Page, abs. 

2 

A5 

165 

3 

N,Z 

LDX 

O-Page, abs. 

2 

A6 

166 

3 

N,Z 

LDY 

O-Page, abs. 

2 

A4 

164 

3 

N,Z 

STA 

O-Page. abs. 

2 

85 

133 

3 



STX 

O-Page, abs. 

2 

86 

134 

3 



STY 

O-Page, abs. 

2 

84 

132 

3 



INC 

O-Page, abs. 

2 

E6 

230 

5 

N,Z 

DEC 

O-Page, abs. 

2 

C6 

198 

5 

N,Z 

ADC 

O-Page, abs. 

2 

65 

101 

3 

N.V.Z.C 

SBC 

O-Page, abs. 

2 

E5 

229 

3 

N.V.Z.C 

CMP 

unmittelbar 

2 

C9 

201 

2 




absolut 

3 

CD 

205 

4 




O-Page, abs. 

2 

C5 

197 

3 



CPX 

unmittelbar 

2 

EO 

224 

2 




absolut 

3 

EC 

236 

4 


N,Z,C 


O-Page, abs. 

2 

E4 

228 

3 



CPY 

unmittelbar 

2 

CO 

192 

2 




absolut 

3 

CC 

204 

4 




O-Page, abs. 

2 

C4 

196 

3 




Tabelle 4: Kenndaten der neuen Befehle und 
Adressierungen 


Verlag, oder »Das Commodore 64 Buch, Band 4, Ein Leit¬ 
faden für Systemprogrammierer«, Markt und Technik Verlag) 
und auch die Serie von Dr. Helmut Hauck »Memory Map mit 
Wandervorschlägen«, die seit Ausgabe 11/84 im 64’er 
erscheint. 

Ohne Hemmungen dürfen wir nur die Speicherstellen (je¬ 
denfalls beim C 64) $02 und SFB bis $FE nutzen. Weil das 
doch recht mickrig ist, hat jeder Assembler-Programmierer 
spezielle Tips, welche Zellen er noch mit welchen Vorsichts¬ 
maßnahmen benutzt. Wenn man bestimmte Routinen aus 
dem Betriebssystem oder dem Interpreter nicht aufruft, blei¬ 
ben dazugehörige Zeropageadressen unbeeinflußt und sind 
dann für eigene Zwecke nutzbar. Manchmal ist es notwendig, 
den alten Zustand einer Adresse nach Beendigung eigener 
Programme wieder herzustellen, manchmal nicht. Interes¬ 
sant und viel beschrieben in allen möglichen Zeitschriften, 
Büchern etc. ist die Möglichkeit, die Notizen, die sich das 
Betriebssystem oder der Interpreter auf der Zeropage macht, 
zu verändern. Im Prinzip schreibt man damit kleine Teile die¬ 
ser Großprogramme um oder variiert Tabellenteile davon. Wie 
schon Dr. Hauck in seiner Serie sagt, geschieht das im Rah¬ 
men der »Tricks« mit irgendwelchen POKEs mehr oder weni¬ 
ger blind, weshalb auch bevorzugt Abstürze des Computers 
dabei festzustellen sind. Warum Abstürze? Na, stellen Sie 
sich mal ein von Ihnen geschriebenes Programm vor — zum 
Beispiel das aus Kapitel 19 zur Berechnung der Summe einer 
arithmetischen Reihe — und POKEn Sie dann anstelle 
irgendeines Befehlscodes, der dorthin gehört, jetzt eine 0 
(also ein BRK) hinein. Die Wirkung dürfte ähnlich sein. Wenn 
man allerdings die Funktion der betreffenden Speicherstelle 
genau kennt, lassen sich recht nützliche Änderungen hervor- 
rufen, wie zum Beispiel die Schutz-POKEs für den Basic- 
Spei(.I-.;r durch Verändern der Adressen $33, $34, $37 und 
$38. 

Wir werden im folgenden immer dann, wenn wir mit 
Zeropage-Adressierung arbeiten oder Routinen des 
Betriebssystems oder Interpreters untersuchen, spezielle 
Stellen der Nullseite kennenlernen. 

Vorhin hatte ich noch angedeutet, daß man dann die Zero¬ 
page fast vollständig nutzen könne, wenn man auf den Basic- 
Interpreter und das Betriebssystem verzichtet. Das ist tat¬ 
sächlich möglich. Nur wird man dann erstaunt feststellen, 
wieviel Arbeit uns die computerinterne Software abnimmt 
oder anders herum: Viele bislang selbstverständliche Dinge 
werden wir dann plötzlich selbst programmieren müssen, 
und das kann ein hartes Brot sein! 

Als Beispiel für ein Programm, das nicht nur die Zeropage¬ 
adressierung verwendet, sondern sogar selbst komplett in 
der Zeropage steht, werden wir uns die CHRGET-Routine 
ansehen. Eine Klasse von Befehlen, die dort angewendet 
wird, die Vergleichsbefehle, soll zuvor noch gezeigt werden. 

23. Die Vergleichsbefehle: 

CMP, CPX, CPY 


Vergleichen heißt in englischer Sprache »to compare«, 
woraus Sie unschwer erkennen können, woher die Bezeich¬ 
nung CMP und die CPs in CPX beziehungsweise CPY kom¬ 
men. Verglichen wird jeweils der Akku-Inhalt (bei CMP), der 
Inhalt des X- (bei CPX) oder des Y-Registers (bei CPY) mit 
Daten, die der Compare-Befehl adressiert. Einige Beispiele 
werden Ihnen das klarer machen: 

CMP # FF 

vergleicht den Akku-Inhalt mit der Zahl $FF. Hier liegt die 
unmittelbare Adressierung vor, die ebenso für CPX und CPY 
verwendbar ist. Außerdem ist das dann ein 2-Byte-Befehl. 
CPX 3000 

vergleicht den Inhalt des X-Registers mit dem Inhalt der Spei- 
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cherstelle $3000. Die absolute Adressierung ist also auch 
anwendbar (natürlich auch für CMP und CPY). Der Compare- 
Befehl besteht so aus 3 Byte. 

CPY A8 

vergleicht den Inhalt des Y-Registers mit dem Inhalt der Zero¬ 
pagestelle $A8. Diese soeben frisch gelernte Zeropage- 
Adressierung ist bei allen drei Vergleichsbefehlen möglich 
und macht aus ihnen 2-Byte-Befehle. 

Für CPX und CPY sind das alle Möglichkeiten der Adressie¬ 
rung. CMP erlaubt weitere, die wir noch kennenlernen wer¬ 
den. Nun interessiert uns natürlich noch, wie das Vergleichs¬ 
ergebnis zu erhalten ist! Bei diesen Befehlen geschieht 
merkwürdiges: Die Vergleichsdaten werden vom Inhalt des 
Akkus (beziehungsweise X- oder Y-Registers) abgezogen, 
aber: Weder wird dieser Inhalt noch werden die adressierten 
Daten verändert! Der Trick ist, daß drei Flaggen das Ergebnis 
anzeigen: Die Negativ-Flagge N, die Null-Flage Z und das 
Carry-Bit C. Diese Anzeige geschieht so: (Bild 13) 


FLAGGE 

Akku' 

X 

Y 

> DATEN 

Akku' 

X 

Y 

= DATEN 

z 

111 

!< 

o 

V 

Ix> 

< 

N 

0 oder 1 


0 

1 oder 0 

Z 


0 


1 

0 

c 


1 


1 

0 


1) Der Registerinhalt (Akku, X-, Y-Register) ist größer als die 
Vergleichsdaten: 

Dann ist das Carry-Bit = 1, die N- und die Z-Flagge =0. 

2) Der Registerinhalt ist gleich den Vergleichsdaten: 

Dann sind Carry- und Z-Flagge = 1, die N-Flagge = 0. 

3) Der Registerinhalt ist kleiner als die Vergleichsdaten: 

Die N-Flagge ist dann =1, Carry- und Zero-Flagge sind 0. 

Damit Sie die Übersicht behalten können, ist in Bild 13 das 
ganze als Schema gezeigt. 

Sie werden sich vermutlich schon denken können, wie der 
Hase weiterläuft: Mit den Verzweigungsbefehlen prüfen wir 
die Flaggen und spkigen die gewünschten weiteren 
Programm-Routinen an. 

Die Kombination der Compare-Befehle mit den Verzwei¬ 
gungsoperationen wird Ihnen im weiteren Verlauf dieses Kur¬ 
ses noch ganz geläufig werden. Ein Beispiel sehen Sie nach¬ 
her ebenfalls in der CHRGET-Routine. Leider muß ich Sie 
immer noch etwas vertrösten, denn mit Verstand begreifen 
läßt sich diese Routine nur dann, wenn man etwas mehr über 
die Codierung von Zeichen weiß. Deswegen werden wir uns 
nun noch mit dem ASCII-Code und dem Commodore-ASCII 
herumschlagen. 

24. Zeichencodierung mit dem ASCII- 
und dem Commodore-ASCII-Code 


Bild 13. Flaggen bei den Vergleichsbefehlen 


msn 

Isn 

$ 

$ 

bin. 

binär 

0 

1 

2 

3 

4 

5 

6 

7 

• 

0000 

0001 

0010 

0011 

0100 

0101 

0110 

0111 

0 

0 

000 

NUL 

DLE 

SP 

0 

@ 

P 


p 

NULL 

DLE 

SP 

0 

@ 

P 

CHR$(96) 

CHR$( 112) 

1 

0 

001 

SOH 

DC1 

J 

1 

A 

Q 

a 

q 

SOH 

DC1 

1 

1 

A 

Q 

CHR$(97) 

CHR$(113) 

2 

0 

010 

STX 

DC2 

* 

2 

B 

R 

b 

r 

STX 

DC2 

- 

2 

B 

R 

CHR$(98) 

CHR$(114} 

3 

0 

011 

ETX 

DC3 

# 

3 

C 

S 

c 

s 

ETX 

DC3 

# 

3 

C 

S 

CHR$(99) 

CHR$(115) 

4 

0 

100 

EOT 

DC4 

$ 

4 

D 

T 

d 

t 

EOT 

DC4 

s 

4 

D 

T 

CHR$(100) 

CHR${116) 

6 

0 

101 

ENQ 

NAK 

% 

5 

E 

U 

e 

ü 

ENQ 

NAK 

% 

5 

E 

U 

CHR$(101) 

CHR$(117) 

6 

0 

110 

ACK 

SYN 

8 

6 

F 

V 

I 

V 

ACK 

SYN 

8 

6 

F 

V 

CHR$(102) 

CHR$(118) 

7 

0 

111 

BEL 

ETB 

- 

7 

G 

w 

9 

w 

BEL 

ETB 

< 

7 

G 

w 

CHR$(103) 

CHR$(119) 

8 

1 

000 

BS 

CAN 

( 

8 

H 

X 

h 

X 

BS 

CAN 

( 

8 

H 

X 

CHR$(104) 

CHR$(120) 

9 

1 

001 

HT 

EM 

) 

9 

1 

Y 

i 

y 

HT 

EM 

) 

9 

1 

Y 

CHR${105) 

CHR$(121) 

A 

1 

010 

LF 

SUB 

• 


J 

z 

i 

z 

LF 

SUB 

* 


J 

z 

CHR$(106) 

CHRS(122) 

B 

1 

011 

VT 

ESC 

+ 


K 

l 

k 

J 

VT 

ESC 

+ 


K 

1 

CHR$(107) 

CHR$(123) 

C 

1 

100 

FF 

FS 


< 

L 

\ 

1 

1 

1 

FF 

FS 

, 

< 

L 

E 

CHR$(108) 

CHR$(124) 

0 

1 

101 

CR 

GS 

— 

= 

M 

1 

m 

] 

CR 

GS 

— 

- 

M 

1 

CHR$(109) 

CHR$(125) 

E 

1 

110 

SO 

RS 


> 

N 

1 

n 


SO 

RS 


> 

N 

1 

CHR$(110) 

CHR$(126) 

F 

1 

111 

Sl 

US 

/ 

? 

0 

— 

0 

DEL 

Sl 

US 

/ 

? 

0 

- 

CHRS(III) 

CHR$(127) 


ASCII ist die Abkürzung von »American Standard Code for 
Information Interchange« und das heißt auf deutsch »amerika¬ 
nischer Standard-Code zum Informations-Austausch«. Diese 
Zeichen''erschlüsselungsart ist international als ISO-7-Bit- 
Code genormt, und es wäre wirklich nett, wenn alle sich 
daran halten würden. Tatsächlich aberfinden wirzum Beispiel 
bei unserem C 64 eine Abart des Normcodes, den 
Commodore-ASCII-Code. Über die damit erzwungenen 
Umrechnungen können alle diejenigen Dramen erzählen, die 
zum erstenmal einen (Nicht-Commodore-)Drucker an ihr 
Gerät anschließen oder aber blauäugig in den Online-Betrieb 
mit anderen Computern eintreten wollten. 

Sehen wir uns zunächst einmal den ASCII-Code an. Es 
handelt sich um einen 7-Bit-Code, das heißt 128 Zeichen 
können in nur 7 Bit untergebracht werden (0000 0000 bis 
01111111). Das achte Bit dient bei manchen Operationen mit 
Computer-Peripherie als Paritäts-Bit. Bei dieser Gelegenheit 
soll auch gleich erklärt werden, was Parität in diesem Zusam¬ 
menhang bedeutet. Werden Daten übertragen, muß immer 












Bild 14: ASCII-Code (jeweils oben) und Commodore-ASCII Bild 15. Grafikzeichen zu den entsprechenden 
(msn = most significant nibble; Isn = least significant ni. CHR$-Codes 
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mit Übermittlungsfehlern gerechnet werden. Das Paritätsbit 
dient dazu festzustellen, ob ein Byte korrekt angekommen 
ist. Bei der sogenannten geraden Parität zählt man die Einser 
im Byte zusammen und setzt Bit 7 auf 1 wenn sich eine unge¬ 
rade Zahl ergibt. Mit dem Paritätsbit haben wir dann eine 
gerade Zahl. Ist die Quersumme des Byte schon gerade, 
bleibt Bit 7 eine Null. Ebensogut kann man die ungerade Pari¬ 
tät verwenden, indem dann Bit 7 so gewählt wird, daß sich 
immer eine ungerade Zahl ergibt. Welche Art der Parität zur 
Anwendung kommt, ist Vereinbarungssache. Nehmen wir 
mal an, es sei gerade Parität gefordert und ein Byte mit der 
Information 00010110 soll übermittelt werden. Die Quer¬ 
summe ist 3, also ungerade. Das Paritätsbit muß auf 1 gesetzt 
werden. Wir senden das Byte 10010110. Der Empfänger 
überprüft zunächst auf gerade Parität und verwendet dann 
nur die Bits 0 bis 6. Doppelfehler, die mittels des Paritätsver¬ 
fahrens nicht festgestellt werden können, sind sehr selten. 
Leider kann auf diese Weise nur bemerkt werden, daß ein 
Übertragungsfehler aufgetreten sein muß, aber nicht wel¬ 
cher. Die Information muß dann neu angefordert werden. 

Sehen wir uns nun den Commodore-ASCII-Code an. Durch 
die Einbindung der Grafikzeichen brauchen wir mehr als die 
128 Kombinationen. Commodore benutzt deswegen einen 
8-Bit-Code. Mit dem Basic-Befehl CHR$(x) können Sie sich 
alle 256 Möglichkeiten ansehen. Erschwerend kommt aber 
noch hinzu, daß wir nicht nur einen Zeichensatz, sondern 
deren vier zur Verfügung haben, die durch den jeweiligen 
Schreibmodus ansprechbar sind (Klein-/Großschriftmodus, 
Großschriftmodus, beide Modi mit Reverse-ON oder OFF). 
Im Zeichen-ROM liegen insgesamt 512 Muster abrufbereit. 
Zu diesen kommen beim CHR$-Befehl noch eine ganze 
Reihe von Steuerzeichen hinzu... die Verwirrung ist perfekt! 
Wir wollen an dieser Stelle keine Entwirrung vornehmen, son¬ 
dern wir durchschlagen den Gordischen Knoten, indem wir 


NUL 

Null 


SOH 

Start of heading 

Beginn des Kopfes 

STX 

Start of text 

Textbeginn 

ETX 

End of text 

Textende 

EOT 

End of transmission 

Übertragungsende 

ENQ 

Inquiry 

Anfrage 

ACK 

Acknowledge 

Bestätigung 

BEL 

Bell 

Klingel 

BS 

Backspace 

Zurücksetzen 

HT 

Horizontal tabul. 

Horizontaltabulator 

LF 

Line feed 

Zeilenvorschub 

VT 

Vertical tabulator 

Vertikaltabulator 

FF 

Form feed 

Formatvorschub 

CR 

Carriage return 

Wagenrücklauf/ 

Zeilenwechsel 

SO 

Shift out 

Rückschaltung 

Sl 

Shlft in 

Dauerumschaltung 

DLE 

Data link escape 

Datenverblndungs- 

umschaltung 

DC1-4 

Device control 

Gerätesteuerung 

NAK 

Negative acknowl. 

Negativ-Bestätigung 

SYN 

Synchronous idle 

Synchronisations- 

Leerlauf 

ETB 

End of transmission block 

Ende des Übertra¬ 
gungsblockes 

CAN 

Cancel 

Annullieren 

EM 

End of medium 

Datenträgerende 

SUB 

Substitute 

Ersetzen 

ESC 

Escape 

Umschaltung 

FS 

File Separator 

Dateitrennzeichen 

GS 

Group Separator 

Gruppentrennzeichen 

RS 

Record Separator 

Satztrennzeichen 

US 

Unit Separator 

Einheiten-Trennz. 

SP 

Space 

Leerzeichen 

DEL 

Delete 

Löschzeichen 


Bild 16. Die Bedeutung der Abkürzungen im ASCII Code 


nur die ersten 128 Zeichen mit den ASCII-Zeichen verglei¬ 
chen. In Bild 14 und 15 finden Sie unsere Gegenüber¬ 
stellung. 

Einige Kombinationen dienen als Steuer-Codes. (Die 
Bedeutung der dabei verwendeten Abkürzungen sehen Sie 
in Bild 16.) 

Nur ein Teil dieser Codes wird tatsächlich genutzt. Andere 
haben - je nach Gerät an das sie gesandt werden - unter¬ 
schiedliche Bedeutungen. Denken Sie dabei nur mal an die 
verschiedenen Betriebssysteme des Commodore-Druckers 
1526, wo man bei dem einen mit CHR$(1), bei dem anderen 
mit CHR$(14) den Breitschrift-Modus anschaltet. Innerhalb 
unseres Computers werden offensichtlich bestimmte Codes 
anders genutzt. Das sind: 


Anstelle 

geschieht 

von 

folgendes: 

ENQ 

Zeichen weiß 

BS 

Blockieren der Umschaltung 
Kiein-/Großschrift 

HT 

Zulassen der obigen 
Umschaltung 

DC1 

Cursor abwärts 

DC2 

Reverse-Modus an 

DC3 

Cursor in HOME-Position 

DC4 

INST/DEL 

FS 

Zeichen rot 

GS 

Cursor rechts 

RS 

Zeichen grün 

• 'S 

Zeichen blau 


Der auffälligste Unterschied ist der, daß beim Commodore- 
ASCII anstelle der Kleinbuchstaben Grafikzeichen liegen. 
Sollte anstelle des Normalmodus der Klein-/Großschriftmo- 
dus eingeschaltet sein, findet man anstelle der Großbuchsta¬ 
ben die kleinen. 

Jetzt haben wir alle nötigen Kenntnisse, um die CHRGET- 
Routine in unserem Computer zu verstehen. 


25. Die CHRGET-Routine 


Das Kürzel CHRGET kommt von »Get a character«, was bei 
uns heißt: »Hole ein Zeichen«. Es handelt sich um eine sehr 
häufig benutzte Routine unseres Basic-Interpreters, die - wie 
schon vorhin erwähnt - komplett in der Zeropage steht. Wenn 
Sie mit dem SMON mal nachsehen wollen, dann geben Sie 
den Befehl 

D 0073 008B 

ein. Sie haben dann die komplette Routine vor sich: 


0073 

E6 

7A 

INC 7A 

0075 

DO 

02 

BNE 0079 

0077 

E6 

7B 

INC 7B 

0079 

AD 

2502 

LDA 0225 

007C 

C9 

3A 

CMP #3A 

007E 

BO 

OA 

BCS 008A 

0080 

C9 

20 

CMP #20 

0082 

FO 

EF 

BEQ 0073 

0084 

38 


SEC 

0085 

E9 

30 

SBC #30 

0087 

38 


SEC 

0088 

E9 

DO 

SBC #D0 

008A 

60 


RTS 
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Eventuell sieht die Zeile 0079 bei Ihnen anders aus. Das 
liegt dann an den Speicherstellen 7A und 7B, welche einen 
Zeiger darstellen (LSB=7A und MSB=7B), der bei Ihnen 
gerade auf einen anderen Platz zeigt als auf $0225. 

Diese CHRGET-Routine besteht aus drei Teilen: 

Zeilen 0073 bis 0079 

Weiterstellen des CHRGET-Zeigers und Einladen des 
dadurch angezeigten Speicherzelleninhaltes in den Akku. 
Zeilen 007C bis 0082 
Prüfroutinen 
Zeilen 0084 bis 008A 
Flaggen-Routinen 

Im ersten Teil haben wir schon gleich etwas neues vor uns: 
ein sich selbst veränderndes Programm. Die Speicherstelle 
(aus dem Basic-Eingabepuffer), aus der der Akku ein Zei¬ 
chen holt, wird um 1 weitergezählt mit INC 7A. 

Dabei handelt es sich um das LSB der Adresse und die näch¬ 
ste Zeile prüft, ob ein Überlauf (255 + 1) stattgefunden hat: 
BNE 0079. 

Diese Technik kennen wir schon aus den letzten Folgen: Bei 
Überlauf wird die Z-Flagge auf 1 gesetzt und der BNE-Befehl 
führt keinen Sprung herbei. Den Offset von 02 können wir 
leicht nachrechnen: Der Programmzähler steht schon auf 
0077. Die Zieladresse 0079 ist also noch 2 Byte entfernt. 
Hat eine Überschreitung des Höchstwertes 255 stattgefun¬ 
den, dann muß das dazugehörige MSB um 1 erhöht werden. 
Dies tut die nächste Zeile: INC 7B 
In beiden Fällen ist nun der Zeiger 7A/7B um eine Stelle 
weitergerückt und der Inhalt der dadurch angezeigten Spei¬ 
cherstelle wird in den Akku geladen. Zwei Dinge können wir 
uns aus diesem kurzen Programmteil merken: 

1) Wie man eine 16-Bit-Zahl hoch- (oder auch herunter-) zählt 
und 

2) eine Möglichkeit, Zeiger eirizysetzen. Wir werden noch 
eine Reihe anderer Zeigertypen kennenlernen und sehen, 
daß es nicht immer so direkt pigeht. wie hier. 

Im zweiten Teil finden wir die Prüfroutinen. Die Vergleichsbe¬ 
fehle beschränken sich auf den Akküinhalt, also CMP. 

CMP #3A testet, in welcher Beziehung das im Akku befindli¬ 
che Zeichen zum Wert $3A = dezimal 58 steht. Erinnern wir 
uns an das Schema in Bild 14: 

1) Commodore-ASCII-Code im Akku größer als 58, also Zei¬ 
chen hinter dem Doppelpunkt (Buchstaben, Grafikzeichen, 
einige Sonderzeichen). Dann ist die Carry-Flagge = 1, N-und 
Z-Flagge sind 0. 

2) Im Akku steht genau der Code 58, also der Doppelpunkt. 
Dann sind Carry-Bit und Z-Flagge = 1, nurdieN-Flagge = 0. 

3) Der Code des Zeichens im Akku ist kleiner als 58 (das 
wären alle Zahlen, einige Sonderzeichen und Steuerzei¬ 
chen). In diesem Fall ist die N-Flagge = 1. Die beiden anderen 
Flaggen zeigen Null. 

Der nun folgende Befehl BCS 008A überprüft die Carry- 
Flagge. Wenn sie gesetzt ist, wenn also der Code im Akku 
größer oder gleich dem eines Doppelpunktes (58) ist, springt 
der Programmzähler zum RTS. Der Code (und auch die Flag¬ 
gen) wird unverändert zum aufrufenden Hauptprogramm wei¬ 
tergegeben. Zur Übung können Sie ja nochmal den Offset 
nachrechnen. Der Rest des Programms wird nur noch durch¬ 
laufen, wenn Codes kleiner als 58 im Akku stehen. 

Die nächste Zeile CMP #20 dient zum Vergleich des 
Space-Codes $20 = dezimal 32 (Leertaste). Die Flaggen 
treten dann, wie schon oben beim ersten Vergleich gezeigt, 
je nach Akku-Inhalt auf. Durch die Verzweigung BEQ 0073 
erfolgt ein Rücksprung zum Beginn der CHRGET-Routine 
dann, wenn die Z-Flagge gesetzt ist, also ein Space-Code im 
Akku liegt. Somit werden die Leerzeichen einfach übersprun¬ 
gen und das nächste Zeichen geholt. Alle anderen Zeichen, 
die bis hierher durchgehalten haben, werden nun im letzten 



Teil der CHRGET-Routine einer Prozedur unterworfen, die ich 
Flaggen-Routine genannt habe. 

Durch zwei aufeinanderfolgende Subtraktionen, die insge¬ 
samt den Wert im Akku unverändert lassen (es wird 256 
abgezogen), wird die Carry-Flagge beeinflußt. Verfolgen wir, 
was da passiert: 

SEC dient als Vorbereitung für die folgende Subtraktion. 
SBC #30 zieht vom Akku-Inhalt $30 = dezimal 48 ab. Wir 
wissen inzwischen, daß das der Addition des Zweierkomple¬ 
mentes entspricht. Dieses ist (rechnen Sie mal nach!) 
1101 0000 . 

Nehmen wir mal an, wir hätten den Code der Zahl 4 (also dezi¬ 
mal 52 oder $34) im Akku stehen. Die Rechnung sieht dann 
so aus: 

52 0011 0100 

1101 0000 

+ - 

( 1 ) 0000 0100 

Das Ergebnis ist also 4, der Übertrag wird vernachlässigt. 

Als anderes Beispiel sei nun der Code für das Ausrufungs¬ 
zeichen im Akku (dezimal 33 = $21 = binär 0010 0001). Die 
Rechnung ist dann: 

33 0010 0001 

+ 1101 0000 

1111 0001 


Das Ergebnis ist —15. 

Alle Codes, die nicht für Zahlen stehen, haben nach dieser 
Subtraktion ein negatives Ergebnis im Akku hinterlassen und 
durch das »Borgen« das Carry-Bit gelöscht. 

Nun machen wir weiter ab Zeile 0087: 

SEC 

SBC #D0 

Wir ziehen $D0 = dezimal 208 ab. Das Zweierkomplement 
ist: ...Doch da kommen wir ins Stocken! Denn dieses Zweier¬ 
komplement ist nicht mehr mit 8-Bit-Zahlen darzustellen. 
Schon die Zahl 208 im Binärformat (1101 0000) würde als 
negative Zahl angesehen werden, weil Bit 7 gleich 1 ist. Wir 
machen es uns einfach und sagen, daß sich das Zweierkom¬ 
plement wie bisher bilden läßt, aber dabei das Carry-Bit mit 
einbezogen wird. Unser Zweierkomplement ist dann also: 
0011 0000 und das Carry-Bit ist gelöscht. Nun nehmen wir 
unser erstes Beispiel. Dort war nach der Subtraktion im Akku 
eine 4 verblieben: 

0000 0100 
+ 0011 0000 

0011 0100 

Das ist wieder unser ursprünglicher Wert dezimal 52 = 
$34 = Code für die Zahl 4. Das Carry-Bit bleibt gelöscht. 

Im zweiten Beispiel mit dem Ausrufungszeichen stand 
noch im Akku eine —15: 

1111 0001 
+ 0011 0000 

( 1 ) 0010 0001 

Da haben wir wieder den Code für das Ausrufungszeichen 
($21 = dezimal 33) im Akku und ein gesetztes Carry-Bit. 
Was kommt also bei der CHRGET-Routine heraus? 

1) Alle Zeichen außer dem Space werden unverändert an das 
aufrufende Programm über den Akku weitergegeben. Space 
wird unterdrückt. 

2) Bei allen Zeichen außer bei den Zahlen ist das Carry-Bit 
gesetzt. 
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3) Manche der aufrufenden Routinen überprüfen außer dem 
Zustand der Carry-Flagge auch den der Z- oder N-Flagge, die 
ja beim ersten CMP-Befehl ebenfalls gesetzt werden. So lie¬ 


fert die CHRGET-Routine noch weitere Informationen. 

In der einschlägigen Literatur stoßen Sie auch auf eine 
Routine, die CHRGOT genannt wird. Es handelt sich dabei 
ebenfalls um die hier beschriebene CHRGET-Routine, nur 
erfolgt der Einsprung nicht bei $0073, sondern bei $0079. 
Der Zeiger $007 A/7 B wird in diesem Fall nicht weitergestellt. 
Das vorher schon einmal in den Akku geladene Zeichen wird 
damit noch einmal angesprochen (got ist die Vergangenheits¬ 
form von get). 

Mit dem CHRGET-Programm haben wir eines der wichtig¬ 
sten Unterprogramme unserer computerinternen Software 
kennengelernt. Will man sich Interpreter-Routinen zunutze 
machen, stolpert man ständig darüber. Außerdem aber liegt 
die CHRGET-Routine im RAM. Das bedeutet, daß wir sie 
ohne weiteres für unsere Zwecke verändern können. Ein Bei¬ 
spiel für so eine Änderung hat Christoph Sauer in seiner Serie 
über den »gläsernen VC 20« in der Ausgabe 9 (Seite 158) 
gezeigt. Dort wird die CHRGET-Routine nach dem LDA ange¬ 
zapft und auf das Pi-Zeichen geprüft, das neuen Befehlen 
vorangestellt wurde. Sehen Sie sich das Programm dort (auf 
Seite 160f.) mal genau an, viel kann man durch Nachvollzie¬ 
hen fremder Programme für die eigene Programmiertechnik 
lernen. 


oder 

STX 19.Y 

Man nennt diese Art der Adressierung dann Zeropage- 
absolut-X-indiziert beziehungsweise -Y-indiziert. 

Weil die Zeropage aber nur 256 Adressen umfaßt, anderer¬ 
seits jedoch die Indexregister auch 256 Werte annehmen 
können, kann es geschehen (wenn man nicht aufpaßt), daß 
die Summe aus der Basisadresse (zum Beispiel $2B) und 
dem Indexregisterinhalt größer als 256 wird. Wenn zum Bei¬ 
spiel in dem Befehl 

LDA FE,X 

der X-Registerinhalt 2 beträgt, ergäbe sich $FE+$02 = 
$0100. In diesem Fall wird aber nicht der Inhalt von $0100 in 
den Akku geladen, sondern der Befehl spricht die Speicher¬ 
stelle $00 an. Der Grund dafür liegt in der Tatsache, daß unser 
Prozessor den Befehl als 2-Byte-Befehl interpretiert - das 
2. Byte ist die Zeropageadresse, die sich als Summe ergibt - 
und deswegen nur das LSB der Adresse beachtet. Von 
$0100 ist das LSB aber $00. Mit anderen Worten: Die Zero¬ 
page-absolut-indizierten Befehle lassen einen Zugriff nur auf 
die Zeropage selbst zu. Dieses Verhalten muß man beim Pro¬ 
grammieren beachten. 

Wir wollen nochmal zusammenfassen. Vier neue Adressie¬ 
rungsarten haben wir kennengelernt: 


26. Die indizierte Adressierung 


Indizieren heißt, etwas mit einem Index, also einem Zeichen 
oder einer Nummer, zu versehen. Beispielsweise bezeichnet 
man in der Mathematik die beiden Lösungen einer quadrati¬ 
schen Gleichung häufig als XI und X2. Dabei ist dann die Zif¬ 
fer (1 oder 2) der Index und X ist eine indizierte Größe. Man 
geht also aus von einer festgelegten Grundmenge (Lösungs¬ 
menge X) und trifft durch den Index eine weitere Unter¬ 
scheidung. 

So ähnlich können wir uns auch die Funktion der indizierten 
Adressierung bei der Assembler-Programmierung vorstellen. 
Nehmen wir als Beispiel den Befehl 
LDA 1500.X 

Man spricht hier von einer absolut-X-indizierten Adressie¬ 
rung. Das Assemblerwort LDA ist uns bekannt: Lade den 
Akku. Woher aoll der für den Akku bestimmte Inhalt geholt 
werden? Aus der Speicherzelle, die sich durch 1500 plus 
Inhalt des X-Registers ergibt. Steht also im X-Register zum 
Zeitpunkt des Befehlsaufrufes eine 5, dann wird der Akku aus 
Speicherzelle 1500+5, also 1505, geladen. Das X-Register 
kann Werte von 0 bis $FF (dez. 255) enthalten. Die Ähnlich¬ 
keit sieht also so aus: 

Aus einer Gesamtmenge von 256 Adressen, die durch die 
Anfangsadresse (bei unserem Beispiel 1500) und die mögli¬ 
chen 256 Belegungen des X-Registers festgelegt sind (die 
Grundmenge), werden je nach X-Registerinhalt einzelne 
Adressen unterschieden und adressiert. Das X-Register fun¬ 
giert dabei als ein Index, weswegen man auch oft die Bezeich¬ 
nung »Index-Register X« in der Literatur findet. 

Ebenfalls als Index-Register kann das Y-Register dienen, 
was zum Beispiel zum Befehl 
LDX 1500.Y 

führen kann. Dies ist dann eine absolut-Y-indizierte 
Adressierung. 

Genauso wie man die normale absolute Adresse (also zum 
Beispiel 1500) als Basis der Indizierung durch das X- oder das 
Y-Register verwenden kann, ist das auch mit eine Zeropage- 
Adresse möglich. So gibt es zum Beispiel die Befehle 
LDY 2B,X 


Befehl 

absolut 

X 

Indizierte Adressierung 

Null-Seite-absolut 

Y X Y 

LDA 

+ 

+ 

+ 

_ 

LDX 

- 

+ 

_ 

+ 

LDY 

+ 

- 

+ 

- 

STA 

+ 

+ 

+ 

_ 

STX 

- 

- 

_ 

+ 

STY 

- 

_ 

+ 

_ 

RTS 

/ 

/ 

/ 

/ 

INX 

1 

1 

/ 

/ 

INY 

1 

I 

1 

/ 

INC 

+ 

- 

+ 

_ 

DEX 

/ 

1 

/ 

/ 

DEY 

/ 

1 

/ 

/ 

DEC 

+ 

- 

+ 

_ 

SED 

1 

1 

/ 

/ 

CLD 

1 

1 

/ 

/ 

BNE 

1 

1 

/ 

/ 

ADC 

+ 

+ 

+ 

. 

CLC 

1 

/ 

/ 

/ 

SBC 

+ 

+ 

+ 

. 

SEC 

/ 

1 

/ 

1 

BEQ 

/ 

1 

/ 

1 

BCC 

/ 

1 

/ 

1 

BCS 

/ 

1 

1 

1 

BMI 

1 

1 

1 

1 

BPL 

1 

1 

1 

1 

BVC 

1 

1 

1 

1 

BVS 

1 

1 

1 

1 

CMP 

+ 

+ 

+ 


CPX 

- 

. 

_ 

_ 

CPY 

- 

- 

_ 

_ 

BIT 

- 

_ 

_ 

_ 

CLV 

1 

1 

1 

/ 

NOP 

1 

1 

1 

/ 

TAX 

1 

1 

1 

/ 

TAY 

1 

1 

1 

/ 

TXA 

1 

1 

1 

/ 

TYA 

1 

1 

1 

/ 

JMP 

_ 

_ 


_ 

JSR 

- 

- 

- 

- 

+ 

/ 

anwendbar 
nicht erlaubt 

weder absolute noch Zeropage-Adressierung 
möglich 



Tabelle 5. Anwendbarkeit der indizierten Adressierungs¬ 
arten auf die bisher gelernten Assembler-Befehle. 
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Absolut-X-indiziert zum Beispiel LDA 1500,X 

Absolut-Y-indiziert zum Beispiel LDA 1500,Y 

Zero-page-absolut-X-indiziert zum Beispiel LDA 2B,X 
Zero-page-absolut-Y-indiziert zum Beispiel LDX 2B,Y 

Die Verwendung des Y-Registers als Indexregister ist stark 
eingeschränkt. Nur bei wenigen Befehlen ist sie erlaubt (tat¬ 
sächlich nur LDX und STX bei Zero-page-absolut-indizierter 
Adressierung). In der Tabelle 5 sehen Sie, welche bisher 
behandelten Befehle wie mit der indizierten Adressierung 
verwendet werden dürfen. 

Es gibt noch zwei weitere Arten einer indizierten Adressie¬ 
rung, auf die wir noch zu sprechen kommen werden. 

27. Einige Nachzügler: Die Befehle BIT, 
CLV, NOP und TAX, TAY, TXA, TYA 


Wir wollen noch ein bißchen aufräumen: Ein paar Befehle, die 
bisher zu keinem Gebiet so richtig paßten, sollen jetzt behan¬ 
delt werden. 

BIT: Dieser Befehl heißt »Bit-Test» und paßt von daher 
eigentlich zu den in Kap. 23 behandelten Vergleichsbefehlen. 
Die Behandlung der Flaggen ist aber völlig anders. Nehmen 
wir das Beispiel 
BIT 1500 

Folgendes passiert: Der Inhalt der Speicherstelle $1500 
wird mit dem Inhalt des Akku UND-verknüpft, das Ergebnis in 
der Z-Flagge angezeigt und Bit 7 sowie Bit 6 von $ 1500 in die 
N- beziehungsweise die V-Flagge übertragen. Weder Akku 
noch Inhalt von $1500 verändern sich dabei. 

Das ging ein bißchen holterdipolter. Sehen wir uns das jetzt 
mal ganz langsam Schritt für Schritt an! Zunächst die UND- 
Verknüpfung. Bit für Bit wird der Akku-Inhalt mit dem Inhalt der 
adressierten Speicherstelle UND-verknüpft. Dabei gelten fol¬ 
gende Regeln (die Leser der Grafik-Serie kennen das ja 
schon): 

0 UND 0 = 0 
0 UND 1 =0 
1 UNDO = 0 
1 UND 1 =1 

Nur dann also, wenn die entsprechenden Bits im Akku und 
in 1500 gleich 1 sind, ergibt sich bei der UND-Verknüpfung 
eine 1. Man stellt sowas meist in einer sogenannten Wahr¬ 
heitstabelle zusammen (Tabelle 6). 


UND 

0 

1 

0 

0 

0 

1 

0 

1 


Tabelle 6. Wahrheitstabelle der logischen 
Verknüpfung UND 


Nehmen wir als Beispiel mal an, im Akku stünde $0A und in 
der Speicherstelle $1500 wäre $09 enthalten. Die UND-Ver¬ 
knüpfung sieht dann so aus: 

Akku $0A 0000 1010 
1500 $09 0000 1001 

UND _ 

0000 1000 

Das Ergebnis ist also $08. In der Z-Flagge wird in dem Fall, 
daß das Ergebnis der UND-Verknüpfung ungleich Null ist (wie 
hier) eine Null angezeigt, sonst eine 1. 

Wir haben in unserem Zahlenbeispiel mit dem BIT-Befehl 
überprüft, ob die Bits 1 und 3 in Speicherstelle $1500 
gelöscht sind. Dazu haben wir in den Akku eine sogenannte 



Maske (hier also $0A) geladen. Das Ergebnis sagt uns, daß 
nicht beide Bits gelöscht waren. Wäre der Inhalt von $1500 
beispielsweise $10 gewesen (0001 0010), hätten wir in der 
Z-Flagge eine 1 gefunden. Daher der Name »Bit-Test«: Durch 
geeignete Maskenwahl kann praktisch jedes Bit überprüft 
werden. Dabei werden weder der Akku-Inhalt noch der Inhalt 
der angesprochenen Speicherstelle verändert. 

Der BIT-Befehl hat aber noch mehr Auswirkungen: Die Bits 
6 und 7 der geprüften Speicherzelle findet man nach Befehls¬ 
ausführung in zwei Flaggen nochmal: 

Bit 7 in der N-Flagge 
Bit 6 in der V-Flagge 

Damit kann man beispielsweise überprüfen, ob sich am 
adressierten Ort eine negative Zahl befindet. Alle drei Flag¬ 
gen können ja nun mit den Branch-Befehlen abgefragt wer¬ 
den. Sie erkennen sicherlich schon, wie vielseitig dieser 
merkwürdige BIT-Befehl einsetzbar ist. 

Adressierbar ist BIT entweder absolut (wie im obigen Bei¬ 
spiel) oder Zeropage-absolut. Je nachdem liegt er dann als 
3-Byte- oder als 2-Byte-Befehl vor. 

CLV: Dieser Befehl heißt »Clear oVerflow-flag«, also »lösche 
die Überlauf-Flagge«. Die V-Flagge war -wie Sie sich erinnern 
werden -unsere rote Ampel bei Rechenoperationen (siehe 
Kap. 16). Es ist ein I-Byte-Befehl mit impliziter Adressierung 
und interessant daran ist, daß es keinen Befehl gibt, der das 
Gegenteil -also das Setzen der V-Flagge -bewirkt. 

NOP: NOP steht für »No OPeration«, was bedeutet »keine 
Tätigkeit«. Das istderNichtstu-Befehl. Er tut aber doch etwas: 
Er sorgt dafür, daß der Befehlszähler weitergezählt wird und 
bewirkt eine Verzögerung von 2 Taktzyklen. NOP ist ein 
I-Byte-Befehl mit impliziter Adressierung. Er wird in fertigen 
Programmen nur selten verwendet: Zur Erzeugung einer kur¬ 
zen def iri! .rten Verzögerung. Meist gebraucht man ihn bei 
der Erstellung eines Programmes als Platzhalter oder bei der 
Fehlersuche, um zum Beispiel unerwünschte Sprünge zu 
ersetzen. 

Die Transporteure: TAX, TAY, TXA und TYA 

Ab und zu ist es nötig, Registerinhalte untereinander auszu¬ 
tauschen. Viele Dinge (Addition, Subtraktion und so weiter) 
können nur im Akku geschehen. Wenn wir eine solche Opera¬ 
tion beispielsweise mit dem Inhalt des X-Registers ausführen 
wollen, verschieben wir diesen Inhalt mit dem Befehl TXA. 
»Transfer X into Accumulator« also »übertrage X-Register in 
den Akku« bedeutet das. Analog verwendet man TYA, um 
Y-Register-Inhalte in den Akku zu schieben oder für den 
umgekehrten Weg TAY beziehungsweise TAX (Akkuinhalt ins 
Y- beziehungsweise ins X-Register schieben). Genau genom¬ 
men wird nicht übertragen, sondern nur kopiert: Die Register, 
aus denen verschoben wird, bleiben unverändert. Weil die 
jeweiligen Zielorte der Verschiebung (Akku, X- oder Y-Re- 
gister) vom neuen Inhalt überschrieben werden, können sich 
auch Flaggen ändern. Betroffen sind von dieser Möglichkeit 
die N- und die Z-Flagge. Alle vier Befehle bestehen aus einem 
Byte und können natürlich nur implizit adressiert werden. 


28. So springen die Assembler- 
Alchimisten: JMP, JSR 


JMP und JSR entsprechen ungefähr den vom Basic her 
bekannten Befehlen GOTO und GOSUB. 

JMP kommt von »JuMP to address«, also »springe zur ange¬ 
gebenen Adresse«. Nehmen wir uns wieder ein Beispiel vor: 
JMP 1500 

bewirkt einen Sprung zur Adresse 1500. Das funktioniert so: 
In den Programmzähler werden LSB und MSB der Ziel- 
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adresse geladen. Das war dann auch schon der Sprung, denn 
der Programmzähler ist der Pfadfinder des Computers: Die 
Adresse, die dort steht, wird als nächste bearbeitet. Schalten 
Sie doch mal den SMON ein (oder einen anderen Monitor) 
und sehen Sie sich das mit folgenden Befehlen an: 

1400 JMP 1500 
Dort unterbrechen wir den Computer mit 
1500 BRK 

So weit, so gut: Wir starten mit dem SMON-Kommando G 
1400 und erhalten eine Registeranzeige mit dem Programm¬ 
zählerstand 1501. Genau das hatten wir ja erwartet. 

Weniger durchschaubar ist das folgende Beispiel: 


1400 

LDA 

#00 

1402 

LDX 

#16 

1404 

STA 

1300 

1407 

STX 

1301 

140A 

JMP 

(1300) 


Dazu gehört dann noch die Programmzeile: 

1600 BRK 

Wenn Sie das genauso eingegeben haben und dann mittels 
G 1400 starten, erhalten Sie eine Registeranzeige mit dem 
Programmzählerstand 1601. 

Schon an der neuen Schreibweise des Argumentes in Zeile 
140A werden Sie bemerkt haben, daß hier nicht mehr die nor¬ 
male absolute Adressierung wie zuvor angewendet wird. Dies 
isteine neue Form: Dieindirekte Adressierung. Indirekt des¬ 
wegen, weil wir nicht mehr direkt die Zieladresse angeben, 
sondern einen sogenannten Vektor. Ein Vektor besteht aus 
zwei aufeinander folgenden Speicherzellen (hier also 1300 
und 1301), die in der Form LSB/MSB die eigentliche Ziel¬ 
adresse enthalten. Das LSB von $1600 ist $00. Das haben 
wir über den Akku nach $1300 geladen. Das MSB $16 kam 
durch das X-Register an seinen Platz $1301: 

Zieladresse 16 00 

MSB LSB 

f t 

Vektor 1301 1300 

Das ist die Methode der toten Briefkästen, die in Kreisen 
der Assembler-Alchimisten anscheinend genauso beliebt ist 
wie bei Agenten. So wie diese im hohlen Baum die Treffpunkt¬ 
anschrift hinterlegt finden, verläßt sich unser Computer auf 
die Speicherstellen 1300 und 1301 für die Angabe der 
Zieladresse. 

Diese Art der Adressierung ist im wahrsten Sinn des Wortes 
ein Unikum: Esgibtsie nämlich nurfür den JMP-Befehl! Davon 
wird allerdings dann auch recht häufig Gebrauch gemacht, 
zum Beispiel im Betriebssystem unseres Computers. Aber 
darüber und über die Vektoren, die dazu verwendet werden, 
soll ein andermal berichtet werden. 

Wir dürfen nämlich nicht den anderen Sprungbefehl JSR 
vergessen. JSR steht für »Jump to SubRoutine«, was einge¬ 
deutscht etwa bedeutet »springe zum Unterprogramm«. 
Genauso wie in Basic Unterprogramme durch GOSUB Zei¬ 
lennummer aufgerufen werden, kann das auch hier gesche¬ 
hen durch JSR Adresse. Hier ist nur die absolute Adressie¬ 
rung möglich. Das erste Beispiel soll uns zeigen, wie dieser 
Befehl funktioniert: 

1400 JSR 1500 
Dort soll dann erstmal stehen: 

1500 BRK 

Noch nicht starten!! Zunächst einmal verzeihen Sie mir 
diese Programmierer-Todsünde: Aus einem Unterprogramm 
heraus den Programmablauf zu beenden! Ich werd's auch nie 
wieder tun. Hier geschieht das nur zu Lehrzwecken. Was läuft 
ab: Der Programmzählerinhalt plus 2 wird auf den Stapel 
gelegt und dann die Adressse 1500 in den Programmzähler 
geladen. Ebenso kurz wie unklar! Was ist denn ein Stapel? 
Also langsam, Schritt für Schritt. 


Der Sinn von Unterprogrammen ist ja, daß der Computer 
nach Ende der Bearbeitung wieder ins aufrufende Hauptpro¬ 
gramm zurückkehrt. Er muß sich aber dazu irgendwo merken, 
von wo aus er zum Unterprogramm gesprungen ist. Dazu ver¬ 
wendet er den Stapel. Das ist ein Speicherbereich ($0100 bis 
$01 FF), der direkt vom Prozessor aus verwaltet wird. Die 
genaue Architektur und Handhabung dieses »Prozessor- 
Stack« werden wir noch in einer späteren Folge kennenler¬ 
nen. Uns soll hier nur interessieren, daß es einen Zeiger gibt, 
der auf den nächsten freien Platz im Stapel weist und daß die¬ 
ser Speicher von oben nach unten gefüllt wird (wie in Basic 
bei den Strings). Wenn Sie mit Hilfe des SMON mal in den Sta¬ 
pel hineinsehen wollen, dann geben Sie doch mal ein M 0100 
01 FF. Was nun genau bei Ihnen drin steht, ist sehr von der vor¬ 
herigen Nutzung Ihres Computers abhängig. Der Mikropro¬ 
zessor nutzt den Stapel bei sehr vielen Tätigkeiten. Es kommt 
auch nur auf den Teil des Stapels an, der durch den Stapelzei¬ 
ger als gefüllt bezeichnet wird. Der Stapelzeiger wird beim 
SMON in der Registeranzeige als SP angezeigt. Wenn Ihr Sta¬ 
pelzeiger (prüfen Sie das doch mal durch Eingabe von R) nun 
zum Beispiel F6 zeigt, dann bedeutet das, daß alle Stapel¬ 
plätze von $01F6 an abwärts frei und die oberhalb bis $01FF 
besetzt sind. Beim Nachsehen mit M 01FO 01FF finden Sie 
dann beispielsweise: 

:01F0 20 00 20 AA CI FA CO 46 

:01F8 El E9 A7 A7 79 A6 9C E3 

Die Speicherstelle, auf die der Stapelzeiger weist, ist unter¬ 
strichen. Nun starten wir mit G 1400 unser kleines verbote¬ 
nes Testprogramm. Es meldet sich die Registeranzeige. Im 
Stapelzeiger steht jetzt F4 (oder eben Ihr vorhergegangener 
SP minus 2). Wenn wir nun wieder im Stapel nachsehen mit 
M 01 FO 01 FF, dann finden wir im Gegensatz zur obigen 


Ättze»<j nun: 
:01F0 

20 

AA 

CI 

FA 

CO 

02 

14 

46 

:01F8 

El 

E9 

A7 

A7 

79 

tt 

A6 

II 

9C 

E3 


Unterstrichen ist wieder das Ziel des Stapelzeigers, der 
jetzt zwei Plätze weitergerückt ist, um der durch Pfeile 
gekennzeichneten Adresse 1402 (als LSB/MSB) Raum zu 
schaffen. $1402 ist das letzte Byte des JSR-Befehls. Wie wir 
den Programmzähler kennen, ist er im allgemeinen immer 
einen Schritt voraus. Hier liegt er aber einen zurück, falls er 
nach Beendigung des Unterprogrammes an der notierten 
Adresse weitermacht. Dazu kommen wir gleich noch. Was wir 
am Programmzähler aber auch noch nach Ablauf unseres kur¬ 
zen Beispielprogrammes ablesen können, Ist die Tatsache, 
daß die Sprungadresse 1500 in ihn geschrieben wird, somit 
der Sprung dann also stattgefunden hat. 

Nun bauen wir das kleine Programm etwas um: 

1400 JSR 1500 
1403 BRK 

Das Unterprogramm soll nur aus dem Rücksprung bestehen: 
1500 RTS 

Verlangen Sie nun noch vor dem Start eine Registeranzeige 
mit R und merken Sie sich den Wert des Stapelzeigers. Dann 
starten Sie das Programm mit G 1400 und achten Sie auf die 
neue Registeranzeige. Zwei Dinge interessieren uns: 

1) Der Wert des Stapelzeigers ist unverändert geblieben. 

2) Der Programmzähler weist nun auf $1404. 

Wenn Sie nun nochmal mit dem M-Befehl des SMON in den 
Stapel sehen, werden Sie unter Umständen zwar noch die 
Adresse 1402 dort finden (dann nämlich, wenn wir den Stapel 
seit dem letzten Programm nicht verändert haben). Wie Sie 
aber inzwischen wissen, hätte durch den neuen JSR-Befehl 
nochmal 1402 dort eingetragen sein müssen. Das stand da 
auch einige Mikrosekunden lang... bis der RTS-Befehl wirk¬ 
sam wurde. RTS macht ziemlich viel: 

1) RTS holt die auf dem Stapel gespeicherte Adresse ab, und 
schreibt sie in den Programmzähler. 
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2) RTS vermindert dabei den Stapelzeiger um 2. 

3) RTS addiert zum Programmzähler eine 1. 

Deswegen kann das Programm also bei $1403 weiterlau¬ 
fen und der Programmzähler nun hinter dem BRK-Befehl 
stehen. 

Machen Sie doch mal etwas anscheinend total Verrücktes: 
Starten Sie mit G 1500. Es gibt da zwei Möglichkeiten, was 
geschehen kann: Entweder stand da noch vom ersten unter¬ 
brochenen Testprogramm die Adresse 1402. Dann endete 
nun alles mit einer Registeranzeige, bei der der Stapelzeiger 
um 2 höher gerutscht ist. 

Oder da stand diese Adresse nicht mehr. Dann befinden Sie 
sich nun wieder im Basic. Wieso eigentlich? Als nächste 
Adresse finden Sie auf dem Stapel $E146 (dez.57670). 
Diese Adresse + 1 wird ja durch RTS in den Programmzähler 
gerufen. Ein Sprung an diese Adresse ist ein Sprung in ein 
Programm des Betriebssystems. Haben Sie ein ROM- 
Listing? Dann sehen Sie mal nach: Dort steht der Befehl...RTS. 
Dies neuerliche RTS holt nun jedenfalls die nächste Adresse 
vom Stapel: $A7E9 (dez.42985). Diese Adresse 4- 1 im Pro¬ 
grammzähler führt unseren Computer in die Basic- 
Interpreter-Schleife, also ins Basic zurück. 

Wir haben so viel über den Stapel gehört, daß wir JSR fast 
schon wieder aus den Augen verloren haben. Deswegen 
nochmal eine kurze Übersicht: 

a) JSR speichert den Programmzählerwert des letzten Bytes 
des Befehls auf dem Stapel zum Beispiel 1402, 

b) stellt dabei den Stapelzähler um 2 zurück zum Beispiel von 
$F6 nach $F4 

c) schreibt in den Programmzähler die angegebene Ziel¬ 
adresse, zum Beispiel 1500 

d) Das Unterprogramm wird abgearbeitet bis der RTS-Befehl 

auftaucht. 64€R 

e) Dann wird die gemerkte Adresse +1 in den Programmzäh¬ 
ler geschrieben, zum Beispiel 1402 + 1 = 1403 

f) und dabei der Stapelzähler wieder um 2 erhöht, zum Bei¬ 
spiel von $F4 wieder zu $F6 

g) Das Programm läuft nun wieder nach dem JSR-Befehl wei¬ 
ter, zum Beispiel also bei 1403. 

Nun sollte eigentlich auch klar sein, warum ein Aussprung 
aus einem Unterprogramm oder ein Abbruch im Unterpro¬ 
gramm eine Programmierer-Todsünde ist: Der Stapelzeiger 
wird nicht zurückgestellt. Die gemerkte Rücksprungadresse 
versauert allmählich auf dem Stapel. Noch schlimmer sind sol¬ 
che Sachen in einer Schleife, wo mehrfach aus dem Unterpro¬ 
gramm ausgebrochen wird: Hier ist der Stapel bald voll Müll 
und der Computer beendet seine Zusammenarbeit mit dem 
Programmierer. Weil aber Basic-Programme nichts anderes 
sind als eine Folge von Maschinenprogrammen, die je nach 
Befehl durch den Interpreter aneinandergereiht werden, ist 
das auch in Basic eine Todsünde. Wir wollen aber nicht so hart 
mit uns umgehen: Wenn wir gelernt haben, wie man mit spe¬ 
ziellen Assembler-Befehlen im Stapel herumschaufeln kann, 
dann haben wir bei richtiger Anwendung von vorneherein 
jedenfalls in diesem Punkt die Absolution erhalten. 

29. Alles fließt: Fließkommazahlen 


Jeder, der tiefer in die Geheimnisse der Assembler-Alchimie 
eindringen will, muß sich vertraut machen mit der häufigsten 
Art der Zahlenverarbeitung in unserem Computer. Das ist die 
Handhabung von Fließkommazahlen (auch Gleitkommazah¬ 
len genannt). Wir werden dazu folgende Fragen zu klären 
haben: 

1) Was sind Fließkommazahlen? 

2) Wie sehen sie im binären Zahlensystem aus? 

3) Wie behandelt unser Computer positive und negative 
Fließkommazahlen? 



4) Wie können wir als Programmierer Einfluß nehmen auf die 
Verarbeitung dieser Zahlen im Computer? 

Die Behandlung dieser vier Fragen wird uns eine ganze 
Weile beschäftigen. Fangen wir mit der ersten an: In Stan¬ 
dardwerken der Mathematik werden Sie lange suchen müs¬ 
sen, um den Begriff »Fließkommazahl« zu finden. Im deut¬ 
schen Sprachraum gibt es häufiger die Bezeichnung »wis¬ 
senschaftliche Zahlendarstellung«. Das klingt sehr hochge¬ 
stochen und ist eigentlich ganz einfach. Leser der 
Grafik-Serie werden sich vielleicht noch erinnern: Die Zahl 
1000 kann man auf verschiedene Weise darstellen: 

1000 = 10 * 10 * 10 = 10 3 (in Basic 1013) 

Die hochgestellte Zahl (in Computerschreibweise: Die Zahl 
hinter dem Hochpfeil) ist hier gleich der Anzahl der Stellen 
minus 1 (1000 hat vier Stellen, also ist die Hochzahl eine 3). 
Diese Hochzahl nennt man Exponent (vom lateinischen expo- 
nere = anzeigen, herausheben). Nehmen wir nun einige 
andere Zahlen: 

200 = 2 * 100 = 2 * 1012 

oder 

2500 = 2,5 * 1000 = 2,5 * 1013 
Ich glaube, jetzt beginnt es Ihnen klarzuwerden, daß man 
auf diese Art wohl alle Zahlen irgendwie darstellen kann. Man 
dröselt die Zahlen auseinander, bildet ein Produkt, von dem 
der eine Multiplikator durch 10 teilbar ist (durch die Basis 
unseres normalen Zahlensystems). Genauer gesagt: Ein Fak¬ 
tor (also in den Beispielen 1000 oder 100) ist darstellbar als 
Potenz von 10. Der andere Faktor (in den Beispielen 1 oder 2 
oder 2,5) wird Mantisse (vom lateinischen manitissa = 
Zugabe, Anhang, Schleppe) genannt. Sehen wir uns nochmal 
2500 an: 


2,5 * 

1000 = 

2,5 * 

: 1013 

25 * 

100 = 

25 * 

1012 

250 * 

10 = 

250 * 

1011 

2500 * 

1 = 

2500 * 

1010 


Das letzte war nur der Vollständigkeit halber, denn irgend¬ 
eine Zahl hoch 0 ist immer 1. Man kann auch aus der 2500 fol¬ 
gendes machen: 

2500 = 0,25 * 10000 = 0,25 * 1014 
oder = 0,025 * 100000 = 0,025 * 10t5 
und so weiter. Oder anders herum: 

2500= 25000 * 0,1 = 25000 * 101-1 
= 250000 * 0,01 = 250000 * 101-2 
und so weiter. 

Dabei bedeutet: 

io - 2 = 1/1 o - 2 = 0,01 

Man kann sich das merken, indem man die Anzahl der Stel¬ 
len zählt, um die man das Komma verschiebt. Diese Anzahl 
addiert man dann zur Hochzahl. Zur Erläuterung: 

0,12345 = 1,2345 * IO' * 1 

Wir haben das Komma um eine Stelle nach rechts gerückt, 
weshalb wir die Hochzahl -1 schreiben müssen (vorher war 
da nämlich unsichtbar die Hochzahl 0: und 1010=1). 
0,12345 = 123,45 * IO' 3 

Hier wurde das Komma um drei Stellen nach rechts ver¬ 
schoben. Daher der Exponent -3. Sie sehen folgenden 
Zusammenhang: 

Komma eine Stelle nach rechts verschoben: Exponent 
+ (- 1 ). 

Zum Beispiel 

0,1234*10- 2 = 1,234* 10- 3 
Komma eine Stelle nach links verschoben: Exponent +1. 
Zum Beispiel 

3,14*10-2 = 0,314* 10" 3 

Verstehen Sie nun, warum man diese Art der Zahlendar¬ 
stellung Fließkomma- oder Gleitkommazahlen nennt? 

Vielleicht sehen Sie aber noch nicht den Sinn der Fließkom¬ 
mazahlen ein. Dazu gebe ich Ihnen zwei einsichtige Bei- 
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spiele. Der Atomkern eines Heliumatoms wiegt etwa (halten 
Sie sich fest): 

0,000 000 000 000 000 000 000 000 006 643 kg. 

Sehr unbequem, diese ganzen Nullen immer mitzuschlep¬ 
pen. Wir verschieben deshalb das Komma um 27 Stellen 
nach rechts und schreiben dann 
6,643* IO- 27 kg. 

2. Beispiel: Wir haben einen Ballon mit diesem Gas gefüllt. 
Bei normalen Temperatur- und Luftdruckbedingungen befin¬ 
den sich in einem Kubikzentimeter im Ballon ungefähr (noch¬ 
mal festhalten!): 

26 900 000 000 000 000 000 Heliumatome 

Wieder eine recht unangenehme Nullschlepperei. Wir ver¬ 
schieben das Komma um 19 Stellen nach links und erhalten 
2,69* 10-' 9 Heliumatome. Fein, nicht wahr! 

Abgesehen von der höheren Bequemlichkeit: Der Compu¬ 
ter müßte allerhand Speicherplatz zur Handhabung der vielen 
Nullen bereitstellen. Mit BCD-Zahlen könnten wir zwar jede 
Zahl erfassen, hätten aber immer unterschiedlich viele Bytes 
zu verarbeiten. Wenn wir Fließkommazahlen verwenden, 
können wir - wie Sie noch sehen werden - jede (na sagen wir 
mal: fast jede) Zahl in der gleichen Anzahl Bytes auf¬ 
bewahren. 

Vom Basic her kennen Sie Fließkommazahlen auch (hier 
wird das Komma allerdings durch den Punkt ersetzt, entspre¬ 
chend der angloamerikanischen Schreibweise). Das sind 
die, wo man zum Beispiel schreibt 6.02E23 oder 
6.02E+23, was dann bedeutet 6,02*10~ 23 . E steht dort für 
Zehnerexponent. Durch die Art, wie Fließkommazahlen im 
normalen Computerdasein gespeichert werden, ergeben 
sich obere und untere Grenzen. Die höchste in Basic verar¬ 
beitbare Zahl im C 64 ist 

+ 1.70141183* 10- 38 

Größere Zahlen verursachen in Basic einen OVERFLOW 
ERROR. Was in Maschinensprache mit größeren Zahlen 
geschieht, ist weitgehend unsere Sache. Die dem Betrag 
nach kleinste verarbeitbare Zahl ist 
± 2.93873588* 10" 39 

In Basic arbeitet bei Unterschreitung der Computer einfach 
mit einer Null weiter. Für die Behandlung in Maschinenspra¬ 
che sind ebenfalls wir als Programmierer verantwortlich. 

Für diesmal sei’s genug der Zahlenspiele: Später werden 
wir uns weiter mit Fließkommazahlen befassen. 


30. Die USR-Funktion 


Wieder einmal soll uns das Zusammenspiel von Basic und 
Maschinensprache beschäftigen. Einen Aufruf von Maschi¬ 
nenroutinen - nämlich den mit SYS - haben wir schon ken¬ 
nengelernt. Wir POKEten die zu übergebenden Werte an die 
Abrufspeicherstellen. Bei diesen Werten hat es sich um einfa¬ 
che Integerzahlen gehandelt, zum Beispiel die Anzahl der 
Glieder einer zu summierenden arithmetischen Reihe. Was 
tun wir aber, wenn wir Fließkommavariable an ein Maschinen¬ 
programm übermitteln wollen? Gewiß, werden Sie sagen, ler¬ 
nen wir das ja noch und können dann entsprechende POKE-- 
Kommandos geben. Damit haben Sie auch recht, nur ist das 
dann der »harte« Weg. Es gibt auch einen problemlosen »wei¬ 
chen« Weg, nämlich das USR-Kommando. 

USR ist ein Basic-Befehl und rührt her von »USeR callable 
machine language subroutine«, also »durch den Benutzer auf¬ 
rufbares Maschinensprachunterprogramm«. Darin liegt 
eigentlich noch nichts Neues gegenüber dem SYS-Befehl. Im 
Gegensatz zu SYS - wo das Argument die Einsprungadresse 
des Maschinenprogrammes ist - übergibt USR als Argument 
eine beliebige Fließkommavariable in festgelegter Form an 
eine sehr nützliche Speicherstellenkombination, den Fließ¬ 


komma-Akkumulator 1, von uns künftig einfach FAC genannt. 
Der FAC belegt die Speicherstellen 97 bis 102 ($61 bis $66). 
Wenn das eventuell in Basic benötigte Ergebnis dort auch in 
der vorgeschriebenen Form abgelegt wird, kann es im Basic- 
Programm weiterverwendet werden. Keine Angst, dazu kom¬ 
men wir bei der weiteren Behandlung der Fließkommazahlen 
noch ganz ausführlich zu sprechen. Heute soll uns das noch 
nicht belasten. Als Argument kann man nämlich auch irgend¬ 
eine bedeutungslose Größe, ein sogenanntes Dummy ange¬ 
ben, das dann gar nicht weiter verwendet wird. Der USR-Be- 
fehl dient in diesem Fall lediglich dem bequemen Ansteuern 
eines Maschinenprogrammes. 

Woher weiß unser Computer beim USR-Befehl, welche 
Maschinenroutine er im 64-KByte-Speicher bearbeiten soll? 
Beim SYS-Befehl ist das klar: Das Argument sagt es: 

SYS 24345 

läßt den Programmzähler auf dez.24345 zeigen. Aber wenn 
wir eingeben: 

USR(24345) 

dann packt der Computer die Zahl 24345 als Fließkommava¬ 
riable in den FAC und meldet dann einen SYNTAX ERROR. 
Das liegt daran, daß der Basic-Interpreter beim USR-Befehl 
einen der oben kennengelernten indirekten Sprünge 
vollführt: 

JMP (311) 

$311/312 (in dezimal 785/786) ist also ein Vektor, und der 
weist im Normalfall zu einer Routine, die den SYNTAX ERROR 
ausgibt (dez. 45640). Bevor wir also den USR-Befehl geben, 
müssen wir in diesen Vektor die Startadresse unserer 
Maschinenroutine schreiben: 
dez. 24345 = $5F19 
LSB $19 = dez. 25 in Speicher 785 mit 
POKE 785,25 

MSB $5F = dez. 95 in Speicher 786 mit 
POKE 786,95 

Jetzt weiß der Computer, wohin er beim USR-Aufruf sprin¬ 
gen soll, und solange, bis wir den Vektor wieder ändern, führt 
er bei jedem USR-Befehl unser bei 24345 stehendes 
Maschinenprogramm aus. Wir müssen nur noch dafür sor¬ 
gen, daß dort dann auch wirklich eines anfängt. Ein Beispiel 
werden wir nachher noch behandeln. 

31. Der harte Kern: 

Nochmal Speicherfragen 


Die Struktur des C 64-Speichers ist vereinfacht schon in 
der Grafik-Serie und zu Beginn dieses Kurses gezeigt wor¬ 
den. Dabei tauchten zwei ROM-Bereiche auf, die wir Basic- 
Interpreter und Betriebssystem genannt haben. Diese Unter¬ 
teilung ist nicht ganz korrekt. Wenn Sie über ein ROM-Listing 
verfügen und beispielsweise das Ende des ROM-Bereiches 
von $A000 bis $BFFF sowie den Anfang des oberen ROM 
($E000 bis $FFFF) untersuchen, dann stellen Sie fest, daß 
ab dez. 49087 ($BFBF) die Basic-Funktion EXP bearbeitet 
wird. Der letzte Befehl vor $C000 beendet diese Funktion 
aber nicht etwa, sondern dort steht: 

JMP E000 

Tatsächlich läuft ab $E000 bis $E042 die Bearbeitung der 
EXP-Funktion munter weiter, und auch danach finden sich 
allerlei Basic-Befehle (SIN, COS und so weiter). Da liegt also 
keine klare Trennung vor, sondern ein Mischmasch. Wir soll¬ 
ten uns vielleicht angewöhnen - statt vom Interpreter und 
dem Betriebssystem -, vom unteren und oberen ROM- 
Bereich zu sprechen. 

Eine andere Unterscheidung ist dagegen sinnvoll: Wie 
einige Besitzer neuerer Commodore 64 sicherlich bemerkt 
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haben, sind Teile der ROM-Routinen im Laufe der Zeit verän¬ 
dert worden. Hauptsächlich geht es bei den aktuellen Neue¬ 
rungen dieser internen Maschinenprogramme um die Farb¬ 
gebung der Zeichen. Man kann eigentlich nie so recht wis¬ 
sen, was den Software-Planern von Commodore noch alles 
einfällt. Jedenfalls können deren Ideen manchmal recht dra¬ 
matische Folgen haben, nämlich dann, wenn Sie ein fabelhaf¬ 
tes Maschinenprogramm gebaut haben, welches ROM- 
Routinen direkt verwendet. Der Programmierer spielt auf 
diese Weise eine milde Form des russischen Roulettes. 
Glücklicherweise halten sich die Änderungen in Grenzen, 
und wir dokumentieren unsere Programme ja auch immer gut 
(Sie etwa nicht??). Notwendige Umbauten können also leicht 
vonstatten gehen. 

Ganz ohne ROM-Routinen-Verwendung kommt man 
eigentlich kaum aus. Es gibt aber einen ROM-Bereich, für den 
Commodore verspricht, keinerlei Änderungen durchzufüh¬ 
ren: die Kernel-Sprungtabelle. 

Das ist ein Programmbereich (SFF81 bis SFFF5), in dem 
39 JMP-Befehle enthalten sind (zum Teil in absoluter, aber 
auch in indirekter Adressierung). Jeder dieser Sprungbefehle 
weist auf die Einsprungadresse eines Maschinenprogram¬ 
mes. Da finden sich alle wichtigen Ein/Ausgabe-Operationen, 
Systemtakt- und Uhrsteuerungen und anderes mehr. Wir 
werden uns nach und nach damit vertraut machen. In der 
Tabelle 7 sind die Kernel-Adressen und ihre Funktion aufge¬ 
führt. Manche davon können ohne jede Vorbereitung benutzt 
werden, andere brauchen bestimmte Routinen oder Anga¬ 
ben, um sinnvoll zu arbeiten. 

Die Absicht von Commodore ist es, daß jeder Aufruf von 
zum Beispiel $FFD2 die Ausgabe eines Zeichens bewirkt, 
und zwar unabhängig davon, welchen Computer in welcher 
Version wir benutzen. Das Programm, welches diese Zei- 


Adresse 

HEX dezimal 

Name 

Funktion 

FF81 

65409 

CINT 

Prüfen der TV-Norm, Berechnung der Taktfrequenz 

FF84 

65412 

IOINIT 

Ein/Ausgabe-Reset 

FF87 

65415 

RAMTAS 

Prüfen auf freien Basic-RAM 

FF8A 

65418 

RESTOR 

Initialisieren der I/O-Vektoren 

FF8D 

65412 

VECTOR 

Lesen und Selzen der I/O-Voktoren 

FF90 

65424 

SETMSG 

Selzen des Ausgabe-Modus 

FF93 

65427 

SECOND 

Ausgeben der Sekundäradresse noch LISTEN 

FF96 

65430 

TKSA 

Ausgabe der Sekundäradresse nach TALK 

FF99 

65433 

MEMTOP 

Lesen/Setzen dos Speicherendes 

FF9C 

65436 

MEMBOT 

Lesen/Setzen des Speicheranfangs 

FF9F 

65439 

SCNKEY 

-Abfragen der Tastatur 

FFA2 

65442 

SF.TTMO 

Selzen der Time-Out-Flaggo 

FFA5 

65445 

ACPTR 

Zeichen vom seriellen Port In Akku lesen 

FFA8 

65448 

CIOUT 

Zeichen vom Akku aul seriellen Port ausgeben 

FFAB 

65451 

UNTLK 

Sendet UNTALK an seriellen Bus 

FFAE 

65454 

UNLSN 

Sendet UNLISTEN an seriellen Bus 

FFB1 

65457 

LISTEN 

Sendet LISTEN an Geräte per seriellen Bus 

FFB4 

65460 

TALK 

Sendet TALK an Gerate per seriellen Bus 

FFB7 

65463 

READST 

Uest I/O-Status in den Akku 

FFBA 

65466 

SETLFS 

Festlegung der Parameter für OPEN 

FFBD 

65469 

SETNAM 

Festlegung dos Filenamens 

FFCO 

65472 

OPEN 

Öffnet spezifizierten File 

FFC3 

65475 

CLOSE 

Schließt spezifizierten File 

FFC8 

65478 

CHKIN 

Öffnet einen Eingabekanal 

FFC9 

65481 

CHKOUT 

Öffnet einen Ausgobekanal 

FFCC 

65484 

CLRCHN 

Schließt Ein- und Ausgabekanälo 

FFCF 

65487 

CHRIN 

Holt vom aktiven Eingabekanal ein Zeichen in den Akku 

FFD2 

65490 

CHROUT 

Sendet Akku-Inhalt aul aktiven Ausgabekanal 

FFD5 

65493 

LOAD 

LOAD und VERIFY von Programmen 

FFD8 

65496 

SAVE 

Speichern von Programmen 

FFDB 

65499 

SETTIM 

Uhrzeit setzen 

FFDE 

65502 

RDTIM 

Uhrzeit lesen 

FFE1 

65505 

STOP 

STOP-Taste abfragen 

FFE4 

65508 

GETIN 

Zeichen aus dem Tastaturpuffer in den Akku lesen 

FFE7 

65511 

CLALL 

Schließen aller Kanäle und Files 

FFEA 

65514 

UDTIM 

Uhr um 1/60 Sekunde weiterzählen 

FFED 

65517 

SCREEN 

Lesen des Bildschirmformates 

FFFO 

65620 

PLOT 

Lesen/Setzen der Cursor-Position 

FFF3 

65523 

IOBASE 

Lesen der Startadresse der Ein- und Ausgabebausteine 


Tabelle 7. Kernel-Routinen 


SäH? 


chenausgabe letztendlich ausführt, kann sich ändern, kann in 
ganz andere Speicherbereiche gelegt werden. An der Stelle 
$FFD2 wird aber immer ein JMP mit der Einsprungadresse 
stehen. Leider ist diese Sprungtabelle viel zu knapp gehalten. 
Es gibt so viele interessante ROM-Routinen, die wir alle ohne 
diese schöne Sicherheit anspringen müssen. 


32. Die Urzelle eines Programmprojektes 


Wir sind jetzt soweit, daß wir die Urzelle eines Programm¬ 
projektes, welches uns eine lange Zeit begleiten wird, auf¬ 
bauen können. Wir wollen etwas unter den Teppich kehren. 
Der Teppich, das sind die uns bislang nicht zugängigen 
RAM-Bereiche unter den ROMs. Haben Sie das nicht auch 
schon mal erlebt, daß Sie während einer Programmarbeit 
plötzlich feststellen, Sie benötigen zum Beispiel für eine 
Zwischenrechnung ein weiteres Programm, oder Sie wälzen 
Listen und denken sich, ein kleiner Hilfsbildschirm wäre jetzt 
von Nutzen, oder.... 

Mit diesem heute zu startenden Programm wäre all das und 
noch viel mehr realisierbar. Es soll auf einfache Weise belie¬ 
bige Speicherbereiche unters ROM schieben und sie wieder 
hervorholen können. 

Natürlich braucht die Entwicklung dieses Projektes einige 
Zeit, zumal wir noch vieles lernen müssen. Deswegen sind wir 



Bild 17. Das Flußdiagramm zu dem im Text erklärten 
Programm. 
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in dieser ersten Urzelle noch sehr eingeschränkt: Wir ver¬ 
schieben zuerst einmal nur eine Bildschirm-Kopfzeile unter 
den oberen ROM-Bereich. Auch in dieser einfachsten Ver¬ 
sion gibt es noch einige Programmteile, die Sie erst nach der 
nächsten Ausgabe verstehen werden. Aber irgendwann müs¬ 
sen wir ja mal anfangen, Nägel mit Köpfen zu machen. 

Unser Maschinenprogramm soll durch die USR-Funktion 
aufgerufen werden. Wie wir es in dieser Ausgabe gelernt 
haben, muß deshalb vor dem ersten Aufruf eine Initialisierung 
durch Belegen des USR-Vektors mit unserer Startadresse 
stattfinden. Die Startadresse soll $02B6 (dez. 694) sein, 
denn dort gibt es einen freien RAM-Bereich bis inklusive 
$02FF (dez. 767), der weder andere Programme noch 
Kassettenoperationen stört. Das MSB $02 ist dezimal auch 2 
und wird nach 786 gePOKEt: 

POKE 786,2 

Das LSB $B6 ist dezimal 182 und soll in 785 geschrieben 
werden: 

POKE 785,182 

Damit ist der USR-Vektor gestellt und wir brauchen uns 
nicht mehr weiter darum zu kümmern: Jeder USR-Aufruf wird 
nun den Start des Programmes bewirken. Nun zum Programm 
selbst. In Bild 17 finden Sie ein Flußdiagramm dazu. 

Zunächst konstruieren wir den Teil, der die erste Bild¬ 
schirmzeile nach $E000 und folgende Speicherstellen 
schiebt. Das X-Register verwenden wir als Index und laden es 
mitdez.40 = $27. 

Schalten Sie also den SMON ein und starten Sie den 
Assembler mit: 

A02B6 

Dann geben Sie ein: 

02B6 LDX #27 

Nun packen wir das letzte Zeichen der obersten Bild¬ 
schirmzeile in den Akku: 

02B8 LDA 0400,X 

In das Y-Register legen wir die dazugehörige Farbe aus dem 
Bildschirmfarbspeicher: 

02BB LDY D800.X 

Den Akkuinhalt - also die Bildschirminformation - legen wir 
nach $E000 + $27: 

02BE STA E000,X 


Dasselbe tun wir mit dem Farbcode, der ab $E028 + $27 
abwärts gespeichert wird. Leider kann man STY nicht X-indi- 
ziert-absolut adressieren (siehe Tabelle 5). Deshalb schieben 
wir zuerst den Y-Registerinhalt in den Akku: 

02C1 TYA 
02C- 

2 STA E028.X 

Damit ist das letzte Zeichen der Kopfzeile verschoben. Wir 
zählen das X-Register um 1 herunter: 

02C- 

5 DEX 

Der X-Index weist nun auf das vorletzte Zeichen, mit dem 
sich alles ab $02B8 wiederholt. Wenn das X-Register bis 0 
heruntergezählt ist, weist es auf das erste Zeichen der Kopf¬ 
zeile. Die Schleife muß dann noch einmal durchlaufen werden 
und ein weiteres Herabzählen des X-Registers erzeugt $FF, 
was zum Setzen der N-Flagge führt. Das ist dann unser 
Signal, daß die gesamte Kopfzeile übertragen wurde. Die 
N-Flagge wird durch den BPL-Befehl getestet: 

02C- 

6 BPL 02B8 

So weit, so gut. Wir hätten natürlich auch das X-Register 
von 0 an hochzählen können. Zum Beenden der Schleife 
wäre dann aber ein CPX-Befehl erforderlich gewesen, der 
jedesmal den X-Registerinhalt mit der Zahl $27 vergleicht. 

MERKE: Indexregister in Schleifen abwärts zu zählen, kann 
Rechenzeit einsparen! 

Ab $02CE soll der umgekehrte Vorgang, also das Zurück¬ 
schieben der vorher gespeicherten Kopfzeile in den Bild¬ 
schirmspeicher geschehen. Das einfachste wäre es sicher¬ 
lich, diesen Programmteil mit einem weiteren USR- 
Kommcndo zu starten. Das sähe dann so aus: 

1. USR-Befehl - schiebt Kopfzeile unter oberes ROM 

2. USR-Befehl - holt Kopfzeile zurück in Bildschirm¬ 

speicher 

3. USR-Befehl - schiebt wieder Kopfzeile unter ROM 

4. USR-Befehl - holt sie wieder zurück und so weiter. 

Weil aber das Umstellen des USR-Vektors durch POKEs 

vom Basic aus lästig ist, tun wir das einfach immer am Ende 
des betreffenden Maschinenprogrammabschnittes. Wir 


1 REM int#****#»*#***####**»***»»*#**»## 

<250> 

85 PRINT:PRINT"HIER GESCHIEHT DAS DURCH A 

—USR(1 

2 REM * 

* 

<229> 


IN{4SPACETZEILE 65" 

< 132> 

3 REM * TEST FUER DIE 1. VERSION DES 

* 

< 139> 

90 PRINT"DABEI IST 1 EIN DUMMY UND MIT A 

FANGEN 

4 REM * PROGRAMM-PROJEKTES 

* 

<048> 

C2SPACEJWIR AUCH NICHTS WEITER AN." 

<063> 

5 REM »VERSCHIEBEN VON 

* 

<009> 

95 PRINT"AUF TASTENDRUCK WIRD DER BILDSCHIRM 

6 REM * SPEICHERBEREICHEN 

# 

< 193> 

{2SPACE>GE-LOESCHT" 

<029> 

7 REM * 

* 

<234> 

100 

REM 

<243> 

8 REM # HEIMO PONNATH HAMBURG 1984 

* 

<081 > 

105 

REM ++UEBERSCHREIBEN DER KOPFZEILE ++ 

<046> 

9 REM #**»*•*■*#***»**#*»***##******■»*»** 

<002> 

110 

REM 

<253> 

10 REM 


< 153> 

115 

POKE 198,0:WAIT 198,1:PRINT CHR*(147) 

<090> 

15 REM +++++- USR-VEKTOR EINSTELLEN ++++ 

<065> 

120 

REM 

<007> 

20 REM 


< 163> 

125 

REM + + + NEUBEGINN DES PROGRAMMES ++++ 

< 173> 

25 POKE 7B5,182:POKE 786,2 


< 239 > 

130 

REM 

<01 7> 

30 REM 


< 173> 

135 

PRINT CHR*(19)"WAS AUCH IMMER JETZT IN DER 

35 REM ++++++ KOPFZEILE ++++++++++++++++ 

<013> 


KOPFZEILE <3SPACE>STEHT, ES WIRD BEIM 

2.USR" 

40 REM 


< 1B3> 


< 017 > 


45 PRINT CHR*(147)CHR*<18)"TEST 



140 

PRINT"VON DEM ZUVOR DURCH DAS ERSTE USR 

: BILD *0400=1024, FARBE *D800=55296"CHR*<14 


GE-C3SPACE>SPEICHERTE UEBERSCHRIEBEN" 

<07B> 

6) 


<071 > 

145 

PRINT:PRINT"WENN SIE JETZT EINE TASTE 

DRUEC 

50 PRINT:PRINT:PRINT"DURCH IRGENDEIN USR 

-KOMMAN 

KEN..." 

< 104> 

DO WIRD NUN IM PROGRAMM-MODUS" 


<020> 

150 

POKE 198,0:WAIT 198,1 

<246> 

55 PRINT"DER ERSTE TEIL DES VERSCHIEBE-PROGRAMM 

155 

REM 

<042> 

ES AUFGERUFEN" 


<110> 

160 

REM ++++++ 2. USR-AUFRUF +++++++++++ 

< 090> 

60 PRINT"DIE KOPFZEILE WIRD UNTER DAS 

OBERE 

165 

REM 

<052> 

ROMt2SPACE >KOPIERT. " 


<215> 

170 

A=USR ( 1 ): PRINT 

< 169> 

65 REM 


<208> 

175 

PRINT"IST DIE ALTE KOPFZEILE ZURUECK 

IN 

70 REM ++++++ 1. USR-AUFRUF +++++++++ 


<042> 


DEN{3SPACE > BILDSCHIRMSPEICHER GESCHOBEN. " 

75 REM 


<218> 


< 1 64 > 


80 A=USR ( 1 ) 


<124> 

180 

END 

<052> 


Bild 18. Test und Demonstration der Verschieberoutine. 

Das Programm zeigt das Ein- und Ausschalten einer Kopfzeile auf dem Bildschirm 
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schreiben also das LSB der Programmfortführung ($CE) 
nach $311. Das MSB bleibt unverändert $02. 

02C8 LDA #CE 

02CA STA 0311 
02CD RTS 

Mit dem RTS sind wir wieder im Basic-Programm gelandet, 
welches nun normal weiterverarbeitet wird. Erst ein neues 
USR-Kommando - im Programm oder im Direktmodus - star¬ 
tet den zweiten Teil unseres Maschinenprogrammes (weil in 
$0311, - der Einsprungpunkt des USR-Befehls - die Start¬ 
adresse der auszuführenden Routine steht). 

In diesem 2. Teil müssen wir erst einige Befehle geben, die 
Sie jetzt vielleicht noch nicht verstehen. Das hängt damit 
zusammen, daß zum Herauslesen des RAM unter dem ROM 
das ROM ausgeschaltet werden muß (entspricht POKE 
1,53): 


Falls nun wieder ein USR-Kommando auftaucht, soll die 
Kopfzeile mit dem 1. Programmteil unter das obere ROM 
gelegt werden wie am Anfang. Wir müssen deshalb den USR- 
Vektor auf $02B6 zurückschreiben: 

02EA LDA #B6 

02EC STA 0311 
02 EF RTS 

Das wärs! Wenn nun im Programm oder im Direktmodus 
wieder ein USR-Befehl auftritt, kann das Ganze von vorne 
beginnen. In dieser Version wird jedesmal eine neue Kopf¬ 
zeile hin- und wieder zurückgeschoben. Wenn Sie eine ein¬ 
mal festgelegte Kopfzeile immer wieder benutzen möchten, 
dann stellen Sie den USR-Vektor einfach nicht mehr zurück: 
Lassen Sie also die Befehle bei 02EA und 02EC weg. Das 
Programm endet in dem Fall mit: 

02EA RTS 


02CE 

LDA 01 

02D0 

PHA 

02D1 

LDA #35 

02D3 

STA 01 

(Der PHA-Befehl dient hier zur Zwischenspeicherung des 
Akku-Inhaltes). Das ist hiermit geschehen und wir kommen 
wieder in bekannte Gefilde mit der Ausleseschleife: 

02D5 

LDX #27 

02D7 

LDA E000.X 

02DA 

LDY E028.X 

02DD 

STA 0400,X 

02E0 

TYA 

02E1 

STA D800.X 

02E4 

DEX 

02E5 

BPL 02D7 


Damit ist die gesamte gespeicherte Kopfzeile wieder 
zurückgeholt und wir können das ROM wieder einschalten: 
02E7 PLA 
02E8 STA 01 


Befehls¬ 

wort 

Adressierung 

Byte¬ 

zahl 

Code 

Hex Dez 

Takt¬ 

zyklen 

Beeinflussung 
von Flaggen 

LDA 

absolut,X 

3 

BD 

189 

4 

N,Z 


0-page-abs,X 

2 

B5 

181 

4 

N,Z 


absolut,Y 

3 

B9 

185 

4 

N,Z 

LDX 

absolut.Y 

3 

BE 

190 

4 

N.Z 


0-page-abs,Y 

2 

B6 

182 

4 

N,Z 

LDY 

absolut,X 

3 

BC 

188 

4 

N,Z 


0-page-abs,X 

2 

B4 

180 

4 

N.Z 

STA 

absolut,X 

3 

9D 

157 

5 

/ 


absolut.Y 

3 

99 

153 

5 

/• 


0-page-abs,X 

2 

95 

149 

4 

1 

STX 

O-page-aba.Y 

2 

96 

150 

4 

/ 

STY 

0-page-abs,X 

2 

94 

148 

4 

1 

INC 

absolut,X 

3 

FE 

254 

7 

N.Z 


0-page-abs,X 

2 

F8 

246 

6 

N,Z 

DEC 

absolut,X 

3 

DE 

222 

7 

N.Z 


O-page-abs.X 

2 

DB 

214 

6 

N,Z 

ADC 

absolut,X 

3 

7D 

125 

4 

N,V,Z,C 


absolut.Y 

3 

79 

121 

4 

N,V,Z,C 


0-page-abs,X 

2 

75 

117 

4 

N,V,Z,C 

SBC 

absolut,X 

3 

FD 

253 

4 

N,V.Z,C 


absolut.Y 

3 

F9 

249 

4 

N,V,Z,C 


0-page-abs,X 

2 

F5 

245 

4 

N,V,Z,C 

CMP 

absolut,X 

3 

DD 

221 

4 

N.Z.C 


absolut.Y 

3 

D9 

217 

4 

N,Z,C 


0-page-abs,X 

2 

D5 

213 

4 

N.Z.C 

BIT 

absolut 

3 

2C 

44 

4 

N.V.Z 


0-page-abs. 

2 

24 

36 

3 

N.V.Z 

CLV 

Implizit 

1 

B8 

184 

2 

V 

NOP 

Implizit 

1 

EA 

234 

2 

/ 

TAX 

Implizit 

1 

AA 

170 

2 

N,Z 

TAY 

Implizit 

1 

A8 

168 

2 

N.Z 

TXA 

Implizit 

1 

8A 

138 

2 

N,Z 

TYA 

Implizit 

1 

98 

152 

2 

N,Z 

JMP 

absolut 

3 

4C 

76 

3 

/ 


indirekt 

3 

6C 

108 

5 

/ 

JSR 

absolut 

3 

20 

32 

6 

/ 


Tabelle 8. Zusammenfassung aller wichtigen Daten der 
neuen Befehle 



Eine wichtige Bemerkung noch: So bequem der Ort auch 
ist, an dem unser kurzes Programm steht, er hat einen gravie¬ 
renden Nachteil: Falls Sie mittels einer RESET-Taste oder per 
Software einen Basic-Kaltstart durchführen, geht unser Pro¬ 
gramm flöten! Dieser Speicherbereich wird im Reset- 
Programm nämlich mit lauter Nullen überschrieben. Deswe¬ 
gen speichern Sie es bitte bald ab. 

In Bild 18 finden Sie ein kleines Testprogramm für unsere 
Verschieberoutine, und in Tabelle 8 eine Zusammenfassung 
aller wichtigen Daten der neuen Befehle. 

33. Wir stapeln 


• r 1 a rt',:/ 

ln Kapitel 28 haben wir beim JSR-Befehl schon den Stapel 
etwas kennengelernt. Aber so ganz genau wissen wir's ja 
nqph nicht, was das ist. Deswegen jetzt mal im Detail: Der Sta¬ 
pel, auch Prozessorstack genannt, ist der Speicherbereich 
von dezimal 256 ($100) bis dezimal 511 ($1 FF), der direkt 
von unserer CPU verwaltet wird. Das ist also die gesamte 
Page 1. Ähnlich wie bei der String-Verwaltung geschieht auch 
hier das Füllen von oben nach unten. Das erste Byte, welches 
in den Stack geschoben wird, kommt also nach $1FF, das 
nächste nach $1FE und so weiter. Voll ist der Stapel, wenn 
auch $100 besetzt wurde (siehe Bild 19). 

Warum heißt das Ding nun eigentlich Stapel? Das erklärt 
sich aus dem Zugriffs-Prinzip. Man spricht von einer LIFO- 
Struktur, von »Last In - First Out«, zu deutsch »zuletzt hinein - 
zuerst heraus«. Das zuerst hineingebrachte Byte befindet 
sich am Speicherboden ($1FF), das zuletzt eingebrachte an 
der Speicherspitze. Stellen Sie sich einen Stapel Akten vor 
(Bild 20). 

Offensichtlich wurde der 4. Aktenordner zuletzt auf den 
Stapel gesteckt. Er kann zuerst heruntergeholt werden. An 
die Akte 1 kommen wir erst heran, wenn alle anderen herun¬ 
tergenommen worden sind. Genauso verhält es sich mit dem 
Prozessorstack: Um an das unterste Byte des Stapels heran¬ 
zukommen, müssen erst Byte für Byte die darüberliegenden 
(nach Bild 19 eigentlich die darunterliegenden) weggeschafft 
werden. 

Mit dem Prinzip des Stapelspeichers werden Sie sich aus¬ 
kennen, wenn Sie schon mal andere Programmiersprachen 
als Basic ausprobiert haben: In Forth beispielsweise operie¬ 
ren Sie ständig mit Stapeln. 

Damit wir - und der Prozessor - den Überblick über den 
Stack behalten, gibt es dankenswerterweise noch einen Sta¬ 
pelzeiger (Stackpointer), der jeweils auf den nächsten freien 
Platz des Stapels weist. Da gibt’s nun aber ein kleines Pro¬ 
blem: Der Stapel belegt die komplette Seite 1. 

Ein Stapelzeiger, der auf zum Beispiel $01 FE zeigen soll, 
müßte das MSB (also 01) und das LSB (also FE) in zwei Bytes 
lagern. Der Stapelzeiger ist aber nur 8 Bit groß ... Freundli¬ 
cherweise sorgt unser Mikroprozessor automatisch für das 
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neunte Bit. Der Zeiger zählt also immer von $FF an rückwärts 
bis $00 und weist dabei von $1FF bis $100. 

Der Stack hat in unserem Computer drei Aufgaben zu 
erfüllen: 

1) Organisation von Unterprogramm-Adressen 

2) Zwischenspeicherung bei Unterbrechungen (Interrupts) 

3) vorübergehende Datenspeicherung 

Die Rolle des Stapels bei Unterprogramm-Aufrufen haben 
wir in der letzten Folge schon ausgiebig behandelt. Die soge¬ 
nannten Interrupts heben wir uns noch für später auf - dazu 
fehlen uns noch ein paar Kenntnisse. Mit der vorübergehen¬ 
den Speicherung von Daten befassen wir uns gleich, wenn 
wir an die Befehle zur Stackbehandlung herangehen. 

Zuvor - weil das hier gerade ganz gut paßt - noch ein paar 
Gedanken zur rekursiven Programmierung. Gemeint ist damit 
eine Programmstruktur, in der sich ein Unterprogramm selbst 
aufruft. Auch GOSUB-Befehle in Basic bewirken Einträge der 
Rücksprungadressen im Stapel. Auf diese Weise ergibt sich 
für unseren Computer eine begrenzte Verschachtelungstiefe 
bei Unterprogrammaufrufen. Diese wird bei Rekursion 
besonders schnell erreicht, und das bewirkt die Ausgabe 
einer OUT OF MEMORY-Fehlermeldung. 

34. Aktives Stapeln mit 
PHA, PLA, PHP, PLP, TSX und TXS 


Mit dem Stapel haben wir 256 Speicherplätze für eine 
schnelle Zwischenspeicherung aller möglichen Daten zur 
Verfügung. Weil der 6510 (und natürlich auch der 6502) die¬ 
sen Speicherbereich wie die Zeropage behandelt, geht das 
Speichern sehr schnell. Man muß nur immer die spezielle 
LIFO-Struktur berücksichtigen. 

Im Grunde braucht man eigentlich nur zwei Befehle: Etwas 
auf den Stapel schieben (in der Literatur oft als Push-Befehl 
bezeichnet) und etwas herunterziehen, das nennt man dann 
Pull- oderauch Pop-Befehl. 

Unser Prozessor kennt insgesamt sechs auf den Stapel 
wirkende Anweisungen: 

PHA Damit schreibt man den Akku-Inhalt in den Stapel 
(»PusH-Accumulator«). Der Stapelzeiger wird automatisch 
eine Position heruntergezählt (er rechnet ja von $FF an 
abwärts!). Der Inhalt des Akku wird dabei nicht verändert. 
Deswegen bleibt auch das Status-Register (also die ganzen 
Flaggen: N V B DIZ C) unbeeinflußt. 

PLA »PuLI Accumulator«. Das ist dar umgekehrte Weg: Das, 
was zuoberstauf dem Stapel liegt, wird in den Akku geschrie¬ 
ben. Dadurch wird ein Stapelplatz frei, was den Stapelzeiger 
veranlaßt, um 1 zu wachsen. Weil das, was da in den Akku 
geladen wird, 0 sein kann oder auch negativ (also mit gesetz¬ 


tem Bit 7), wird unter Umständen auch die N- oder die Z- 
Flagge verändert. 

Weniger mit Datenzwischenspeicherung haben die ande¬ 
ren Befehle zur Stapel-Manipulation zu tun: 

PHP Das steht für »PusH Processor Status«, also »schiebe 
das Prozessor-Status-Register auf den Stapel«. Der aktuelle 
Flaggenstand kann damit aufbewahrt werden. Das Status- 
Byte ändert seinen Inhalt dabei ebensowenig wir der Akku bei 
PHA. Auch hier wird der Stapelzeiger freundlicherweise um 1 
herabgezählt. 

PLP »PuLI Processor Status«, »hole den Prozessor-Status 
vom Stapel« ist der umgekehrte Befehl, der (wie bei PLA in 
den Akku) das, was zuoberst im Stapel liegt, in das Flaggen- 
Register schreibt. Da sollte man höllisch aufpassen, was man 
damit einlädt: Das ist eine feine Gelegenheit für den Compu¬ 
ter, abzustürzen. Der Stapelzeiger wird - wie gehabt - um 1 
erhöht. 

Nicht direkt mit dem Stapel, sondern mit dem Stapelzeiger 
befassen sich die beiden folgenden Befehle: 

TSX »Transfer Stack-pointer into X«, zu deutsch, »schiebe den 
Stapelzeiger ins X-Register« eröffnet die Möglichkeit, den 
Stapelzeiger zu lesen. Dabei bleibt er selbst unverändert 
erhalten. Weil nun im X-Register alle Werte zwischen $FF und 
0 auftreten können, werden auch die Flaggen beeinflußt (N- 
und Z-Flagge). 

TXS Den umgekehrten Weg geht »Transfer X into Stackpoin¬ 
ter« = »übertrage X-Register-Inhaltin den Stapelzeiger«. Das 
ist der einzige Befehl, der es erlaubt, den Stapelzeiger mit 
einem von uns kontrollierten Wert zu laden. Der Inhalt des X- 
Registers bleibt dabei unverändert, demzufolge interessieren 
sich auch die Flaggen nicht dafür. 

Alle sechs Anweisungen bestehen nur aus einem Byte und 
sind imoiizit adressiert. Die Stapelzeiger-Befehle TXS und 
TSX benötigen zwei Taktzyklen, die Push-Befehle je drei und 
die Pull-Befehle vier Taktzyklen zur Bearbeitung. 

Es ist etwas schwierig, Stapel-Operationen direkt zu verfol¬ 
gen. Die meisten Assembler - so anscheinend auch der 
SMON - gebrauchen ebenfalls diesen Speicherbereich. Ver¬ 
langt man beispielsweise mit dem SMON-Kommando M 0100 
01 FF eine Darstellung des Stapelinhaltes, dann findet man 
eine ganze Menge Spuren der Arbeit des Assemblers. Ver¬ 
sucht man die zu löschen oder zu überschreiben, zum Bei¬ 
spiel mit dem nachfolgenden kleinen Programm, dann hat der 
Assembler die Mühe schon wieder zunichte gemacht, wie 
man durch erneutes M 0100 01FF schnell sehen kann. Die¬ 
ses kleine Programm soll unterhalb des durch den Stapelzei¬ 
ger bezeichneten Bereichs 32 Nullen in den Stapel 
schreiben: 

8000 LDA #00 

8002 TSX 
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Der Stapelzeiger wird ins X-Register gerettet. 

8003 LDY #20 

8005 PHA 

Wir schieben eine Null auf den Stapel. 

8006 DEY 

8007 BNE 8005 

8009 TXS 

Nach 32 Eintragungen von Nullen stellen wir den alten 
Stapelzeiger wieder her. 

800A BRK 

Erneutes Kommando M 0100 01 FF zeigt keine Nullen. Erst 
wenn wir anstelle des TXS in Zeile 8009 ein BRK schreiben, 
den Stapelzeiger also nicht zurückschreiben, erscheinen 
unsere Nullen. Sieht man genau hin, dann stellt man fest, daß 
unterhalb des durch den Stapelzeiger bezeichneten 
Bereichs genau der gleiche Inhalt zu finden ist wie vorher, nur 
eben mit dem Stapelzeiger verschoben. 

Ganz konnte ich dies Rätsel noch nicht lösen, muß ich 
gestehen, aber für den Gebrauch des Stapels ändert sich 
dadurch für uns nichts. Worauf muß man achten bei Stapel¬ 
operationen? Ganz einfach: Zwischen dem Ablagern eines 
Wertes auf dem Stapel und dem Zurückholen muß für jeden 
Push-Befehl ein Pull-Befehl vorhanden sein, für jedes weitere 
PHA ein PLA, für jedes JSR ein RTS. Nur wenn wir auf diese 
Symmetrie der Push- und der Pull-Befehle achten (und wie 
Sie noch aus der vorhergegangenen Ausgabe wissen, sind ja 
JSR und RTS ebenfalls dazuzurechnen), können wir sicher 
sein, daß der Stapelzeiger zum Zeitpunkt des Rückholens 
eines Wertes vom Stapel auch wirklich darauf deutet. Wenn 
man also nicht ganz genau weiß, wie der verwendete Assem¬ 
bler den Stapel nutzt, sollte man auf Operationen mit den 
Befehlen TSX und TXS verzichten. 

Nun können Sie schon einen Teil der bislang unbekannten 
Programmsequenz aus der letzten Folge verstehen. Im zwei¬ 
ten Programmteil hatten wir mit 
02CE LDA 01 

02D0 PHA 

den Inhalt der Speicherstelle 01 in den Akku geladen und auf 
den Stapel geschoben. Später - nach einigen weiteren Ope¬ 
rationen - wurde dann dieser Speicherinhalt wiederherge¬ 
stellt durch 

02E7 PLA 
02E8 STA 01 

Was aber hat es mit dieser Speicherstelle 01 auf sich? Das 
soll nun als nächstes erklärt werden. 

35. Sein oder Nichtsein: 

Das Rätsel des Prozessorports 


Der Commodore 64 hat 64 KByte an RAM zu bieten. Außer¬ 
dem aber verfügen wir beim normalen Programmieren über 
weitere 24 KByte, in denen das Betriebssystem, der Basic- 
Interpreter, Ein- und Ausgabebausteine und der Zeichen¬ 
speicher stecken. Wie Sie wissen, umfaßt der Adreßbus aber 
nur 16 Bit, was uns lediglich 65536 Speicherzellen, also 64 
KByte adressieren läßt. Des Rätsels Lösung liegt darin, daß 
einige Adressenbereiche mehrfach belegt sind. Man kann 
das vergleichen mit dem Trick des Kastens mit dem doppelten 
Boden. Welcher Kasteninhalt gerade dem Prozessorzugriff 
offensteht, wird durch den Prozessorport, das sind die Spei¬ 
cherstellen 00 und 01, gesteuert. 

Dr. Helmuth Hauck hat in seiner Serie »Memory Map mit 
Wandervorschlägen« (64’er, Ausgabe 11 (1984), Seite 135 
ff.) die genaue Funktion jedes Bits dieser beiden Speicher¬ 
stellen erklärt. Wer noch mehr wissen möchte - auch über die 
Wirkungsweise der beiden Leitungen »Game« und »Exrom« - 
sollte das nachlesen im »Commodore 64 Programmers Refe¬ 
rence Guide« ab Seite 260. Für uns als angehende Assem¬ 


bler-Alchimisten ist die Speicherstelle 1 aber so wichtig, daß 
wir ganz kurz hier nochmal darauf eingehen. 

Die Speichersteuerfunktionen haben die Bits 0 bis 2 der 
Speicherstelle 1. Je nach Belegung dieser Bits gestaltet sich 
die 64-KByte-Landschaft unseres Computers wie in Tabelle 
9 gezeigt. 

Was können wir als Maschinen-Programmierer mit dieser 
Kenntnis anfangen? Theoretisch stehen uns für unsere Pro¬ 
gramme damit 64 KByte offen. Praktisch werden wir nur in 
den seltensten Fällen auf die Ein- und Ausgabe-Bausteine 
verzichten können. Lassen wir ein reines Maschinenpro¬ 
gramm laufen, ohne jeglichen Rückgriff auf Interpreter oder 
Betriebssystem, dann haben wir immerhin noch zirka 60 
KByte zur freien Verfügung. Benutzen wir Routinen aus die¬ 
sen beiden ROM-Bausteinen, dann müssen wir sie allerdings 

- zumindest für den Zeitpunkt des Routineaufrufs - wieder 
einschalten. Wenn wir - was wohl meistens der Fall sein wird 

- Kombinationen von Basic- und Assemblersprache verwen¬ 
den, können wir den gesamten Basic-Speicher bis $A000 
frei halten, können auch den bei allen Beispielprogrammen so 
beliebten Bereich $0000 bis $D000 leer lassen und packen 
unsere Routinen weitgehend unter die ROMs, die dann 
jeweils beim Aufruf abgeschaltet werden. So haben wir eine 
Menge zusätzlichen Speicherplatz ergattert. 

Nun können wir auch den letzten Rest des bislang unklaren 
Programms aus Kapitel 32 verstehen. Nachdem wir den 
Inhalt der Speicherstelle 1 auf den Stapel gerettet haben (Zei¬ 
len $02CE und $02D0), schreiben wir $35 in den Pro¬ 
zessorport: 

02D1 LDA #35 

02D3 STA 01 

$35 ist binär 0011 0101. Die Bits 0 bis 2, auf die es uns in die¬ 
sem Zusammenhang ankommt, bewirken nun das Ausschal¬ 
ten des Interpreters und des Betriebssystems. Die Ein- und 
Ausgabe-Bausteine bleiben aktiv. Im weiteren Programmver¬ 
lauf lesen wir die Speicherinhalte ab $E000, wobei wir nun 
den RAM-Inhalt erfassen. Das sollte vielleicht nochmal klar¬ 
gestellt werden: Jedes Hineinschreiben in die mehrfach 
belegten Speicherbereiche (dabei sind die Ein- und 
Ausgabe-Bausteine aber ausgenommen) wird automatisch in 
den RAM-Bereich umgelenkt. Das ist ja auch klar: In ein ROM 
kann eben nicht geschrieben werden. Deshalb braucht man 
dabei die ROMs nicht auszuschalten. Jeder Lesevorgang 
greift aber auf die ROMs zu, weshalb man sie in unserem Fall 
ausschalten muß. Wie schon oben beim Stapel erklärt, schal¬ 
ten wir durch das Zurückholen des vorher dorthin geretteten 
alten Inhalts der Speicherstelle 1 in den Prozessorport wie¬ 
der den Normalzustand ein. 

36. Die indirekte Adressierung 


Wir werden nun die beiden letzten noch ausstehenden Arten 
der Adressierung kennenlernen. Beitfes sind indirekte Adres¬ 
sierungsarten. Mit dem indirekten JMP-Befehl (zum Beispiel 

Speicherstelle 1 $A000-$BFFF $DOOO-$QFFF $E000-$FFFF 


Bits 2 

1 

0 




1 

1 

1 

Basic 

I/O 

Kernel 

1 

1 

0 

RAM 

I/O 

Kernel 

1 

0 

1 

RAM 

I/O 

RAM 

1 

0 

0 

RAM 

RAM 

RAM 

0 

1 

1 

Basic 

Zeichen 

Kernel 

0 

1 

0 

RAM 

Zeichen 

Kernel 

0 

0 

1 

RAM 

Zeichen 

RAM 

0 

0 

0 

RAM 

RAM 

RAM 


Tabelle 9 zeigt, welche Bausteine bei verschiedener Be¬ 
legung der Bits 0 bis 2 des Prozessorports (Speicher¬ 
stelle 1) eingeschaltet sind. (Frei nach Dr. Hauck, 64’er 
Ausgabe 11/84, Seite 136) 
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JMP(0300)) sind wir in Kapitel 28 schon vertraut geworden. 
Wir hatten auch gelernt, daß es sich hierbei um einen absolu¬ 
ten Einzelgänger handelt, der nur für so einen Sprung erlaubt 
ist. Ebenso haben wir die indizierte Adressierung zu beherr¬ 
schen gelernt: Das war die Sache mit den Indexregistern X 
oder Y. Eine Kombination aus beiden (also der indirekten und 
der indizierten) Adressierungsarten sind die indiziert¬ 
indirekte und die indirekt-indizierte Adressierung. 

Die indirekt-indizierte Adressierung 

Fangen wir mit der sehr häufig benutzten indirekt¬ 
indizierten Adressierung an: Man nennt sie auch »indirekt Y« 
oder »nach-indizierte indirekte« Adressierung. Am besten 
sehen wir uns mal so einen Befehl an: 

LDA (FA) ,Y 

Die Klammer erinnert uns an den indirekten JMP-Befehl. 
Tatsächlich hat sie hierauch dieselbe Funktion: In FA und FB 
steht ein Zeiger auf eine Adresse. Nehmen wir mal an, die 
Belegung der Speicher wäre: 

FA 01 

FB 80 

und im Y-Register stünde eine 5. Der Zeiger FA/FB weist also 
auf die Speicherstelle 8001. Da haben wir also wieder das 
Prinzip des toten Briefkastens. Der Computer guckt in den 
hohlen Baum FA/FB (LSB in FA, MSB in FB) und findet dort die 
Treffpunktadresse. Nun sind diese toten Briefkästen aber 
auch den gegnerischen Alchimisten-Agenten bekannt. Es 
kommt also noch ein Trick dazu: Zur dort aufgefundenen 
Adresse wird der Inhalt des Y-Registers addiert. In unserem 
Fall fanden wir also in FA/FB die Adresse 8001, im Y-Register 
steht eine 5, somit ist die endgültige Adresse 8001 + 5 = 
8006. Unser Beispiel »LDA(FA),Y« bewirkt daher, daß in den 
Akku der Inhalt der Speicherstelle 8006 geladen wird. Nach¬ 
indiziert nennen manche die Adressierung deswegen, weil 
zunächst dem Zeiger nachgegangen wird, der in unserem 
Beispiel auf 8001 weist, und erst danach durch Addition des 
Inhalts des Y-Registers die endgültige Speicherstelle (hier 
also 8006) berechnet wird. 

Als Zeiger (also die Adresse in der Klammer) sind nur Zero¬ 
pagespeicherstellen verwendbar, als Indexregister darf man 
hier nur das Y-Register gebrauchen. Von den bisher behan¬ 
delten Befehlen können ADC, CMR LDA, SBC und STA mit 
dieser Adressierungsart verwendet werden. Genaueres fin¬ 
den Sie wieder in der Tabelle mit der Befehls¬ 
übersicht (Tabelle 10). 

Bevor wir uns dem anderen indirekten Adreß-Modus 
zuwenden, wollen wir uns überlegen, wozu man die indirekt- 


Befehls¬ 

wort 

Adressierung 

Byte¬ 

zahl 

Code 

Hex Dez 

Takt¬ 

zyklen 

Beeinflussung 
von Flaggen 

LDA 

indirekt X 

2 

AI 

161 

6 

N.Z 


indirekt Y 

2 

Bl 

177 

5* 

N,Z 

STA 

indirekt X 

2 

81 

129 

6 

— 


indirekt Y 

2 

91 

145 

6 

— 

ADC 

Indirekt X 

2 

61 

97 

6 

N,V,Z,C 


indirket Y 

2 

71 

113 

5* 

N.V.Z.C 

SBC 

indirekt X 

2 

El 

225 

6 

N,V,Z,C 


indirekt Y 

2 

Fl 

241 

5* 

N,V,Z,C 

CMP 

indirekt X 

2 

CI 

193 

6 

N,Z,C 


Indirekt Y 

2 

Dl 

209 

5* 

N.Z.C 

PHA 

implizit 

1 

48 

72 

3 

— 

PLA 

implizit 

1 

68 

104 

4 

N,Z 

PHP 

implizit 

1 

08 

8 

3 

— 

PLP 

implizit 

1 

28 

40 

4 

alle 

TSX 

implizit 

1 

BA 

186 

2 

N,Z 

TXS 

implizit 

1 

9A 

154 

2 

— 


* Wenn bei der Befehlsausführung eine Page-Grenze überschritten wird, muß noch ein Taktzyklue 
dazugorechnet werden. 


Tabelle 10. Übersicht der in dieser Folge vorgestellten 
Befehle 


indizierte Adressierung verwendet. Wie Sie sich natürlich 
erinnern können, konnte man mit der normalen indizierten 
Adressierung, zum Beispiel mit 
LDA 8000,Y 

durch Variation des Indexregisters (hier das Y-Register) 256 
Speicherstellen erfassen (Y von FF herunter bis 00). Will man 
mehr als diese 256 berücksichtigen, dann muß eine neue 
Basis (im Beispiel also anstelle der 8000) gewählt werden. 
Um das zu illustrieren, sehen wir uns mal den Anfang eines 
Programms an, welches den gesamten Bildschirminhalt aus¬ 
liest und nach E000 schreibt: 


1000 

LDY 

#00 

1002 

LDA 

0400,Y 

1005 

STA 

E000.Y 

1008 

LDA 

0500,Y 

100B 

STA 

E100.Y 

100E 

LDA 

0600,Y 

1011 

STA 

E200,Y 

1014 

LDA 

0700,Y 

1017 

STA 

E300.Y 

101A 

DEY 


101B 

BNE 

1002 


Wie Sie sehen, erfordert das durch die Tatsache, daß vier 
Blöcke zu je 256 Bytes übertragen werden müssen, immer¬ 
hin schon 28 Bytes Programmtext. Nun soll die indirekt¬ 
indizierte Adressierung verwendet werden, um dieselbe Auf¬ 
gabe zu lösen. Wir legen zunächst zwei Zeiger auf der Zero¬ 
page fest: 


FA/FB sollen die Bildschirmadresse enthalten 
FC/FD die Zieladresse ab E000. 


iOOO 

LDA 

#00 

1002 

STA 

FA 

1004 

STA 

FC 


Das waren die LSBs der Zeiger, es folgen die MSBs: 


1006 

LDA 

#04 

1008 

STA 

FB 

100A 

LDA 

#E0 

100C 

STA 

FD 


Damit sind die Zeiger festgelegt. Es sind vier Blöcke zu je 
256 Bytes zu übertragen. Diese Blockanzahl legen wir ins 
X-Register als Zähler: 

100E LDX #04 

Dann laden wir ins Y-Register ebenfalls einen Zähler (den 
Index): 

1010 LDY #00 

Jetzt kann die eigentliche Übertragungsschleife starten: 


1012 

LDA 

(FA),Y 

1014 

STA 

(FC),Y 

1016 

DEY 


1017 

BNE 

1012 


Wenn das Y-Register wieder bei 0 angekommen ist (von der 
ersten 0 nach einem Unterlauf über FF, FE und so weiter bis 
0), ist der erste Block übertragen. Wir erhöhen nun das MSB 
beider Zeiger um 1: 

1019 INC FB 

101B INC FD 

Außerdem zählen wir den Blockzähler um 1 herunter: 

101D DEX 

101E BNE 1012 


Wenn das Programm auf diese Weise auch drei Byte mehr 
Speicherplatz braucht, ist doch leicht der Vorteil zu sehen: 
Müssen wir nämlich (statt nur vier) mehr Blöcke übertragen 
(bis zu 255), dann verändert sich unser zweites Programm 
um keinen Deut (außer dem Zähler im X-Register, der nun mit 
der jeweils anderen Block-Anzahl geladen wird), während die 
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erste Programmtechnik für jeden weiteren Block um sechs 
Bytes erweitert werden muß. 

Es gibt noch eine ganze Reihe von Anwendungsmöglich¬ 
keiten, die die indirekt-indizierte Adressierung so attraktiv 
machen. Für Geschwindigkeitsfanatiker (ich selbst bin bei 
Grafik-Fragen auch einer!) muß aber gesagt werden, daß dem 
Speicherplatzvorteil ein Geschwindigkeitsnachteil gegen¬ 
übersteht. Jeder indirekt-indiziert adressierte Befehl braucht 
einen Taktzyklus länger als der vergleichbare absolut¬ 
indizierte Befehl. Zu diesen Feinheiten werden wir aber spä¬ 
ter noch kommen. 

Die indiziert-indirekte Adressierung 

Wenden wir uns nun der letzten noch fehlenden Adressie¬ 
rungsart zu, der indiziert-indirekten. Man nennt sie auch »vor¬ 
indizierte indirekte« oder »indirekt X« Adressierung. Sehen 
wir auch hier zunächst ein Beispiel an: 

STA (FA,X) 

Auch hier drückt die Klammer wieder aus, daß der 
Klammerinhalt ein Zeiger ist. Das ist jetzt aber nicht das Byte¬ 
paar FA/FB, sondern zur angegebenen Adresse FA soll noch 
der Inhalt des X-Registers addiert werden. Nehmen wir mal 
an, dort stünde eine 2, dann wird der Zeiger FC/FD mit diesem 
Befehl angesprochen, denn FA+2 = FC und entsprechend 
FB + 2 = FD. Wenn in den Speicherstellen FA bis FF folgender 


Inhalt zu finden ist: 



OOFA 

00 



OOFB 

04 

' FA/FB = 

0400 

OOFC 

00 



OOFD 

EO 

FC/FD = 

E000 

OOFE 

10 



OOFF 

80 

FE/FF = 

8010 


dann könnte das eine ganze Tabelle von Zeigern sein, die 
jeweils durch den X-Registerinhalt angesprochen werden. 
Der Akkuinhalt wird in unserem Beispiel nach 0400 geschrie¬ 
ben, wenn im X-Register 0 steht, nach E000, wenn das 
X-Register eine 1 enthält und nach 8010, wenn stattdessen 
eine 2 im X-Register zu finden ist. 

Sie werden sich vielleicht auch bei diesem Beispiel gefragt 
haben, was passiert, wenn im X-Register unseres Beispiels 
eine 6 steht. Nun, unser 8-Bit-Prozessor läuft über, und wir 
finden einen Zeiger 00/01. 

Rein theoretisch ist diese Adressierungsweise ganz inter¬ 
essant. Aber auf der Zeropage ist's reichlich eng, und nur sel¬ 
ten kommt man daher in die Lage, dort eine Zeigertabelle ein¬ 
zurichten, die man mittels des X-Registerinhalts und der indi¬ 
ziert-indirekten Adressierung abgreifen kann. Die Bedeutung 
dieser Adressierungsart ist also nur recht gering. Außerdem 
erfordert sie sechs Taktzyklen zur Bearbeitung und ist somit 
auch noch recht langsam. Von den bisher bekannten Befeh¬ 
len sind die folgenden damit verwendbar: ADC, CMP, LDA und 
STA. 

Bevor wir die Adressierung zu den Akten legen, sei noch 
erwähnt, daß manche Lehrbücher noch eine weitere Art, die 
Akkumulator-Adressierung, unterscheiden. Betroffen sind 
davon vier 1-Byte-Befehle, die wir noch kennenlernen wer¬ 
den und die man ebensogut als implizit adressiert ansehen 
kann. 


37. Die ersten Kernel-Routinen 


Sicher werden Sie alle schon von der Kernel-Routine FFD2 
gehört haben und sie vielleicht auch schon verwenden. Wenn 
nicht, um so besser, denn dann sind Sie noch nicht vom ein¬ 
seitigen Gebrauch dieses Instruments verdorben. Die mei¬ 
sten Kernel-Adressen sind nämlich sehr vielseitig verwend¬ 
bar, je nach den Vorgaben. Das ist wie mit einem Haushaltsge¬ 
rät, das immer nur zum Rühren von Kuchenteig eingesetzt 


wird. Dabei kann man damit auch noch Saft machen, Gurken 
schnitzeln, Getränke mixen ... Genauso wie man in diesem 
etwas schiefen Vergleich die Gebrauchsanleitung kennen 
sollte, um die ganzen anderen Funktionen ausnutzen zu kön¬ 
nen, muß man hier noch einige Dinge über die Kernel-Aufrufe 
beherzigen. 

Für jede Verwendung der Kernel-Sprungtabelle sollte man 
sich angewöhnen, dies in drei Schritten zu tun: 

1) die nötigen Vorbereitungen treffen 

2) Routineaufruf 

3) Fehlerabfrage und -behandlung 

Fangen wir mit dem Punkt »Vorbereitungen« an. Einige Rou¬ 
tinen brauchen Informationen, die ihnen erst durch andere 
Kernel-Routinen beschafft werden. Ruft man diese anderen 
Routinen vorher nicht auf, dann funktioniert auch der 
erwünschte Aufruf nicht richtig. Wenn die Routine einen 
bestimmten Wert im Y-Register erwartet, dann muß der dort 
auch stehen. Wenn nicht, dann geht das Programm in die 
Hose. Bei jeder Kernel-Routine, die hier beschrieben wird, 
gebe ich alle nötigen Vorbereitungen an. 

Der Routinenaufruf sollte immer mittels JSR erfolgen. Alle 
auf diese Weise aus der Kernel-Sprungtabelle abzurufenden 
Programme enden nämlich mit einem RTS. Damit keine wichti¬ 
gen Werte aus dem Aufrufprogramm überschrieben werden, 
man sie also vor dem Aufruf der Kernel-Routine irgendwohin 
retten kann, gebe ich auch noch an, welche Register durch 
die Routine verändert werden und wieviel Stapelspeicher¬ 
platz bereitgehalten werden muß. 

Die Routinen sind so'konstruiert, daß beim Auftreten eines 
Fehlers nach der Rüekkfcbr das Carry-Bit gesetzt ist. Durch 
Untersuchen des Carry können so Fehler rechtzeitig erkannt 
und behandelt werden. Irn .Akku findet man in dem Fall dann 
eine Fei.: rnummer. Die Ausgabe der Fehlermeldung erfolgt 
also nicht - wie im Basic - in Klarschrift. In Tabelle 11 sind die 
Fehlernummern und ihre Bedeutung aufgelistet. 

Welche Fehlernummern eine Routine ausgeben kann, wird 
ebenfalls von mir bei jeder Routinen-Besprechung ange¬ 
geben. 

Nun aber zur ersten Routine FFD2, die wie einen Ratten¬ 
schwanz eine Reihe weiterer nach sich zieht: 


Name 

CHROUT 

Zweck 

Ausgabe eines Zeichens 

Adresse 

SFFD2 dez. 65490 

Vorbereitungen 

(CHKOUT,OPEN) Zeichen im Akku 

Fehler 

0 

Stapelbedarf 

8 

Register 

Akku 


Falls Sie diese Routine schon einmal benutzt haben, dann 
geschah es vermutlich ohne die Vorbereitungen CHKOUT 
und OPEN. Freundlicherweise hat unser Computer einige 
Voreinstellungen schon für uns getroffen. Denn normaler- 


Nummor 

Toxi 

Bedeutung 

0 

BREAK 

Wahrend des Programms wurde die RUN/STOP-Taste 
gedrückt 

1 

TOO MANY FILES 

Mari kann maximal 10 ollone Flies einrichten 

2 

FILE OPEN 

Ein bereits geöffnetes File wird nochmals geöffnet 

3 

FILE NOT OPEN 

Auf ein noch nicht geöffnotes File sollte zugegriffen 
werden 

4 

FILE NOT FOUND 

Das geforderte File Ist nicht verfügbar 

5 

DEVICE NOT PRESENT 

Das angeaprochene Gerät zeigt keine Reaktion 

6 

NOT INPUT FILE 

Aus einem Schreibfile kann nicht gelesen werden 

7 

NOT OUTPUT FILE 

In ein Lesefile kann nicht geschrieben werden 

B 

MISSINQ FILE NAME 

Bei Operationen, die einen Filenamen erfordern, fehlt 
dieser 

9 

ILLEGAL DEVICE 
NUMBER 

Das versuchte Kommando Ist beim angesprochenen 

Gerät nicht möglich 


Tabelle 11. Fehlernummern und ihre Bedeutung. 

Die Nummern findet man bei gesetztem Carry im Akku. 
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weise sendet CHROUT ein Zeichen über einen schon geöff¬ 
neten Ausgabekanal, und der ist zum Bildschirm geschaltet. 
Ein kleines Beispielprogramm soll das illustrieren. Zunächst 
laden Sie bitte den SMON ein und starten Sie ihn. Nun soll 
eine Texttabelle angelegt werden. Das funktioniert beim 
SMON am bequemsten über das K-Kommando. Geben Sie 
ein K 6000. Der SMON antwortet mit: 

'6000 . 

Wenn Sie nun die RUN/STOP-Taste drücken, können Sie mit 
dem Cursor in diese Punktzeile fahren und einen Text 
schreiben: 

'6000 HALLO ASSEMBLER-ALCHIMIST. 

Sinnvoll - vor allem für die weitere Verwendung dieses Tex¬ 
tes - ist es, ein (RETURN), also dezimal 13 oder $0D anzu¬ 
schließen. Dazu gibt es natürlich den Weg über den Assem¬ 
blerbefehl. Zur Übung wollen wir aber das M-Kommando ver¬ 
wenden. Geben Sie ein (zuerst die »RETURN«-Taste betäti¬ 
gen) M6018, dann wieder RUN/STOP, und fahren Sie mit dem 
Cursor auf Speicherstelle 601A (falls Sie in 6019 kein Leer¬ 
zeichen $20 stehen haben, dann fügen Sie’s jetzt noch ein). 
Geben Sie nun anstelle des dort stehenden Bytes OD ein, und 
drücken Sie die RETURN-Taste. Der Monitor sollte jetzt 
zeigen: 

:6018 54 20 OD 
etc. 

Unser Text soll mit einem BRK enden. Deshalb gehen wir 
jetzt in den Assembler-Modus mit dem SMON-Kommando A 
601B und schreiben: 

601B BRK 

Nun folgt das eigentliche Progrämmchen, das Byte für Byte 
bis zur Null (BRK) den Text aus der gerade erstellten Text¬ 
tabelle liest und mittels FFD2 auf den Bildschirm bringt: 
601C LDY #00 

601E LDA 6000,Y 

6021 BEQ 602C 

Das Y-Register wird als Index initialisiert, dann die Textta¬ 
belle in den Akku geladen. Wenn das Programm dabei auf die 
Null stößt, verzweigt es zum Ende. Jetzt folgt die Routine zur 
Bildschirmausgabe: 

6023 JSR FFD2 

6026 BCS 602D 

Falls bei der Kernal-Routine etwas schiefgelaufen ist, wird 
das Carry-Bit gesetzt, was wir überprüfen und zu einem 
BRK-Kommando verzweigen (das ist natürlich nur sinnvoll, 
solange ein Monitor oder Assembler wie der SMON aktiv ist). 
Nun erhöhen wir das Index-Register und das ganze beginnt 

von vorne: 

6028 INY 

6029 JMP 601E 

602C RTS 

602D BRK 

Wenn wir nun aus dem SMON mit F und anschließendem X 
aussteigen und ein kleines Basic-Aufrufprogramm machen 
(Bei OUT OF MEMORY ERROR bitte NEW eingeben): 

10 PRINTCHR$(147) 

20 SYS 24604 :REM = $601C 
30 END 

dann können wir uns die Wirkung unseres Programms anse- 
hen: Nach RUN wird der Bildschirm gelöscht und unser Text 
ausgedruckt. 

FFD2 nimmt uns also eine Menge Arbeit ab: Automatisch 
legt diese Routine in den Bildschirmspeicher den Bildschirm¬ 
code (sie rechnet also auch gleich ASCII, das wir ja eingege¬ 
ben haben, in den POKE-Code um) und in die dazugehörige 
Bildschirmfarbspeicherstelle den aktuellen Farbcode. Sie 
setzt außerdem noch den Cursor weiter. 

Mit FFD2 kann man aber noch viel mehr machen! Schließ¬ 
lich ist ja der Bildschirm (Gerätenummer 3) nicht der einzige 
mögliche Empfänger. Wir wollen als nächstes mal eine Aus- 
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gäbe mittels FFD2 auf den Drucker erzielen. Hier sind die Vor¬ 
bereitungen allerdings nötig. Zunächst mal müssen wir uns 
noch zwei weitere Kernal-Routinen ansehen, nämlich 
CHKOUT und OPEN. 


Name 

CHKOUT 

Zweck 

Kanal zum Ausgang definieren 

Adresse 

$FFC9 dez. 65481 

Vorbereitungen 

OPEN log. Filenummer 


ins X-Register 

Fehler 

0,3,5,7 

Stapelbedarf 

4 

Register 

Akku, X-Register 


Mit dieser Routine kann jedes File, der zuvor durch OPEN 
spezifiziert worden ist, zum Ausgabefile erklärt werden. 
Natürlich muß dann das derart angesprochene Gerät auch ein 
Ausgabegerät sein. Andernfalls ergibt sich ein Fehler. Bevor 
man Daten über einen Kanal senden will, muß CHKOUT 
durchgeführt werden. Wenn die mittels OPEN übergebene 
Geräteadresse größer als 3 ist, sendet diese Routine automa¬ 
tisch auch ein LISTEN-Kommando an das Ausgabegerät. 
LISTEN setzt dann zum Beispiel den Drucker in Empfangsbe¬ 
reitschaft. Die Durchführung von CHKOUT ist einfach (vor¬ 
ausgesetzt, man hat vorher OPEN aufgerufen): In das X- 
Register wird die logische Filenummer geschrieben und dann 
per JSR FFC9 (CHKOUT) angesteuert. 

Nun zur anderen Vorbereitung von FFD2, zu OPEN: 


Die Routine OPEN an sich anzusprechen ist relativ einfach. 
Es genügt ein JSR FFCO. Zuvor allerdings - der Ratten¬ 
schwanz wird länger - muß mit SETN AM der Filename und mit 
SETLFS die logische Filenummer, die Geräteadresse und 
eventuell eine Sekundäradresse festgelegt sein. Erst danach 
kann das File geöffnet werden durch OPEN. Also sehen wir 
uns noch SETLFS und SETNAM an: 


Name 

SETLFS 

Zweck 

Spezifikationen eineslogischen Files 

Adresse 

$FFBA dez. 65466 

Vorbereitungen 

logische Filenummer in Akku 
Gerätenummer ins X-Register 
Sekundäradresse ins Y-Register 

Fehler 

keine 

Stapelbedarf 

2 

Register 

keine 


SETLFS legt für die anderen Kernal-Routinen logische File¬ 
nummer, Gerätenummer und Sekundäradresse fest. Die logi¬ 
sche Filenummer ist dabei eine Schlüsselzahl, die in eine 
durch OPEN angelegte File-Tabelle weist. Die Gerätenummer 
kann zwischen 0 und 31 liegen, dabei sind folgende Zuord¬ 
nungen vorgesehen: 

0 Tastatur 2 RS232C-Kanal 

1 Datasette 3 Bildschirm 

Gerätenummern ab 4 beziehen sich automatisch auf 
Geräte am seriellen Bus. Dabei gilt im allgemeinen: 

4 Drucker 
8 Diskettenstation 



Name 

OPEN 

Zweck 

Öffnen eines logischen Files 

, A " resse 

$FFC0 dez. 65472 

Vorbereitungen 

SETLFS,SETNAM 

Fehler 

1,2,4,5,6 

Register 

Akku, X- und Y-Register 
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Die Sekundäradresse ist eine Kommandonummer, die für 
das jeweils angesprochene Gerät spezifisch ist, zum Beispiel 
10 bewirkt beim Drucker Commodore 1526, daß das Gerät 
in die Grundstellung geht (siehe jeweiliges Handbuch). Will 
man keine Sekundäradresse verwenden, dann muß FF ins Y- 
Register geschrieben werden. Der Aufruf von SETLFS 
geschieht also in folgender Weise: In den Akku lädt man die 
gewünschte logische Filenummer, ins X-Register die Geräte¬ 
adresse und ins Y-Register FF oder aber die Sekundär¬ 
adresse. Danach erfolgt der Sprung mit JSR FFBA. 

Schließlich noch zu SETNAM: 


Name 

SETNAM 

Zweck 

Filenamen festlegen 

Adresse 

FFBD dez. 65469 

Vorbereitungen 

Namenslänge in den Akku LSB des 
Namenstextes in X-Register MSB 
des Namenstextes in Y-Register 

Fehler 

keine 

Stapelbedarf 

2 

Register 

Akku, X- und Y-Register 


Vor der Eröffnung eines Files mittels OPEN muß diese Rou¬ 
tine den Filenamen festlegen. Dazu schreibt man in den Akku 
die Länge des Namens und in die Register X, Y die Start¬ 
adresse (LSB ins X-Register, MSB ins Y-Register) der 
Namenstext-Tabelle. Der Ort dieser Tabelle ist frei wählbar. 
Wird kein Filename gewünscht, dann gibt man dem Akku die 
Länge 0 an. X- und Y-Register sind in dem Fall ohne 
Bedeutung. 

Damit - sollte man meinen - hätten wir nun alle Bedingun¬ 
gen erfüllt, FFD2 zur Ausgabe auf den Drucker zu bewegen. 
Leider ist das noch nicht der Fall: FFD2 schließt nämlich das 
File und den Ausgabekanal nicht. Das kann - wenn man's nicht 
beachtet - zu Fehlern oder zur weiteren Ansprache des 
Druckers führen, auch wenn die gar nicht mehr erwünscht ist. 
Deswegen sollten noch zwei Kernel-Routinen angehängt 
werden, von denen die eine (CLRCHN) alle Ein- und Ausga¬ 
bekanäle wieder in den Ausgangszustand zurückführt, und 
die andere (CLOSE) das File ordnungsgemäß schließt: 


Name 

CLRCHN 

Zweck 

Ein- und Ausgabekanäle in Aus- 


gangsstellung bringen 

Adresse 

$FFCC dez. 65484 

Vorbereitung 

keine 

Fehler 

keine 

Stapelbedarf 

9 

Register 

Akku, X-Register 


Der Aufruf von CLRCHN erfolgt einfach durch JSR FFCC. 
Die Wirkung ist enorm: Mit einem Schlag werden alle Kanäle 
freigeräumt. Eingangskanälen wird ein UNTALK (dem Gerät 
wird gesagt: Halt den Mund), Ausgangskanälen ein UNLI¬ 
STEN (das bedeutet soviel wie: Hör nicht mehr zu) übermit¬ 
telt. Der Ausgangszustand stellt sich wieder her: Tastatur als 
Eingabe-Bildschirm als Ausgabegerät. 

Die endgültig letzte Routine für diesmal ist CLOSE: 


Name 

CLOSE 

Zweck 

Schließen logischer Files 

Adresse 

SFFC3 dez. 65475 

Vorbereitungen 

logische Filenummer in Akku 

Fehler 

0 

Stapelbedarf 

2 

Register 

Akku, X- und Y-Register 


Bild 21. Die Abfolge der 
Routineaufrufe ► 


Wenn für ein File alle Ein- 
und Ausgabeoperationen 
beendet sind, kann es - nach 
Einschreiben der Filenum¬ 
mer in den Akku - mittels 
CLOSE ordnungsgemäß ge¬ 
schlossen werden. Der Ein¬ 
trag in der Filetabelle wird auf 
diese Weise gelöscht. 

So, jetzt sind wir soweit, 
daß wir die Textausgabe auf 
dem Drucker programmieren 
können. Bild 21 faßt die ein¬ 
zelnen Schritte nochmal zu¬ 
sammen. 

Und hier das Programm 
dazu. Wir verwenden die im 
anderen Beispiel schon auf¬ 
gebaute Texttabelle weiter. 
Zunächst also SETNAM: 



601C 

LDA 

#00 

601E 

JSR 

FFBD 

6021 

BCS 

6053 


Wenn ein Fehler aufgetreten ist, findet man ein gesetztes 
Carry- Bi’,. In dem Fall wird verzweigt zu einem BRK- 
Kommando (was die Anwesenheit eines Monitors erforder¬ 
lich macht, solange man sich noch nicht sicher ist, ob Fehler¬ 
meldungen auftauchen). Die Null im Akku besagt, daß kein 
Filename gewünscht ist. Dann kommt SETLFS: 


6023 

LDA 

#04 

6025 

LDX 

#04 

6027 

LDY 

#FF 

6029 

JSR 

FFBA 

602C 

BCS 

6053 


Es wurde ein File festgelegt mit der logischen Filenummer 
4, der Geräteadresse 4 und ohne Sekundäradresse. Jetzt 
geben wir das OPEN-Kommando: 

602E JSR FFCO 
6031 BCS 6053 


Der Ausgabekanal wird definiert mit CHKOUT: 


6033 

LDX 

#04 

6035 

JSR 

FFC9 

6038 

BCS 

6053 

Damit sind alle Vorbereitungen erledigt und die Zeichen¬ 
ausgabe kann wie im ersten Programm durchgeführt werden 

mitCHROUT: 



603A 

LDY 

#00 

603C 

LDA 

6000,Y 

603F 

BEQ 

604A 

6041 

JSR 

FFD2 

6044 

BCS 

6053 

6046 

INY 


6047 

JMP 

603C 

Alle Zeichen sind nun ausgedruckt. Wir rufen CLRCHN auf: 

604A 

JSR 

FFCC 

Als letzte Routine folgt nun noch CLOSE: 

604D 

LDA 

#04 

604F 

JSR 

FFC3 

6052 

RTS 



Damit wurde das File Nummer 4 geschlossen. Anschlie¬ 
ßend erfolgte der Rücksprung aus dem Programm. Für die 


(=£SH? 
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Fehlerbehandlung habe ich nur einen BRK vorgesehen, der 
sofortigen Registerüberblick erlaubt, wenn zum Beispiel der 
SMON im Speicher enthalten ist. 

6053 BRK 

Ohne Monitor im Speicher kann der Computer allerdings 
abstürzen oder im besten Fall einen Basic-Warmstart durch¬ 
führen. Wenn Sie sowas also für Ihre Zwecke programmieren 
möchten, sollten Sie einen anderen Weg suchen, die Fehler 
aufzufangen. Man hat ja nicht immer einen Monitor 
eingeladen. 

Mit diesen sieben Kernel-Routinen beenden wir dieses 
Kapitel. In der 64’er, Ausgabe 12/84 haben B. Schneider und 
K. Schramm in ihrer Serie »In die Geheimnisse der Floppy ein¬ 
getaucht« gezeigt, wie man mittels der besprochenen Routi¬ 
nen, und einiger anderer, auch die Diskettenstation anspre¬ 
chen oder sogar Floppy und Drucker zum »Spooling« veran¬ 
lassen kann. Das habe ich zwar schon öfter gesagt, muß es 
aber trotzdem immer wieder tun: Durch das Nachvollziehen 
fremder Programme kann man sehr viel lernen. 

38. Der C 64 und Fließkommazahlen 


Inzwischen wissen Sie ja, daß alle Daten im Computer im 
Binärformat enthalten sind. Wie man eine normale, ganze Zahl 
zur binären umrechnet, wurde schon im Grafik-Kurs (64’er, 
Ausgaben 4 und 5 von 1984) gezeigt. Da aber viele Leser die¬ 
ses Assemblerkurses die genannten Ausgaben nicht besit¬ 
zen, soll doch nochmal vorgestellt werden, welcher Rechen¬ 
weg der einfachste ist. Als Beispiel nehmen wir die Zahl 
1985. Man teilt diese Zahl so lange durch 2, bis das Ergebnis 
0 wird. Jedesmal notiert man sich den Rest, der entweder 0 
oder 1 sein kann: rapbi n 


1985 

2 = 

992 

Rest 1 

992 

2 = 

496 

RestO 

496 

2 = 

248 

Rest 0 

248 

2 = 

124 

RestO 

124 

2 = 

62 

RestO 

62 

2 = 

31 

RestO 

31 

2 = 

15 

Rest 1 

15 

2 = 

7 

Rest 1 

7 

2 = 

3 

Rest 1 

3 

2 = 

1 

Rest 1 

1 

2 = 

0 

Rest 1 


Auch wenn Sie es noch nicht erkennen: Da steht schon das 
binäre Ergebnis. Von unten nach oben gelesen, ist das näm¬ 
lich der Rest: 

111 1100 0001 

Nun reden wir ja von Fließkommazahlen. Also verändern wir 
unser Beispiel noch etwas. Jetzt soll uns die Zahl 1985,125 
interessieren. In der Ausgabe 6/84 haben Sie gelernt, daß 
man das Komma verschieben kann, um daraus beispiels¬ 
weise 1,985125x10-’ zu machen. Wir wollen uns das Ver¬ 
schieben des Kommas aber für etwas später aufheben und 
zunächst einmal außer dem schon umgewandelten Vorkam- 
mateil nun auch den Nachkommateil, also die 0,125, ins Binär¬ 
format übertragen. 

Genauso, wie wir vorhin eine Kettendivision durch 2 ver¬ 
wendet haben, gebrauchen wir nun eine Kettenmultiplikation 
mit 2. Der gesamte Nachkommateil wird dabei verdoppelt. 
Entweder ergibt sich dabei eine Vorkommastelle (das ist dann 
immer eine 1) oder das Ergebnis bleibt kleiner als 1. Wenn 
sich bei einem solchen Rechenschritt keine Vorkommastelle 
ergibt, schreibt man an die entsprechende Nachkommastelle 
der Binärzahl eine 0, andernfalls eine 1. Es wird solange ver¬ 
doppelt, bis keine Nachkommastellen mehr zur Verfügung 
stehen. Das klingt ziemlich umständlich. Am besten sehen 
Sie sich das jetzt mal an unserem Beispiel an: 

0,125 x 2 = 0,250 1. Nachkommastelle:0 


Beim ersten Verdoppeln hat sich keine neue Vorkommastelle 
ergeben, deshalb ist die erste Nachkommastelle der Binär¬ 
zahl eine Null. 

0,25 x 2 = 0,5 2. Nachkommastelle:0 

Auch beim zweiten Verdoppeln ermitteln wir keine neue Vor¬ 
kommastelle, wodurch sich wieder eine Null als Nachkomma¬ 
stelle ergibt. 

0,5 x 2 = 1,0 3. Nachkommastelle: 1 

Hier hat sich nun eine Vorkommastelle beim Verdoppeln 
gebildet: Daher taucht als 3. Nachkommastelle unserer Binär¬ 
zahl eine 1 auf. Gleichzeitig war das die letzte Nachkomma¬ 
stelle, denn unsere Ausgangszahl weist nach dem Komma 
nun nur noch eine Null auf. 

Zur Übung wollen wir noch eine andere Zahl mit Nachkom¬ 
mastellen ins Binärformat überführen, nämlich 0,1. 


0,1x2 = 0,2 
0,2x2 = 0,4 
0,4x2 = 0,8 
0,8x2 = 1,6 


1. Nachkommastelle:0 

2. Nachkommastelle:0 

3. Nachkommastelle:0 

4. Nachkommastelle:1 


Jetzt läßt man - das habe ich beim ersten Beispiel noch 
nicht erwähnt - diese neue Vorkommastelle einfach weg und 
rechnet wieder mit den Nachkommastellen weiter: 


0,6x2 = 1,2 
0,2x2 = 0,4 
0,4x2 = 0,8 
0,8x2 = 1,6 
0,6x2 = 1,2 


5. Nachkommastelle: 1 

6. Nachkommastelle:0 

7. Nachkommastelle:0 

8. Nachkommastelle: 1 

9. Nachkommastelle: 1 


Das kommt Ihnen sicherlich von der 5. Verdoppelung her 
bekannt vor. Es zeigt sich, daß diese Rechnung nie aufgeht, 
weil sich eine periodische Zahl ergibt: 

C 000 1100 1100 1100... 

Das kann Ihnen öfters bei der Zahlenumwandlung passie¬ 
ren, daß ein endlicher Dezimalbruch in einen unendlichen 
periodischen Binärbruch übergeht. Kehren wir zurück zu 
unserem ersten Beispiel, 1985,125. Die ganze Umwandlung 
(Vorkomma- und Nachkommaanteil) führte zu: 

111 1100 0001,001 

Der dritte Schritt der Verwandlung von der Dezimalzahl zum 
Binärformat (nach 1.=Vorkommaanteil umwandeln, 2.= 
Nachkommaanteil umwandeln) ist das sogenannte Normali¬ 
sieren. Das ist einfach das Verschieben des Kommas nach 
links (wie in unserem Beispiel) oder rechts, solange, bis vor 
dem Komma nur noch Nullen stehen und direkt hinter ihm eine 
1. ln Kapitel 29 haben wir gelernt, daß für jede Stelle, die das 
Komma nach links wandert, der Exponent um 1 höher wird. 
Unser Exponent ist im Moment noch Null (2° ist ja 1). Um also 
nach der Regel zu normalisieren, wird das Komma um 11 Stel¬ 
len nach links verschoben. Der Exponent ist dann 11 (dez) und 
unsere Zahl erscheint im neuen Gewand: 

0.1111 1000 0010 01 E +1011 
E +1011 heißt dabei Exponent, und wird im Binärformat dar¬ 
gestellt (1011 (bin.) =$= 11 (dez.)). Soweit, sogut. Alles bisher 
unternommene hat Allgemeingültigkeit. Von nun an aber müs¬ 
sen wir uns spezialisieren auf den Commodore 64 (im VC 20 
und einigen anderen Computern ist es aber auch so). Der 
Exponent kann ja - je nach dem, ob das Komma nach links 
oder nach rechts zum Normalisieren verschoben wurde - 
positiv sein (wie bei unserem Beispiel) aber auch negativ. Im 
Commodore 64 wird zum Exponenten die Zahl 128 addiert. 
Das ist dann Schritt 4, der im Beispiel zu 139 führt, womit wir 
schon das Exponentenbyte fertig haben: 

Exponent: dez.139 bin.1000 1011 hex.8B 

Hätten wir einen negativen Exponenten erhalten, zum Bei¬ 
spiel 20, dann stünde im Exponentenbyte nun dez.108, 
beziehungsweise dasselbe im Binärformat. 

Der Rest unserer Zahl, also die Mantisse, wird nun Schritt 5 
unterzogen. Zunächst läßt man das Komma weg. Die Binär- 
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zahl wird dann auf 4 Byte linksbündig aufgeteilt. In unserem 
Beispiel erhalten wir so: 

1111 1000 0010 0100 0000 0000 0000 0000 
Byte 1 Byte 2 Byte 3 Byte 4 

Wie Sie sehen, werden die unbenutzten Bits mit Nullen auf¬ 
gefüllt. Was nun noch nicht berücksichtigt wurde, ist das Vor¬ 
zeichen der Mantisse. Es ist im Beispiel noch nicht zu erken¬ 
nen, ob wir +1985,125 oder -1985,125 vorliegen haben. Das 
gehen wir nun im letzten Schritt (Nummer 6) an. Im Commo- 
dore 64 gibt es zwei Möglichkeiten der Speicherung von 
Fließkommazahlen. Für Schritt 6 muß man sich entscheiden, 
wo man die Zahl haben will. 

In Kapitel 30 ist schon mal der FAC erwähnt worden, der 
Fließkomma-Akkumulator 1, welcher die Speicherstellen dez. 
97 bis 102 ($61 bis $66) belegt. Ein zweiter Fließkomma- 
Akkumulator, AFAC oder ARG genannt, belegt die Plätze dez. 
105 bis 110 ($69 bis $6E). Diese Akkumulatoren haben für 
die Fließkommarechnungen eine ähnliche Bedeutung wie 
der Akku für die I-Byte-Rechnungen. Dort werden fast alle 
Ergebnisse abgelegt oder Zahlen abgerufen. Wir sehen, daß 
wir darin 6 Byte zur Verfügung haben. In Byte 97 liegt der 
Exponent in der von uns ermittelten Form. Byte 98 bis 101 
sind die vier Mantissenbytes. Was ist in Byte 102? Das Vorzei¬ 
chen! Bit 7 dieses Bytes ist 0, wenn eine positive, und 1 wenn 
eine negative Zahl vorliegt. Das galt für den FAC, wie Sie aus 
den Speicherstellen schon gesehen haben. Für den ARG ist 
das aber ganz genauso. Sehen wir uns nun in Bild 22 unsere 
Beispielzahl im FAC und im ARG nochmal an. 

Im Bild ist auch angedeutet, daß die restlichen 7 Bit (Bits 0 
bis 6) des Vorzeichenbytes keine Rolle spielen. Sie werden 
später direkt in diese Akkumulatoren hineinsehen und allerlei 
Bit-Müll darin finden. Lediglich Bit 7 ist für uns von Bedeutung. 

Eigentlich ist das ja eine ganz schöne Verschwendung, von 
einem Byte wie diesem Vorzeichenbyte lediglich ein einziges 
Bit zu nutzen. Wenn eine beliebige Fließkommazahl irgendwo 
im Computer abgespeichert wird, dann gilt ein anderes For¬ 
mat, das MFLPT-Förmat (von Memory-FLoating PoiriT). Man 
speichert hier nur in 5 Byte. Das Vorzeichenbyte fällt weg. Wie 
aber merkt sich der Computer das Vorzeichen? Das ist ganz 
schlau eingefädelt: Es gibt nämlich in den 5 Byte (1 Exponen¬ 
tenbyte + 4 Mantissenbyte) ein überflüssiges Bit. Sie werden 
sich sicher erstaunt fragen, wo? 

Erinnern Sie sich doch bitte zurück an den Schritt 3, das 
Normalisieren. Dort wurde so verfahren, daß rechts vom 
Komma eine 1 steht. Wenn da aber immer und ganz grund¬ 
sätzlich diese 1 steht, dann muß man sie sich eigentlich gar 
nicht mehr besonders merken. Man kann - vorausgesetzt, 
man berücksichtigt diese 1 im Bit 7 des ersten Mantissen- 
Bytes immer bei den Rechnungen - das Bit für andere 
Zwecke verwenden: Also als Vorzeichenbit. Taucht hier also 
eine 0 auf, dann liegt eine positive Zahl vor, ist es aber eine 1, 
dann signalisiert diese eine negative Zahl. Für das MFLPT- 
Format muß in unserem Beispiel also Bit 7 des ersten Mantis- 


$ 

FAC dez. 

61 

97 

62 

98 

63 

99 

64 

100 

65 

101 

66 

102 

S 

69 

6A 

6B 

6C 

6D 

6E 

ARG dez. 

105 

106 

107 

108 

109 

110 

Inhalt 







Binär 

10001011 

1111 1000 

0010 0100 

0000 0000 

0000 


Hex. 

8B 

F8 

24 

00 

0000 

0. 

Dez. 

139 

248 

36 

0 

0 


Byte Nr. 

1 

2 

3 

4 

5 

6 

Erläute¬ 

rung 

Exponent 


Mantisse 


Vorzei¬ 

chen 


Bild 22. 

So sieht die Zahl 1985,125 komplett im FAC und ARG aus 


senbytes gelöscht werden (1985,125 ist ja nun mal positiv) 
und die komplette Zahl sieht im MFLPT-Format so aus: 

10001011 0111 1000 0010 0100 00000000 00000000 
Byte 1 I Byte 2 Byte 3 Byte 4 Byte 5 
Exponent MANTISSE 

Der Pfeil weist auf das Vorzeichenbit. Man spricht hier auch 
vom »gepackten« Format. Damit das alles nun nicht nur graue 
Theorie bleibt und Sie auch aus eigenem Erleben diese Zah¬ 
lenformate sehen können, wollen wir hier ein kleines Testpro¬ 
gramm ausprobieren. Es wird Ihnen auch später noch gute 
Dienste leisten können, wenn Sie mal irgendwelche Zahlen in 
das FLPT- (also FAC oder ARG) oder ins MFLPT-Format 
umrechnen müssen. Zu Fuß ist das ja - wie Sie nun wissen - 
ganz schön haarig! Wie so oft, besteht auch dieses Pro¬ 
gramm aus einem Basic-Teil, der die Benutzerführung über¬ 
nimmt und zwei kleinen Maschinenroutinen, die per USR- 
Vektor angesprungen werden. In diesen Assembler-Pro¬ 
grammteilen sind zwei Interpreter-Routinen verborgen, die 
sehr nützlich und daher erklärenswert sind. Als Bild 23 ist das 
Basic-Aufrufprogramm abgedruckt. 

Es fragt zunächst mal, ob der SMON eingeladen ist. Der 
wird nämlich aus dem Programm heraus angesprungen. Wird 
die Frage mit »J« beantwortet, dann zeigt sich ein kleines 
Menü, andernfalls ist das Programm beendet: Der SMON muß 
erst eingeladen werden. 

Das Menü bietet 3 Optionen: Eine Zahl kann im FAC (Option 
1), im ARG (Option 2) oder im MFLPT-Format ab Speicher¬ 
stelle $6800 (Option 3) betrachtet werden. 

Für Option 1 wird der USR-Vektor auf die Einsprung¬ 
adresse des SMON gestellt und dann mittels USR- 


5 REM*** TEST FUER FLPT UND MFLPT *** <162> 
10 POKE 52,96:POKE 56,96: CLR: PRINT CHR*(14 

7)CHR$(17)CHR$(17) <215> 
15 PRINT"IST DER SMON EINGELADEN?":INPUT"J 

/N";A$:IF A$=”N"THEN END <254> 
20 PRINT CHR*(17)CHR*(17)"C3SPACEJFLPT IN 

FAC"TAB(25)"1":PRINT <003> 
30 PRINT"<3SPACE>FLPT IN ARG"TAB(25)"2":PR 

INT < 030 > 
40 PRINT"<3SPACE>MFLPT AB *6800"TAB(25)"3" 

:PRINT:PRINT <077> 
50 GET A*:IF A*<"l"OR A*>"3"THEN 50 <211> 
60 PRINT"AUSWAHL",A*:PRINT:PRINT:INPUT"GEB 

EN SIE EINE ZAHL EIN" 5 Z <107> 
65 PRINT CHR*(147) <142> 
70 ON VAL(A*)GOTO 100,200,300 <233> 
100 REM***** FAC ***** <097> 
110 POKE 785,0:POKE 786,192:REM USR-VEKTOR 

AUF SMON = *C000 <091> 
120 A=USR(Z) <205> 
200 REM***** ARG ***** <213> 
210 POKE 785,0:POKE 786,96:REM USR-VEKTOR 

AUF *6000 <011> 
220 A=USR(Z) <049> 
300 REM***** MFLPT ***** <227> 
310 POKE 785,0:POKE 786,97:REM USR-VEKTOR 

AUF *6100 <114> 
320 A=USR(Z) <150> 
400 REM********************************* <13B> 
410 REM NACH MELDUNG DES SMON MIT DEN <042> 
420 REM KOMMANDOS <221> 
430 REM (1) M 0061 <212> 
440 REM (2) M 0069 <231> 
450 REM (3) M 6800 <241> 
460 REM DEN MONITOR EINSCHALTEN. DIE <137> 
470 REM EINGEGEBENE ZAHL IST DANN ALS <148> 
480 REM HEX-BYTES SICHTBAR. <135> 
490 REM********************************* <228> 


6 64'er 


Bild 23. Testprogramm für die beiden kleinen Assembler- 
Routinen. Die Bedienung ist im Artikel erklärt. 
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die Zahl Z in den FAC übergeben. Es schaltet sich dann der 
SMON ein, der nun mittels des Kommandos M 0061 den 
Inhalt des FAC als Hex-Zahlen zeigt. 

Option 2 richtet zunächst den USR-Vektor auf ein kleines 
Assembler-Programm ab $6000, welches den FAC-Inhalt in 
den ARG schiebt, dann den USR-Vektor auf den SMON rich¬ 
tet und schließlich auch diesen einschaltet. Auch hier wird mit 
dem M-Kommando dann per M 0069 der ARG-Inhalt sicht¬ 
bar. Option 3 richtet den USR-Vektor auf eine Maschinen¬ 
routine, die bei $6100 beginnt. Dort wird der FAC-Inhalt nach 
$6800 und folgende Speicherstellen verschoben und zwar 
ins MFLPT-Format. Anschließend erfolgt dann wieder das 
Ausrichten des USR-Vektors auf den SMON, Anschalten des 
SMON, wo man durch M 68000C den Inhalt ansehen kann. 
Folgende Vorgehensweise empfehle ich Ihnen: 

1. Einladen des SMON 

2. Eintippen der beiden kleinen Assembler-Routinen mit Hilfe 
des SMON und Speichern (man kann einfach mit dem 
SMON-Kommando S—Programmname—,6000610A spei¬ 
chern). 

2a. Wenn Sie die beiden Routinen schon gespeichert vorlie¬ 
gen haben, dann laden Sie sie jetzt ein. Jedenfalls sollten Sie 
nach dem Laden beider Assembler-Programme (SMON und 
die beiden Routinen) ein NEW eingeben, so daß alle Zeiger 
zurückgestellt werden. 

3. Erst jetzt Laden oder Eintippen des Basic-Aufrufprogram- 
mes. 

Wenn Sie nun das Testprogramm starten und zum Beispiel 
unsere Zahl 1985,125 eingeben, werden Sie folgendes 
finden: 

Option 1: 

M0061 

:0061 8B F8 24 00 00 78 00 00 

Option 2: 

M0069 

:0069 8B F8 24 00 00 78 D4 CE 


Option 3: 

M6800 

:6800 8B 78 24 00 00 FF FF FF 

Die Bytes, welche zu unserer Zahl gehören, sind unterstri¬ 
chen. Sie können jeweils nach RUN/STOP noch mit dem 
SMON-Kommando $8B (oder eine andere Sie interessie¬ 
rende Hexzahl) eine Ausgabe im Binär- und im Dezimalformat 
erreichen. 

So, nun aber endlich zu den beiden Assembler-Routinen. 
Zur Option 2 gehört das folgende, bei $6000 beginnende 
Programm: 

6000 JSR BCOC 

$BC0C ist die erste Interpreter-Routine, die wir uns 
zunutze machen. Sie schiebt den Inhalt vom FAC in den ARG. 


Mehr dazu später. 


6003 

LDA 

#00 

6005 

STA 

0311 

6008 

LDA 

#C0 

600A 

STA 

0312 


Damit haben wir den USR-Vektor auf $C000 gestellt. 

600D JMP C000 

Das war das Einschalten des SMON. Im Grunde genommen 
könnten wir uns das Stellen des USR-Vektors ersparen. 

Es ist aber sinnvoll - vor allem bei langen Programmen - 
wenn verstellte Vektoren nach Beendigung des Programmes 
auf einem definierten Wert stehen. 

Nun noch die Routine für Option 3: 


6100 

LDX 

#00 

6102 

LDY 

#68 

6104 

JSR 

BBD4 


Auch das ist wieder eine Interpreter-Routine: Sie schiebt 
den FAC-Inhalt in einen Speicherbereich, dessen Startbyte 
durch die beiden Index-Register angegeben wird (X-Register 
für LSB, Y-Register für MSB, hier also 6800). Dabei wird die 
Zahl vom FLPT-Format in das MFLPT-Format umgewandelt. 
Das Progrämmchen schließen wir ab mit einem Sprung zum 
Rest der ersten Routine: 

6107 JMP 6003 

Sehen Sie sich mal einige Zahlen im Fließkomma-Format 
an. Fast alle Operationen mit Zahlen vollführt unser Computer 
mit diesen Fließkommazahlen. Das ist dann beispielsweise 
der Grund dafür, daß aus einer Basic-Zeile wie der folgenden: 

IF INT(X* 10) = INT(ABS(X* 10))THEN ... 
auch bei positiven X-Werten (wo man mathematisch Gleich¬ 
heit feststellt) manchmal die Bedingung als nicht erfüllt 
erkannt wird. X wird sofort als Fließkommazahl in den FAC 
gelegt, mit einer Fließkomma-Zehn multipliziert, der ABS- 
Wert wird ebenfalls per Fließkomma-Arithmetik ermittelt und 
so weiter. Dabei treten häufig Rundungsprobleme auf, wenn 
ein Zwischenergebnis mehr als 32 signifikante binäre Nach¬ 
kommastellen auf weist (wie wir es ja zum Beispiel beim perio¬ 
dischen Binärbruch gesehen haben, der sich aus der simplen 
Dezimalzahl 0,1 ergibt). Das Rechnen mit Fließkommazahlen 
im Computer öffnet zwar einen ungeheuren Zahlenraum für 
unsere Anwendungen, es geht aber viel langsamer als die 
2-Byte-Arithmetik. Immerhin müssen hier jedesmal 6 Byte 
(beziehungsweise 5 bei MFLPT) berücksichtigt werden. Ich 
glaube aber kaum, daß wir jemals in die Verlegenheit kommen 
werden, beispielsweise eine Fließkomma-Addition program¬ 
mieren zu müssen. Eben weil unser C 64 fast alle Zahlen¬ 
operationen mit Fließkomma-Formaten durchführt, sind 
nahezu alle Eventualitäten schon als fertige abrufbare Pro¬ 
gramme im Interpreter enthalten. Wir müssen nur wissen, wie 
unso, _ Zahlen.aussehen (das haben Sie nun ja gelernt) und 
wo und wie man sie für Operationen bereithält und wo und wie 
man die entsprechenden Routinen finden kann. Einen der 
wichtigsten Wege, unsere Zahlen ans Maschinenprogramm 
zu übergeben, haben Sie schon kennengelernt: Das Argu¬ 
ment der USR-Funktion landet automatisch im FLPT-Format 
im FAC. 

39. Die beiden ersten 
Interpreter-Routinen 


Von nun an sollen nach und nach Interpreter-Routinen vorge¬ 
stellt werden. Das ist allerdings nicht so einfach wie bei der 
Kernel-Sprungtabelle. Es gibt für die letzteren viele recht gut 
dokumentierte Listen. Für die Interpreter-Routinen ist kaum 
Literatur vorhanden. Will man die ähnlich erfassen wie die 
Kernel-Routinen, dann muß man ROM-Listings wälzen und 
vor allem probieren, probieren ... Falls Sie also mal einen Feh¬ 
ler in der Beschreibung feststellen oder Dinge, die ich leer las¬ 
sen muß, weil mir dazu die Erleuchtung noch nicht gekommen 
ist, selbst schon kennen, dann schreiben Sie mir. Gemeinsam 
haben wir vielleicht die Chance, auch die letzte im Interpreter 
versteckte Nuß noch zu knacken! 

Nun also zur ersten schon verwendeten Routine: 


Name 

MOVAF 

Zweck 

Übertragen des FAC in den ARG 

Adresse 

$BC0C, dez. 48140 

Vorbereitung 

Wert in FAC 

Speicherstellen 

$61-66 FAC, $69-6E ARG, 


$6F, $70 

Register 

Akku, X-Register 

Stapelbedarf 

4 
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Diese Routine ist deswegen so wichtig, weil viele Rechen¬ 
operationen, die zwei Zahlen verknüpfen, zwischen dem FAC 
und dem ARG abgewickelt werden. Wenn Sie unser kleines 
Testprogramm mal mit der Option 2 laufen lassen und hinter¬ 
her nicht nur mit M0069 in den ARG, sondern auch mit 
M0061 in den FAC hineinsehen, dann stellen Sie fest, daß der 
FAC-Inhalt noch immer vorhanden ist. 

Allerdings ist das nicht immer der Fall. MOVAF rundet näm¬ 
lich - wenn nötig - vorher noch den FAC-Inhalt, der dann 
natürlich anders aussieht. 

Fast noch häufiger benutzt man die zweite 
Interpreter-Routine: 


Name 

MOVMF 

Zweck 

Übertragung von FAC in Speicher 
unter Umrechnung ins MFLPT- 
Format 

Adresse 

$BBD4 dez. 48084 

Vorbereitung 

Wert in FAC, 

Zieladresse in X- und Y-Register 
(X = LSB, Y = MSB) 

Speicherstellen 

$61-66 FAC, $70, $22, $23 

Register 

Akku, X- und Y-Register 

Stapelbedarf 

4 


Außer den unter »Speicherstellen« genannten sind natür¬ 
lich auch noch die Zieladresse und deren vier nachfolgende 
Bytes in die Routine einbezogen (das MFLPT-Format besteht 
ja aus 5 Byte). $22/23 ist ein für die Operation verwendeter 
Zeiger. 

MOVMF wird häufig dann verwendet, wenn Werte aus wel¬ 
chen Gründen auch immer, außerhalb der Fließkomma-Akku¬ 
mulatoren gelagert werden müssen. 

Es wird Ihnen vielleicht aufgefallen sein, daß im Gegensatz 
zur Beschreibung der Kernel-Routinen - die Rubrik »Fehler« 
fehlt. Der Grund ist, daß es keine solchen Sicherungen bei 
den Interpreter-Routinen gibt. Was passieren kann, ist unter 
bestimmten Bedingungen das Ansteuern von normalen 
Basic-Fehlermeldungen, die aber nicht immer den tatsächli¬ 
chen Zustand wiedergeben. Wenn Ihnen mal bei der Pro¬ 
grammierung mit Interpreter-Routinen Zweifel aufkommen, 
dann verfolgen Sie lieber den Programmweg mittels eines 
ROM-Listings und schalten Sie eigene Fehler-Routinen ein. 
Das war aber nur für die Fortgeschrittenen gesagt. Wir wer¬ 
den uns erst nach und nach dahin vortasten. Zunächst fehlen 
uns ja noch ein paar Assembler-Kenntnisse. Mit dem näch¬ 
sten Abschnitt soll das besser werden. 

40. Assembler-Befehle zum 
Beherrschen von Bits 


Fangen wir also mit AND an. AND verknüpft den Akku-Inhalt 
Bit für Bit mit dem angegebenen Wert nach den Regeln der 
logischen UND-Verknüpfung. Die Adressiermöglichkeiten 
dieses Befehls sind allerlei: 


AND 6000 
AND FE 
AND #07 
AND 6000.X 
AND 6000,Y 
AND (FA,X) 
AND (FB),Y 
AND FE,X 


absolut 

Zeropage absolut 

unmittelbar 

absolut-X-indiziert 

absolut-Y-indiziert 

indiziert-indirekt 

indirekt-indiziert 

Zeropage-absolut-X-indiziert 


Damit haben wir eine ganze Menge an Möglichkeiten. Erin¬ 
nern Sie sich noch an die Regeln einer UND-Verknüpfung? 


Wenn nicht, dann sehen Sie sich nochmal die Tabelle 12 an. 



Sie erkennen, daß zwei miteinander AND-verknüpfte Bits 
nur dann als Ergebnis 1 haben, wenn in beiden Bits der Wert 
1 steht. Man kann mittels AND ganz gezielt Bits löschen. Neh¬ 
men wir mal als Beispiel an, wir wollten geshiftete Zeichen 
(das sind die mit den Codes größer als 128) in normale Zei¬ 
chen umwandeln. Dazu bringen wir die Zeichencodes in den 
Akku und löschen Bit 7. Übrig bleibt dann der Code für das 
ungeshiftete Zeichen. Für das Löschen von Bit 7 brauchen 
wir eine sogenannte UND-Maske, die dafür sorgt, daß alle 
anderen Bits unverändert bleiben. An den Stellen muß in die¬ 
ser Maske also eine 1 stehen (denn 0 AND 1 ergibt 0, 1 AND 
1 ergibt 1). Lediglich Bit 7 der Maske muß 0 sein. Die Maske 
muß also heißen: 

0111 1111 $7F dez. 127 

Nehmen wir an, im Akku befände sich der Code für ein ge- 
shiftetes A, also dez. 193 (binär 11000001, $C1), dann 
ergibt die AND-Verknüpfung mit der Maske: 

Akku 1100 0001 ShiftA 

Maske 0111 1111 

AND _ 

Jetzt im Akku 0100 0001 

Normales A (Code dez. 65, $41) 

Man kann also, je nach Wahl der Maske, beliebige Bits 
löschen. 

AND ist, je nach der gewählten Adressierungsart, ein 2- 
oder 3-Byte-Befehl. Weil das Ergebnis im Akku steht, können 
Flaggen beeinflußt werden. Die N- und die Z-Flagge reagieren 
auf das Ergebnis. 

Im Gegensatz zu Basic, wo es nur eine ODER-Verknüpfung 
gibt, nämlich OR, existieren im Assembler zwei davon. Man 
unterscheidet ein »inklusives« und ein »exklusives« ODER. 
Die inklusive ODER-Verknüpfung des Akku mit den angege¬ 
benen Daten geschieht mit dem Assembler-Befehl ORA. 
ORA entspricht dem Basic-Befehl OR. Alle Adressierungs¬ 
arten, die dem AND-Befehl offenstehen, können auch auf 
ORA angewendet werden. Wenn man Bits ORA-verknüpft, 
findet man folgende Ergebnisse: 

0 ORA 0=0 

OORA 1 = 1 

1 ORA 0 = 1 

1 ORA 1 = 1 

Auch hier ist eine sogenannte Wahrheitstabelle recht ein¬ 
prägsam (siehe Tabelle 13). 

Während man mit AND gezielt Bits löschen kann, Ist es mit 
ORA möglich, Bits zu setzen. Auch dazu verwendet man eine 
Maske, die an allen Stellen, an denen Bits unverändert bleiben 
sollen, eine 0, sonst aber eine 1 enthält. Nehmen wir nochmal 
das Beispiel von vorhin und wandeln nun das ungeshiftete 
Zeichen in ein geshiftetes um. Wir müssen also Bit 7 wieder 
setzen: Da muß in der Maske dann eine 1 stehen. Alle ande¬ 
ren Bits bleiben unverändert, wenn die Maske dort eine Null 
aufweist. Die Maske muß daher heißen: 

1000 0000 $80 dez. 128 

Im Akku soll das ungeshiftete B stehen (Code dez. 66, 
$42, bin. 0100 0010). Die Rechnung sieht dann so aus: 




Akku 

Maske 

ORA 

Jetzt im Akku 


0100 0010 Code für B 
1000 0000 


1100 0010 


AND 

0 

1 

0 

0 

0 

1 

0 

1 


Tabelle 12. Wahrheitstabel¬ 
le zur AND-Verknüpfung 


ORA 

0 

1 

0 

0 

1 

1 

1 

1 


Tabelle 13. Wahrheitstabel¬ 
le zur ORA-Verknüpfung 
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Code für geshiftetes B. 

Je nach Art der Maske kann man also ein oder mehrere Bits 
setzen. Im Beispiel ist auch der Einfluß dieses Befehls auf die 
Flaggen zu erkennen. Der Akku-Inhalt vor der OR A-Operation 
hatte kein Bit 7, also keine gesetzte N-Flagge. Danach ist Bit 
7 gesetzt und die N-Flagge zeigt eine 1. Außer der N-Flagge 
kann - ebenso wie beim AND-Befehl - auch noch die 
Z-Flagge reagieren. ORA ist je nach Adressierungsart ein 2- 
oder 3-Byte-Befehl. 

Während zwei Bit in der ORA-Verknüpfung eine 1 ergeben, 
wenn sie beide gesetzt sind oder eines von beiden, schließt 
die EOR-Verknüpfung den ersten Fall aus. EOR ist die exklu¬ 
sive ODER-Verknüpfung. Sie läßt sich sprachlich erfassen im 
»entweder... oder...«, also beispielsweise: Beim Roulette fällt 
die Kugel entweder auf Rouge oder auf Noir, beides zusam¬ 
men ist nicht möglich. Die Regeln bei EOR sind also: 

0 EOR 0 = 0 

0 EOR 1 = 1 

1 EOR 0 = 1 

1 EOR 1 =0 

Eine Wahrheitstabelle dazu sehen Sie in Tabelle 14. 

Wozu verwendet man EOR? Es fällt Ihnen vielleicht auf, daß 
wir die aus Basic bekannte NOT-Funktion nicht in Assembler 
vorliegen haben. Obwohl EOR einige viel weitergehendere 
Verwendungsmöglichkeiten aufweist als NOT (aber auf Boo¬ 
lesche Algebra wollen wir hier nicht eingehen), kann man es 
mit gleicher Wirkung einsetzen. Wir haben beispielsweise in 
den ersten Kapiteln negative Zahlen durch Komplementieren 
erzeugt. Dabei sollte jedes Bit in sein Gegenteil verkehrt wer¬ 
den. Das wäre die Aufgabe einer NOT-Funktion. Durch ein 
EOR FF können wir dasselbe erreichen. Sehen wir uns wie¬ 
der ein Beispiel an. Im Akku steht dez. 15 ($0F, bin. 0000 
1111 ): 

Akku 0000 1111 

Maske 1111 1111 = $FF 

EOR _ 

Jetzt im Akku 1111 0000 

Einerkomplement von dez. 15. 

Auch EOR kann alle Adressierungsarten verkraften, die die 
beiden anderen logischen Assembler-Befehle erlauben. Je 
nach der gewählten Art liegt dann ein 2- oder 3-Byte-Befehl 
vor. Auch hier werden die Z- und die N-Flagge beeinflußt. 

Das waren also die logischen Befehle. Leider ist hier nicht 
der geeignete Ort, die Vielaeitigkeit, die damit möglich ist, 
deutlich zu machen. Wenn Sie sich dafür interessieren, soll¬ 
ten Sie mal etwas über Boolesche Algebra lesen oder eine 
Einführung in die mathematische Logik. 

Um dieses Thema abzuschließen, soll noch erwähnt wer¬ 
den, daß der Basic-Interpreter so eingerichtet ist, daß er 
immer dann, wenn die Richtigkeit einer Aussage zu überprü¬ 
fen ist, mit -1 antwortet bei wahrer Aussage, dagegen mit 0 bei 
falscher. Auf diese Weise kommen diese merkwürdigen 
Basic-Programmzeilen ins rechte Licht, in denen Sequenzen 
auftauchen wie: 

C = A-161-33*(A< 255)-64*(A < 192)-32*(A <160) + 
32*(A < 96)-64*(A < 64). 

Jedesmal, wenn zum Beispiel A < 64 ist, tritt anstelle der 
Klammer ein -1 auf. Übrigens ist diese Formel eine schöne 
kurze Möglichkeit, ASCII-Code (hier A als Variable) in den 
Bildschirmcode umzurechnen (der Bildschirmcode steht 
dann in der Variablen C). 


EOR 

0 

1 

0 

0 

1 

1 

1 

0 


Tabelle 14. 
Wahrheitstabelle zur 
EOR-Verknüpfung 



-any-Bit 

Bit Bit Bit Bit Bit Bit Bit Bit 

7 6 5 4 3 2 1 0 
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Bild 24. Wirkung des ASL-Befehls: Arithmetisches Links¬ 
schieben 


Kommen wir nun zur zweiten Gruppe von Assembler- 
Befehlen, die Bit-Manipulationen erlauben: den 
Verschiebe-Befehlen. Fangen wir dabei mit ASL an, was vom 
englischen »Arithmetic Shift Left« kommt. Zu deutsch heißt 
das dann »arithmetisches nach links schieben«. Davon sind 
wir aber auch noch nicht schlauer. Sehen wir uns an, was die¬ 
ser Befehl tut (Bild 24). 

Der gesamte Inhalt des Akku beziehungsweise der Spei¬ 
cherstelle (je nach Adressierung) wird um eine Bit-Position 
nach links verschoben. Das vorherige Bit 7 wandert in die 
Carry-Flagge, alle anderen Bits erhalten eine um 1 höhere 
Position, das freigewordene Bit 0 wird mit einer 0 aufgefüllt. 
Toll! Aber was soll das? Zur Erklärung machen wir nochmal 
einen kurzen Ausflug zu unserem normalen dezimalen Zah¬ 
lensystem. Nehmen wir mal die Zahl 123. Bei der Einführung 
in die Fließkommazahlen haben wir gelernt das Komma zu 
verschieben. 123 ist ja dasselbe wie 123,00. Wenn wir das 
Komma um eine Stelle nach rechts verschieben, erhalten wir 
1230,0 (dabei lassen wir jetzt mal den Exponenten außer 
acht, der wäre ja-1, weil 123,00 = 1230,0x10-'). Man kann 
das Ganze auch andersherum sehen: Wir haben die Zahl 123 
eine Stelle nach links verschoben und die freigewordene 
Stelle ganz rechts mit einer Null aufgefüllt. 1230,0 ist das 
Zehnf?^he von 123,00. Die Verschiebung um eine Stelle 
nach lirnss hat also zur Multiplikation unserer Zahl mit der Basis 
unseres Zahlensystems (also 10) geführt. Eine zweimalige 
Linksverschiebung führt zu 12300, den lOOfachen Wert 
unserer Ausgangszahl. Wir haben also die Zahl 123,00 mal 
10 mal 10 genommen, das sind IO" 2 . Jede Linksverschie¬ 
bung erhöht unseren Ausgangswert um eine Zehnerpotenz, 
oder - anders ausgedrückt - erhöht den Multiplikator um eine 
Zehnerpotenz und deshalb natürlich auch das Ergebnis (ein¬ 
mal linksschieben: Multiplikator = 10 = 10 -4 , zweimal links¬ 
schieben: Multiplikator: 100 = 10' 2 und so weiter). 

Im Binärsystem, zu dem wir nun wieder zurückkehren, ist 
die Zahlenbasis die Zahl 2. Einmal Linksschieben entspricht 
dann einer Multiplikation mit 2~' = 2. Das zweimalige Links¬ 
schieben führt zur Multiplikation mit 2 _2 =4 und so weiter. 
Nehmen wir als Beispiel die Zahl 3, welche im Binärsystem 
0000 0011 heißt: 


1. ASL führt zu 

0000 0110 

= dez.6 (2'x3=2x3=6) 

2. ASL 

0000 1100 

- dez. 12 (2x6- 12. 2 ! x3=4x3=12) 

3. ASL 

0001 1000 

= dez.24 (2x12-24, 2'x3=8x3=24) 

4. ASL 

0011 0000 

= dez. 48(2x24=48, 2 , ‘x3= 16x3=48) 

5. ASL 

0110 0000 

= dez. 96 (2x48=96, 2'x3=32x3=96) 

6. ASL 

1100 0000 

= dez. 192(2x96=192, 2 4 x3=63x3+192) 


Bis jetzt landete im Carry-Bit immer eine Null. Wenn wir nun 
nochmal linksschieben, finden wir darin eine 1, die offensicht¬ 
lich als Bit 8 unseres Ergebnisses dienen muß: 

7. ASL (1) 1000 0000 = (mit Carry als Bit 8) dez. 384 
(2x192 = 384, 2 7 x3 = 128x3 = 384 
Daraus folgt, daß immer dann, wenn man sich nicht hundert¬ 
prozentig sicher ist, eine Abfrage des Carry-Bits erfolgen 
sollte, sofern man ASL zum Rechnen einsetzt (BCC bezie¬ 
hungsweise BCS bieten sich da an). Dazu kommen wir noch. 
Sehen wir uns zunächst mal an, wie ASL adressierbar ist: 
ASL 

ohne Adresse, der Akkuinhalt wird nach links verschoben. 
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Manchmal als eigene Adressierungsart bezeichnet. 

ASL 6000 absolut 

ASL FE Zeropage-absolut 

ASL 6000.X absolut-X-indiziert 

ASL FA,X Zeropage-absolut-X-indiziert 

Je nach Adressierung tritt ASL dann als 1-, 2- oder 3-Byte- 
Befehl auf. Die N-, die Z- und die Carry-Flagge werden beein¬ 
flußt. Das Ergebnis steht bei der ersten Adressierungsart 
(also ASL ohne Adresse) im Akku. In den anderen Fällen fin¬ 
det man es in der jeweiligen Speicherstelle, 

Nun gut, werden Sie sagen, man kann also mittels ASL Zah¬ 
len mit 2, 4, 8,16 32 etc. multiplizieren. Was aber, wenn man 
mal 40 nehmen will? Da gibt es einige Möglichkeiten, die ein 
bißchen den Erfindungsgeist ansprechen. Man kann ja, wenn 
irgendeine Zahl Z mal 40 gerechnet werden soll, dafür 
schreiben: 

40*Z=(32+8)*Z=32*Z+8*Z 

Schon haben wir wieder Multiplikatoren, die den Einsatz 
von ASL ermöglichen. Die beiden Zwischenergebnisse (als 
32xZ und 8xZ) speichern wir irgendwo ab und zählen sie 
dann zusammen. Wenn Z zum Beispiel 3 wäre, könnte man 
das so programmieren: 

6000 STA 6100 

Dabei sollte im Akku Z also die 3 stehen, die wir nun 
zwischengespeichert haben. 

6003 ASL 

6004 ASL 

6005 ASL 

6006 ASL 

6007 ASL 

Jetzt liegt im Akku der 32fache Wert von 3, also 96 vor und 
wir speichern dieses Zwischenergebnis ab. 

6008 STA 6101 

600B LDA 6100 

Wir haben nun den Wert 3 aus dem Zwischenspeicher 
$6100 wieder in den Akku geholt und schieben ihn 3mal nach 
links um den 8fachen Wert zu erhalten. 

600E ASL 

600F ASL 

6010 ASL 

Nun erfolgt das Zusammenzählen beider Zwischenergeb¬ 
nisse. Daboi ist ja 8xZ noch im Akku. 

6011 CLC 

6012 ADC 6101 

Damit ist die Aufgabe gelöst. Das Ergebnis steht im Akku 
und kann nun weiter verwendet werden. 

Auf diese Weise kann man immer einen Mulitplikator in eine 
Zweierpotenz (2, 4, 8, 16,...) und weitere Summanden zerle¬ 
gen. Dies ist allerdings eine zwar schnelle, aber doch recht 
eingeschränkte Art der Multiplikation. Außerdem haben Sie 
noch nicht erfahren, wohin man denn nun am besten mit BCC 
verzweigt, wenn die 8 Bit des Ergebnisses überlaufen. 

Abschließend finden Sie in Tabelle 15 noch alles Wissens¬ 
werte zu den neuen Befehlen. 

41. Die restlichen Bit-Verschiebe- 
Operationen 


Da wäre zunächst einmal das Gegenstück zu ASL. Dort ging 
es ja um das nach links schieben. Jetzt schieben wir nach 
rechts. LSR heißt der dazu nötige Befehl. Das kommt von 


»logical shift right« und heißt zu deutsch »logisches Rechts¬ 
schieben«. Fragen Sie mich bitte nicht, weshalb »logisches«. 
Jedenfalls ist LSR ebenso für logische Bitprüfungen geeignet 
wie ASL. 

Mittels LSR wird jedes Bit der adressierten Speicherstelle 
um einen Platz nach rechts geschoben. An die Stelle des 
Bit 7 tritt eine Null und Bit 0 wandert in das Carry-Bit (siehe 
Bild 25). 

Erinnern Sie sich noch an das dezimale Linksschieben mit 
ASL? Wir hatten festgestellt, daß jedes Linksschieben einer 
Dezimalzahl einer Multiplikation mit 10 entspricht. Hier im 
umgekehrten Fall, also beim Rechtsschieben, muß jedes LSR 
einer Division durch 10 entsprechen: 

25000 wird durch LSR 2500 
2500 zu " 250 

250 ” 25 

und so weiter 

Geht man von der Ausgangszahl (25000) aus, dann ergibt 
sich der erste rechts verschobene Wert durch Division mit 

10 ' = 10 

der 2. durch 10 2 =100 

der3. durch 10 3 = 1000, etc. 

Es wird also durch Potenzen der Zahlenbasis 10 geteilt. 
Haben wir es - wie im Computer - mit Binärzahlen zu tun, 
deren Basis die 2 ist, dann teilen wir mit jedem LSR durch 2. 
Je nachdem, wie oft hintereinander das LSR auf eine Zahl 
ausgeübt wird, teilt man dann durch 2' = 2,2 Z =4, 2 3 = 8, etc. 


onLin®» 


Be¬ 

fehls¬ 

wort 

Adressierung 

Byte¬ 

zahl 

Code 

Hex Dez 

Takt¬ 

zy¬ 

klen 

Beein¬ 

flus¬ 

sung 

von 

Flag¬ 

gen 

AND 

absolut 

3 

2D 

45 

4 

N.Z 


0 -page-abs 

2 

25 

37 

3 

N.Z 


unmittelbar 

2 

29 

41 

2 

N,Z 


abs.-X-indlz. 

3 

3D 

61 

4 ' 

N.Z 


abs.-Y-lndlz. 

3 

39 

57 

4 • 

N.Z 


Indiz.-indlr. 

2 

21 

33 

6 

N,Z 


indlr.-indlz. 

2 

31 

49 

5 * 

N.Z 


O-page-X-lndlz 

2 

35 

53 

4 

N,Z 

ORA 

absolut 

3 

OD 

13 

4 

N,Z 


0 -page-abs. 

2 

05 

05 

3 

N.Z 


unmittelbar 

2 

09 

09 

2 

N, Z 


abs.-X-lndlz. 

3 

10 

29 

4 • 

N, Z 


abs.-Y-indlz. 

3 

19 

25 

4 • 

N,Z 


indiz.-indir. 

2 

01 

01 

6 

N, Z 


indir.-indlz. 

2 

11 

17 

5 * 

N, Z 


O-page-X-lndiz 

2 

15 

21 

4 

N, Z 

EOR 

absolut 

3 

4D 

77 

4 

N, Z 


0 -page abs, 

2 

45 

69 

3 

N, Z 


unmittelbar 

2 

49 

73 

2 

N, Z 


abs.-X-indiz. 

3 

5D 

93 

4 • 

N.Z 


abs.-Y-lndlz. 

3 

59 

89 

4 * 

N.Z 


Indiz,-Indir. 

2 

41 

65 

6 

N, Z 


indlr.-lndiz. 

2 

51 

81 

5- 

N, Z 


O-page-X-lndlz 

2 

55 

85 

4 

N,Z 

ASL 

»Akkumulator« 

1 

OA 

10 

2 

N, Z, C 


absolut 

3 

OE 

14 

6 

N.Z.C 


0-page-abs. 

2 

06 

06 

5 

N, Z,C 


abs.-X-lndiz. 

3 

IE 

30 

7 

N, Z,C 


O-page-X-indlz 

2 

16 

22 

6 

N, Z,C 

■ bedeutet: Bei seitenüberschreitenden Indizierungen muß noch ein Taktzyklus 
dazugerechnet werden. 


Tabelle 15. Alles Wissenswerte der neuen Assembler- 
Befehle 
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Das konnte man sich alles ja schon vorstellen, nachdem ASL 
zur Multiplikation verwendet wurde. Auch hier muß man immer 
das Carry-Bit abfragen, denn die Division kann ja unter 
Umständen nicht aufgehen, wie das folgende Beispiel der 
Division von 3 durch 2 zeigt: 

(3) 0000 0011 ergibt durch LSR: 0000 0001 und 1 im 
Carry-Bit. Das Ergebnis ist schon richtig, nämlich 1. Im Carry 
steht der Rest dieser Division, die 1. Weil der Rest für manche 
Berechnungen von Bedeutung ist, muß das Carry-Bit irgend¬ 
wie erfaßt werden. Wie man das erreicht, lernen wir später 
noch. Leider ist diese Art der Division mittels LSR nicht so ein¬ 
fach verwendbar wie die Multiplikation mittels ASL. Während 
man dort durch geschicktes Aufteilen des Faktors ASL auch 
bei anderen Multiplikatoren als reine Zweierpotenzen anwen¬ 
den konnte, ist das hier nicht so ohne weiteres möglich. Bei 
Divisionen geht man deshalb lieber andere Wege. Die zeige 
ich Ihnen ebenfalls etwas später. 

LSR kann auf die gleiche Weise adressiert werden wie ASL: 

LSR auf den Akku bezogen 

LSR 6000 absolut 

LSR FE Zeropage-absolut 

LSR 6000,X absolut-X-indiziert 

LSR FA,X Zeropage-absolut-X-indiziert 

Im ersten Fall steht das Ergebnis im Akku, in den anderen 
Fällen in der jeweils adressierten Speicherstelle. Außer der N- 
Flagge, die in jedem Fall 0 wird, beeinflußt LSR auch die Carry- 
Flagge und unter Umständen die Z-Flagge. Je nach Adressie¬ 
rungsart liegt LSR als 1-Byte-, 2-Byte- oder 3-Byte-Befehl 
vor. 

Sowohl bei ASL als auch bei LSR hatten wir festgestellt, daß 
man herausgeschobene Bits, falls sie noch von Bedeutung 
sind, irgendwie aus dem Carry-Bit (dort sind sie ja gelandet) 
an einen sinnvollen Ort schaffen muß. Das ist natürlich mög¬ 
lich über eine Befehlskette, in der zunächst das Carry-Bit 
abgefragt wird: 
zum Beispiel: 


des Carry-Bit (wohlgemerkt der Inhalt, der dort war, bevor dort 
Bit 7 hinein geschoben wurde). Bevor wir auf den praktischen 
Nährwert dieses Befehls eingehen, sollen erstmal die Adres¬ 
sierungsmöglichkeiten aufgeführt werden: 


6000 

BCC 6007 

6002 

LDA #01 

6004 

STA 8000 

6007 

etc. 


Wenn das Carry-Bit frei ist, wird alles weitere übersprun¬ 
gen. Wenn da drin etwas aufgetaucht ist. lädt man eine 1 (die 
ist ja im Carry-Bit) an die benötigte Speicherstelle (hier zum 
Beispiel 8000). Das kostet aber einige Bytes Speicherplatz 
und einige Taktzeiten Rechendauer. Außerdem erschwert 
sich die Programmierung, wenn man eine Zahl öfter ver¬ 
schiebt und dann nach 8000 alle Carry-Inhalte packen will. 
So kompliziert brauchen wir auch gar nicht zu arbeiten, denn 
unsere CPU kennt zwei Befehle, die das Bit-Verschieben und 
das Carry-Verschieben für uns machen. Das sind: 

ROL rotate left Linksrotieren 

ROR rotate right Rechtsrotieren 


ROL 


auf den Akku bezogen 

ROL 

6000 

absolut 

ROL 

FE 

Zeropageabsolut 

ROL 

6000,X 

absolut-X-indiziert 

ROL 

FE,X 

Zeropage- 

absolut-X-indiziert 


Je nach Adressierung kann es sich dann wieder um einen 
1-Byte- bis 3-Byte-Befehl handeln. Die N-, Z- und natürlich die 
Carry-Flagge sind beeinflußt und das Ergebnis des Befehls 
ist im Akku zu finden (erste Adressierungsart) oder in der 
angesprochenen Speicherstelle. 

Wozu das Ganze? Abgesehen von der Möglichkeit, ein¬ 
zelne Bits auf diese Weise ohne Verlust aus einem Byte durch 
das Carry-Bit herausschieben zu können, um sie Prüfungen 
zu unterziehen, gibt es noch die Möglichkeit, einen Überlauf 
bei Rechenoperationen aufzufangen. Erinnern Sie sich an 
Kap. 40, wo wir mittels ASL Multiplikationen durchgeführt hat¬ 
ten? Dort kann es unter gewissen Umständen ja leicht 
geschehen, daß ein Byte für das Ergebnis nicht mehr aus¬ 
reicht. Wir haben in den Beispielen schon die Überlegung 
durchgeführt, daß man mittels BCC oder BCS prüfen sollte, 
ob man eine signifikante Stelle (also eine führende 1) aus dem 
Byte herausgeschoben hat. Ist das der Fall, dann gibt es zwei 
Wege: 

1) Man veranlaßt den Ausdruck eines OVERFLOW ERROR, 
wenn nur 1-Byte-Zahlen zulässig sind, oder 

2) mar. ."chaltet um auf 2-Byte-Zahlen. 

Sehen wir uns das mal an dem Schritt 7 des Beispiels aus 
Kapitel 40 an. Dort hatten wir die Zahl 192 (binär 1100 0000) 
vorliegen (zum Beispiel in Speicherstelle 7000). Im Compu¬ 
ter werden 2-Byte-lntegers in der Form LSB/MSB verarbeitet. 
Wir schaffen also die Speicherstelle für das MSB von 192 in 
7001. Jetzt muß dort noch 0 drin stehen. Um bei nochmaliger 
Multiplikation mit 2 eine 16-Bit-Zahl als Ergebnis zu erhalten, 
verfährt man wie folgt: 

6000 ASL 7000 Damit ist die führende 1 ins Carry- 
Bit gewandert 

6003 BCC 6008 Das setzt man natürlich nur dann 
ein. wenn man nicht genau weiß, 
welches Ergebnis zu erwarten ist. 
Wenn keine 1 ins Carry-Bit 
gelangte, kann man die nächste 
Zeile überspringen. 

6005 ROL 7001 Damit wurde der Inhalt des Carry- 
Bit als Bit 0 ins MSB unseres 
Ergebnisses geschoben. 

6008 etc. 

Die Funktion dieser Befehlssequenz können Sie aus Bild 
27 entnehmen. 



48 












































C 64/VC 20 


Kurs 


Diesem Befehl werden wir später bei der 16-Bit-Multiplika- 
tion und Division noch häufig begegnen. 

Sehen wir uns nun noch den letzten der Bit-Verschiebebe¬ 
fehle an: ROR. In Bild 28 ist schematisch gezeigt, wie rotiert 
wird. 

Jedes Bit wandert, wie bei LSR, um eine Stelle nach rechts. 
Als Bit 7 kommt (im Gegensatz zu LSR) der Inhalt des Carry- 
Bit herein. Bit 0 wird ins Carry-Bit geschoben. Adressiert wer¬ 
den kann ROR ebenso wie ROL: 


ROR 


auf den Akku bezogen 

ROR 

6000 

absolut 

ROR 

FE 

Zeropage-absolut 

ROR 

6000.X 

absolut-X-indiziert 

ROR 

FE,X 

Zeropage-absolut-X-indiziert 


Auch für die Byteanzahl, den Ort des Ergebnisses und die 
Flaggenbeanspruchung gilt dasselbe wie für ROL. 

Die Einsatzmöglichkeiten für ROR sind allerdings geringer. 
Bei 16-Bit-Divisionen kann man zwar ROR einsetzen, um 
einen Unterlauf des MSB ins LSB aufzufangen. Weil man aber 
meist ohnehin andere Divisionsverfahren verwendet als das 
oben gezeigte mit LSR, erübrigt sich diese Anwendung in den 
meisten Fällen. Gut kann man ROR zu Bitprüfungen einset¬ 
zen. Das soll im nächsten Abschnitt an einem kleinen Beispiel 
gezeigt werden. 

Zuvor aber noch eine Bemerkung: Wir sind nun durch den 
Befehlssatz des 6502-Assemblers fast hindurchgedrungen. 
Es fehlen uns nur noch - wenn ich mich nicht versehen habe 
- vier Befehle. Die allerdings hängen eng mit dem sogenann¬ 
ten Interrupthandling zusammen, das uns wohl einige Zeit 
beschäftigen wird. 


42. Schneller Joystick 


Vor einiger Zeit (64’er, Ausgabe 2/85) veröffentlichte P. 
Siepen eine Routine zur Abfrage des Joystickports, die eine 
interessante Leserbrief-Reaktion hervorrief. M. Hartig sandte 
nämlich einen Verbesserungsvorschlag, in dem der uns inter¬ 
essierende Befehl ROR die Hauptrolle spielt. Bevor ich die 
allerdings vorstelle, muß erst noch geklärt werden, was und 
wie abgefragt wird. 


Wenn keine dieser Möglichkeiten angesprochen ist, ent¬ 
halten diese Bits den Wert 1. Drückt man beispielsweise den 
Feuerknopf, dann wechselt der Inhalt von Bit 4 zum Wert 0. 
Man muß also ständig diese Bits überprüfen und reagieren, 
sobald eines davon 0 wird. Die Lösung von P. Siepen, diese 
Abfrage in das Interruptprogramm einzubauen, ist sehr 
brauchbar. Dadurch hat der Computer die Möglichkeit, trotz¬ 
dem an anderen Aufgaben weiterzuarbeiten. Wir werden in 
den nächsten Folgen auf diese Programmiertechnik einge- 
hen. Die Verbesserung von M. Hartig besteht darin, daß er 
nicht durch CMP-Befehle den Inhalt von DC00 prüft (was Zeit 
und auch Speicherplatz kostet), sondern mittels ROR Bit für 
Bit nach rechts in das Carry-Bit schiebt und dieses dann mit 
BCC abfragt. Sobald die Carry-Flagge nämlich frei ist, ist die 
zu dem Bit gehörige Joystickfunktion gefragt. 

Nun die Abfrageroutine: 


LDA DC00 Inhalt des DATA-Port A in den Akku 
ROR Durch Rechtsrotieren wird Bit 0 in die 

Carry-Flagge geschoben. 

Wenn die Carry-Flagge nicht gesetzt 
ist, war Bit 0 eine Null, also die Joy¬ 
stickfunktion »Oben« gefordert, zu 
deren Bearbeitung hier verzweigt wer¬ 
den kann. 

Das nächste Rechtsrotieren schiebt 
Bit 1 in die Carry-Flagge. 

Auch hier wieder Abzweigen zur Bear¬ 
beitung von »Unten«, wenn Bit 1 nicht 
gesetzt war. 

Bit 2 ins Carry-Bit 

und bearbeiten, wenn nicht gesetzt 
Bit 3 in Carry-Flagge 
und verzweigen wenn Bit 3 Null war 
zu guter Letzt kommt noch Bit 4 ins 
Carry-Bit 

und kann bearbeitet werden, wenn es 
Null war. 

... weitere Bearbeitung, wenn keine Joystickfunktion 


BCC Oben 


ROR 

BCC Unten 


ROR 

BCC Links 
ROH 

BCC Rechts 
ROR 

BCC Fire 


Der Vorteil dieser nur 18 Byte langen Unterroutine liegt in 
ihrer Schnelligkeit: Sie braucht nur 24 Taktzyklen, wenn nicht 



Signale vom Joystick landen in den DATA-Ports A oder B des 
CIA 1. CIA heißt »Complex Interface Adapter« und ist die Insti¬ 
tution unseres Computers, die den Verkehr mit der Außenwelt 
erlaubt. Wir haben zwei Stück davon (CIA 1 und CIA 2). Je 
nachdem, in welchen Port der Joystick gesteckt wurde, lau¬ 
fen die Signale in den Registern DCOO oder DC01 (dezimal 
56320 oder 56321) ein. Wir nehmen im weiteren mal DCOO 
an. Die Bits 0 bis 4 beziehen sich auf den Joystick: 

Bit 0 oben 

Bit 1 unten 

Bit 2 links 

Bit 3 rechts 

Bit 4 Feuerknopf 
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verzweigt wird, beziehungsweise 25, wenn verzweigt wird. 
Natürlich wäre anstelle von ROR auch die Verwendung von 
LSR möglich gewesen, denn die herausgeschobenen Bits 
werden nicht mehr benötigt. Im Falle, daß man nach einer 
solchen Abfrage wieder den Ausgangszustand des Akku 
oder der Speicherstelle hersteilen will, muß man eine ent¬ 
sprechende Anzahl ROR-Anweisungen anschließen, bis Bit 0 
wieder in seine Ausgangslage rotiert ist. 

43. Die 16-Bit-Multiplikation 


Name 

UMULT 

Zweck 

Multiplikation zweier 16-Bit-Zahlen 

Adresse 

$B357 dez. 45911 

Vorbereitungen 

Faktor 1 in $28/29 


Faktor 2 in $71/72 

Speicherstellen 

$28/29,$71/72, $5D 

Register 

Akku, X- und Y-Register 

Stapelbedarf 

keiner 


Bild 29. Die Interpreterroutine UMULT 


Wir haben bisher gelernt, wie man 8-Bit-Zahlen miteinander 
mainehmen kann um 8- oder 16-Bit-Zahlen zu erhalten. Dabei 
ist unbefriedigend, daß man sich über jede Zahl Gedanken 
machen muß, wie man sie am besten multipliziert. Was fehlt, 
ist ein allgemein gültiges Programm, das in der Lage ist, jede 
Zahlenkombination (solange es sich um 2-Byte-lntegers han¬ 
delt und das Ergebnis als 16-Bit-Zahl darstellbar ist) zu verar¬ 
beiten. Und da haben wir mal wieder Glück: Gut versteckt 
befindet sich so etwas bereits fertig in unserem Computer. Ab 
dez. 45900 ($B34C) liegt im Interpreter solch eine Routine 
und ihr Einsprungspunkt ist für uns bei dez. 45911 ($B357). 
Bevor wir aber detailliert darauf eingehen, soll noch das Prin¬ 
zip erklärt werden, das dabei genutzt wird. 

Jeden Tag rechnen Sie wahrscheinlich völlig automatisch 
Multiplikationsaufgaben, ohne noch Gedanken daran zu ver¬ 
schwenden, wieviel Schweiß das Erlernen dieser Technik frü¬ 
her mal gekostet hat. Könnten Sie heute noch jemandem 
genau erklären, warum man da was wie macht? Genau das 
müssen wir aber tun, damit der Binärautomat (unser C 64) 
multiplizieren lernt. Nehmen wir mal eine Multiplikation von 
16x15: 64MR OTLl 


16x15 

16 

80 

240 

Daß wir nicht so genau wissen, was wir da tun, liegt am 
ziemlich komplizierten Zehnersystem. Damit das alles einfa¬ 
cher und überschaubarer wird, wechseln wir mal ins Binärsy¬ 
stem: 16 = 10000, 15 = 1111. 

Die Aufgabe sieht dann so aus: 

10000 «1111 
10000 
10000 
10000 
10000 


11110000 


Jetzt wird schon deutlicher, was wir getan haben. Der Fak¬ 
tor auf der rechten Seite wurde vom MSB an Bit für Bit durch¬ 
gesehen. Jedesmal, wenn wir auf eine 1 gestoßen sind (hier 
waren nur Einsen), haben wir den links stehenden Faktor 
notiert. Dabei sind wir von mal zu mal um eine Stelle nach 
rechts gerückt, was mit dem Stellenwert des im rechten Fak¬ 
tor gerade betrachteten Bits zu tun hat. Das geschah so 
lange, bis alle Bits des rechten Faktors durchgearbeitet 
waren. Die sich auf diese Weise ergebende Kolonne wird 
dann addiert und führt zum Ergebnis. Vergleichen Sie, 240 ist 
wirklich binär 1111 0000. 

Genauso wie hier beschrieben, arbeitet das Multiplika¬ 
tionsprogramm. Ein Unterschied tritt auf, nämlich daß nicht 
bis zum Schluß mit der Addition gewartet, sondern jede neue 
Zwischenzahl sofort addiert wird. Bild 29 zeigt die Beschrei¬ 
bung der Interpreterroutine: 



Bild 30. Flußdiagramm zur Betriebssystemroutine 
UMULT Faktor 2:113/114 

Faktor 1: 40/41 Ergebnis: X/Y 
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114 


113 


93 

c 


0 0 1 0 0 0 0 

- 

Ausgangstage 


0 



0 



0 



0 



0 



0 



0 

Ende 1, 

0 0 0 111 1 

0 

Schleife 

0 0 0 1 1 1 0 

1.0 

Ende 2. Schleife 

0 0 0 1 1 0 1 

0 

Ende 3. Schleife 

0 0 0 1 1 0 0 

0 

Ende 4. Schleife 

0 0 0 1 0 1 1 

0 

Ende 6. Schleife 

0 0 0 1 0 1 0 

0 

Ende 6. Schleife 

0 0 0 1 0 0 1 

0 

Ende 7. Schleife 

0 0 0 1 0 0 0 

1.0 

Ende 8. Schleife 

0 0 0 0 1 1 1 

0 

Ende 9. Schloife 

0 0 0 0 1 10 

1,0 

Ende 10. Schloife 

0 0 0 0 10 1 

0 

Ende 11. Schloife 

0 0 0 0 10 0 

1,0 

Ende 12. Schloife 

0 0 0 0 0 1 1 

0 

Endo 13. Schloife 

0 0 0 0 0 10 

0 

Ende 14. Schleife 

0 0 0 0 O'O ll 

0 

Endo 18. Schleife 


0 


0 0 0 0 0 0 0 

1.0 

Ende 16. Sclüeife 


00000000 


00000000 

00000000 


0 10 0 0 0 0 1 


1 0 0 0 0 0 1 0 


1 0 0 0 0 0 1 0 


00000000 


00000000 


00000000 


00000000 


00000000 

-► 


00000000 


0 0 0 1 0 0 0 0 
00000000 
00000000 

00000000 
0 0 0 0 0 0 0 0 


00000000 


II 

III 

IV 

V 

VI 

VII 

VIII 

IX 

X 

XI 

XII 

XIII 

XIV 

XV 
XVla, 

b, 


1 0 0 


0 0 
0 0 
0 I 
1 0 
0 0 


0 0 
0 0 
0 0 


00000000 


1 0 
0 0 
0 0 
0 0 
0 0 
0 0 
0 0 
0 0 
0 0 0 
0 0 0 
0 0 0 
0 0 0 
0 0 0 
0 0 0 
0 0 0 
0 0 0 


0 0 
0 0 
0 0 
0 0 
0 0 
0 0 
0 0 
0 0 
0 0 
0 0 
0 0 


0 0 
0 0 
0 0 
0 0 
0 0 
0 0 
0 0 
0 0 
0 I 
1 0 
0 1 
0 
0 


0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
1 

1 0 1 
0 1 0 
10 0 0 
0 0 0 0 
0 0 0 1 


0 0 
0 0 
0 0 
0 1 
1 0 


0 0 
0 0 
0 0 
0 0 
0 0 
0 0 
0 0 
0 0 
0 0 
0 0 
0 0 1 
0 1 0 
1 0 0 
0 0 0 
0 0 0 
0 0 0 


0 0 
0 0 
0 1 
1 0 
1 0 


0 0 0 0 
0 0 0 0 
0 0 0 0 
0 0 0 0 
0 0 0 
0 0 0 
0 0 0 
0 0 0 
0 0 1 
0 0 10 
0 10 1 
10 10 
0 10 0 
10 0 0 
0 0 0 0 
0 0 0 1 


Bild 31. UMULT am Beispiel der Multiplikation 321x65=20865 


Diese Routine hier abzudrucken, wäre reine Platzver¬ 
schwendung. Schalten Sie einfach den SMON ein und verlan¬ 
gen Sie von ihm ein Disassemblerlisting ab B357. Dort haben 
Sie dann für die weitere Besprechung alles parat. In Bild 30 
finden Sie noch ein Flußdiagramm der UMULT-Routine. 

Das Ergebnis der Multiplikation befindet sich in LSB/MSB- 
Form in den X/Y-Registern. Programm und Flußdiagramm wol¬ 
len wir an einem Beispiel nachspielen. Dazu sollen die beiden 
Zahlen 321 und 65 (binär 0000 0001 0100 0001 und 0100 
0001) miteinander multipliziert werden, was bekanntlich 
20865 (binär 0101 0001 1000 0001) ergibt. Was Ihnen im 
Bild 31 als undurchdringlicher Bit-Dschungel entgegen¬ 
strahlt, ist das schrittweise Verfolgen des Programms im 
Computerformat, also binär. 

In Bild 31 sind die Speicheradressen alle dezimal angege¬ 
ben. Dort finden Sie zunächst die Ausgangslage. In Speicher¬ 
stelle 40/41 steht die ganze Operation über unverändert die 
Zahl 321. In 113/114 finden Sie (wegen des LSB/MSB- 
Formates umgedreht als 114/113) unseren Faktor 65. Akku 
und Speicherstelle 93 stehen auf 16, dem Bitzähler. In das X- 
und Y-Register wurde eine Null eingelesen. Im Flußdiagramm 
ist diese Situation mit einer 1 gekennzeichnet. Ganz unten im 
Diagramm sehen Sie, daß der Bitzähler 93 erniedrigt und 
danach geprüft wird, ob er schon gleich Null sei. Daraus folgt, 
daß die große Schleife 16mal durchlaufen wird. Den ersten 
Durchlauf (gekennzeichnet durch kleine Buchstaben) verfol¬ 
gen wir im einzelnen. 

a) X-Register wird zur Bearbeitung in den Akku geschoben. 

b) Mittels ASL wird das Bit 7 in die Carry-Flagge geschoben, 
was einen Carry-Inhalt von 0 bewirkt. 

c) Der solchermaßen bearbeitete Akku-Inhalt (der sich hier 
nicht weiter verändert hat) geht wieder zurück ins X-Register. 

d) Nun ist das Y-Register zur Bearbeitung dran. Es gelangt in 
den Akku. 

e) Mittels ROL wandert nun das MSB des X-Registers aus 
dem Carry-Bit in die O-Bit-Position des Akku 

f) und alles zusammen wieder ins Y-Register. Insgesamt wird 
dadurch die 16-Bit-Zahl im X/Y-Register um eine Stellenzahl 
erhöht, was der Vorbereitung zur Addition dient. (Erinnern Sie 
sich bitte: Die Kolonne der Einzelergebnisse wird ja addiert). 
Im Diagramm (ohne Buchstabenkennzeichnung) schließt 
sich hier noch eine Prüfung auf einen eventuellen Überlauf 
an, der dann mit einer Fehlermeldung beantwortet wird. 

g) Nun wird das MSB der Speicherstelle 113 nach links ins 
Carry geschoben. Das ist auch hier noch eine Null. 

h) Anschließend wandert dieser Carry-Inhalt als Bit 0 in Spei- 


B-EXa 


r Start 
V Division J 


Initialisieren: 

(SC) 

0 - (5D) 
x 

16 -y 


B-E 






13-0 


S8 

s 


sc 

s 


5D 


5) 


Subtraktion 
5C/5D — 59/5A 
- X/A 



x - (SC) 


X 


A - (SD) 


I 


(37) - (87) + 1 


y —y— l 



Bild 32. Flußdiagramm 
des Programms zur 
16-Bit-Division 

A : B = C + Rest 
57/58 59/5a 57/58 5c/5d 


cherstelle 114. Bit 7 von 114 
landet dafür im Carry. Auch 
hier wird auf diese Weise die 
ganze 16-Bit-Zahl 113/114 
um ein Bit nach links gescho¬ 
ben und im nächsten Schritt 
- im Flußdiagramm wieder 
ohne Buchstabe - geprüft, 
ob da eine 1 oder eine 0 ins 
Carry-Bit geshiftet wurde. 
Wenn lediglich eine Null auf¬ 
trat - wie hier -, dann springt 
das Programm sofort zum 
Herabzählen des Bitzählers 
93. Tritt aber eine 1 auf, dann 
addiert sich der Inhalt von 
40/41 zu X/Y. 

i) Hier wird der Zustand der 
betroffenen Speicherstellen 
und Register nach dem 
ersten Schleifendurchlauf 
gezeigt. 

Römisch II bis XVI zeigen 
nun jeweils den Zustand 
nach dem 2. bis 16. Durchar¬ 
beiten der großen Schleife. 
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A2 

00 

LDX 

»00 

, 3002 

86 

3C 

STX 

5C 

,5004 

06 

5D 

STX 

5D 

, 3006 

A0 

10 

LDV 

»10 

, 5008 

06 

57 

ASL 

57 

, 2100A 

26 

50 

ROL 

5B 

.500C 

26 

5C 

ROL 

5C 

,S00E 

26 

SD 

ROL 

5D 

,3010 

38 


SEC 


,3011 

A5 

5C 

LDA 

SC 

,5013 

E5 

59 

SBC 

59 

,3015 

AA 


TAX 


,5016 

A5 

5D 

LDA 

5D 

,5018 

E5 

5A 

SBC 

5A 

, 501A 

90 

06 

BCC 

5022 

, 50 IC 

86 

5C 

STX 

5C 

, 501E 

85 

5D 

STA 

5D 

,5020 

E6 

57 

INC 

57 

,5022 

88 


DEY 


,5023 

D0 

E3 

BNE 

5000 

,5025 

60 


RTS 


.? 





Programm 1. 



Die 16-Bit-Division 
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58 

57 

SA 

BO 

5D 

5C 

A 

X 

Y 

c 


I a 

0 10 1 0 0 0 1 

1 0 0 0 0 0 1 1 

0 0 

0 

0 

0 0 0 1 

0 

o 

0 0 0 0 1 

00000000 

00000000 



- 



00000000 

0 0 0 1 

0 

0 0 0 

— 

Ausgangslage n. Init. 

b 


0 0 0 0 0 1 1 0 























I 

1. Linksschieben 

c 

1 0 1 0 0 0 1 1 
























0 

2. Linksschieben 

d, e 












00000000 

OOOOOOOö 












0 

3,/4 Linksschieben 

f 

1 0 1 0 0 0 1 1 

0 0 0 0 0 1 1 0 

0 0 

0 

0 

0 

0 0 1 

0 

0 

0 0 0 0 1 

00000000 

00000000 

1 

1 

1 1 1 

1 

1 0 

1 0 1 II 1 I 

1 

0 0 0 0 

1 

1 

1 1 

1,0 

Ende der 1. Schleife 

II 

0 1 0 0 0 110 

0 0 0 0 1 1 0 0 

0 0 

0 

0 

0 

0 0 1 

0 

0 

0 

0 0 0 1 

00000000 

0 0 0 0 0 0 0 1 

1 

1 

1 1 1 

1 

1 0 

1 10 0 0 0 0 0 

0 0 0 0 

1 

1 

1 0 

1,0.1.0 

Ende der 2. Schleife 

III 

10 0 0 1 10 0 

0 0 0 1 1 0 0 0 

0 0 

0 

0 

0 

0 0 1 

0 

0 

0 

0 0 0 1 

00000000 

0 0 0 0 0 0 10 

1 

1 

l 1 1 

1 

1 0 

1 1 0 0 0 0 0 

1 

0 0 0 0 

1 

1 

0 1 

1,0 

Ende der 3. 5chleife 

IV 

0 0 0 1 10 0 0 

0 0 1 10 0 0 0 

0 0 

0 

0 

0 

0 0 1 

0 

0 

0 

0 0 0 1 

00000000 

0 0 0 0 0 10 1 

1 

1 

1 1 1 

1 

1 0 

1 10 0 0 10 

0 

0 0 0 0 

1 

1 

0 0 

l.o, 1.0 

Ende der 4. Schleife 

V 

0 0 1 1 0 0 0 0 

0 1 10 0 0 0 0 

0 0 

0 

0 

o 

0 0 1 

0 

0 

o 

0 0 0 1 

00000000 

0 0 0 0 10 10 

1 

1 

1 1 1 

I 

l 0 

1 10 0 10 0 

1 

0 0 0 0 

1 

o 

1 1 

1,0 

Ende der 5. Schleife 

VI 

0 1 1 0 0 0 0 0 

1 1 0 0 0 0 0 0 

0 0 

0 

0 

0 

0 0 1 

0 

0 

0 

0 0 0 1 

00000000 

0 0 0 10 10 0 

1 

1 

1 1 1 

1 

1 0 

1 1 0 1 0 0 1 

1 

0 0 0 0 

1 

a 

1 0 

l.o 

Endo der 6. Schleife 

VII 

1 1 0 0 0 0 0 1 

10 0 0 0 0 0 0 

0 0 

0 

0 

0 

0 0 1 

0 

0 

0 

0 0 0 1 

00000000 

0 0 10 10 0 0 

1 

1 

1 1 1 

1 

1 0 

I 1 1 0 0 1 1 

1 

0 0 0 0 

1 

0 

0 1 

1.0. 1,0 

Ende der 7. Schleife 

VIII 

10 0 0 0 0 1 1 

00000000 

0 0 

0 

0 

0 

0 0 1 

0 

o 

0 

0 0 0 1 

0 0 0 0 0 0 0 0 

0 1 0 l 0 0 0 1 

1 

1 

1 l 1 

1 

1 I 

0 0 0 10 0 0 0 

0 0 0 0 

l 

0 

0 0 

1.1.0.1,0 

Endo dor 8. Schleife 

IX 

0 0 0 0 0 1 1 0 

00000000 

0 0 

0 

0 

0 

0 0 1 

0 

0 

0 

0 0 0 1 

00000000 

10 10 0 0 11 

l 

1 

1 1 1 

1 

1 1 

0 1 10 0 0 1 

0 

0 0 0 0 

0 

1 

1 1 

1.0,1,0 

Endo der 9. Schleife 

X a 

0 0 0 0 1 10 0 

00000000 










00000001 

oioooi in 

0 

0 0 0 0 

0 

0 0 

0 0 0 0 0 10 

1 





l.o, 1, 1 


b 

0 0 0 0 1 10 0 

0 0 0 0 0 0 0 1 

0 0 

0 

0 

0 

0 0 l 

0 

0 

0 

0 0 0 1 

0 0 0 0 0 0 0 0 

0 0 0 0 0 10 1 

0 

0 

0 0 0 

0 

0 0 

0 0 0 0 0 10 

1 

0 0 0 0 

0 

1 

I 0 


F.ndo dor 10. Schleife 

XI 

0 0 0 1 10 0 0 

0 0 0 0 0 0 10 

0 0 

0 

0 

0 

0 0 1 

0 

0 

0 

0 0 0 1 

00000000 

0 0 0 0 1 0 10 

l 

1 

1 1 1 

1 

1 0 

1 10 0 10 0 

1 

0 0 0 0 

0 

1 

0 1 

1,0 

Endodor 11 Schleife 

XII 

0 0 1 10 0 0 0 

0 0 0 0 0 10 0 

0 0 

0 

0 

0 

0 0 1 

0 

0 

0 

0 0 0 1 

00000000 

0 0 0 10 10 0 

l 

I 

1 1 1 

1 

1 0 

11 0 1 0 0 1 

1 

0 0 0 0 

0 

1 

0 0 

1.0 

Endo dor 12. Schloife 

XIII 

0 1 l 0 0 0 0 0 

0 0 0 0 10 0 0 

0 0 

0 

0 

0 

0 0 1 

0 

0 

0 

0 0 0 1 

00000000 

0 0 10 10 0 0 

1 

1 

I 1 1 

1 

1 0 

1110 0 11 

1 

0 0 0 0 

0 

0 

1 1 

1.0 

Endo dor 13. Schleife 

XIV 

1 10 0 0 0 0 0 

0 0 0 10 0 0 0 

0 0 

0 

0 

0 

0 0 I 

0 

0 

0 

0 0 0 1 

00000000 

0 10 10 0 0 0 

1 

I 

1 1 I 

1 

1 1 

0 0 0 0 1 1 l 

1 

0 0 0 0 

0 

0 

1 0 

1.0 

Endo der 14, Schlolfo 

XV 

10 0 0 0 0 0 0 

0 0 10 0 0 0 0 

0 0 

0 

0 

0 

0 0 1 

0 

0 

0 

0 O 0 1 

00000000 

1 0 1 0 0 0 0 1 

1 

1 

1 1 1 

1 

1 1 

0 1 10 0 0 0 

0 

0 0 0 0 

0 

0 

0 1 

l.o. l.o 

Endo dor 10, Schleife 

XVIo, 

00000000 

0 1 0 0 0 0 0 0 










0 0 0 0 0 0 0 1 

0 0 0 0 0 0 1 1 

G 

0 

0 0 0 

0 

0 0 

0 0 0 0 0 0 1 

0 





1.l.o,1.1 


b. 

00000000 

0 10 0 0 0 0 1 

0 0 

0 

0 

0 

0 0 1 

0 

0 

0 

0 0 0 1 

00000000 

0 0 0 0 0 0 10 

0 

0 0 0 0 

0 

0 0 

0 0 0 0 0 0 1 

0 

0 0 0 0 

0 

0 

0 0 


Ende dor 10. Schloifo 



























Endlago 


Bild 33.16-Bit-Division Schritt für Schritt am Beispiel 20867:3 




Wenn Sie verstehen möchten, was da passiert, sollten Sie 
versuchen, Bild 31 nur als Kontrolle zu verwenden und 
ansonsten mal selbst alle Schritte nachzuvollziehen. 

44.16-Bit-Division 


Beim umgekehrten Weg, nämlich der Teilung von zwei 
16-Bit-Zahlen, haben wir nicht so viel Glück: Ich konnte keine 


Im folgenden wird dann jeweils die Situation am Ende der 
Schleife gezeigt. Beim Berechnen der Differenz muß jeweils 
darauf geachtet werden, daß die Subtraktion einer Zahl als 
Addition des Zweierkomplements ausgeführt wird. Das 
haben wir in Kap. 11 und 14 kennengelernt. Allerdings muß an 
dieser Stelle nochmal gesagt werden, daß die 1, die zum Ei¬ 
nerkomplement hinzuaddiert wird, um das Zweierkomple¬ 
ment zu erhalten, das gesetzte Carry-Bit ist. Nun dürfte es für 
Sie eigentlich keine Probleme mehr geben, was das Nach¬ 
vollziehen der Divisionsroutine betrifft. 














derartige Routine im Interpreter entdecken. Nun gibt es aber 
fast in jedem Lehrbuch der Maschinensprache die Vorstel¬ 
lung eines solchen Programms, so daß man sich das schön¬ 
ste aussuchen kann. Das Prinzip ist auch da dasselbe, wie wir 
es von der normalen Division gewohnt sind: Der Divisor wird 
Schritt für Schritt vom Dividenden abgezogen. In der Literatur 
[1 ] fand ich eine sehr kurze Routine, die ich Ihnen leicht modifi¬ 
ziert als Programm 1 vorstellen will. 

In Bild 32 ist ein Flußdiagramm dieser Routine gezeigt und 
in Bild 33 lacht Ihnen wieder das Bit-Gewirr entgegen, das Sie 
schon von der Multiplikation her kennen, hier aber für die 
Division. 

Damit Sie wissen, wo was hinein- oder herauskommt: 

A : B = C + Rest 

litt 
$57/58 S59/5A $57/58 $5C/5D 

An dem folgenden Beispiel soll der Programmverlauf gete- 
stetwerden: Wirteilen 20867 durch 321. Dabei kommt nach 
Adam Riese heraus: 65, Rest 2. 

in folgender Weise wird in die Speicherzellen die Aufgabe 
eingespeist: 


20867 

$57 

1000 

0011 

LSB 


$58 

0101 

0001 

MSB 

321 

$59 

0100 

0001 

LSB 


$5A 

0000 

0001 

MSB 

Als Ergebnis findet man dann: 


65 

$57 

0100 

0001 

LSB 


$58 

0000 

OOOO 

MSB 

Rest 2 

$5C 

OOOO 

OOIO 

LSB 


$5D 

0000 

0000 

MSB 


Als Bit-Zähler dient hier das Y-Register. 

b) Erstes Linksschieben des LSB mittels ASL. Dabei gelangt 
die 1 in das Carry-Bit. 

c) Hineinrotieren der 1 aus dem Carry in das MSB mittels 
ROL. 

d) , e) Linksrotieren der 16-Bit-Zahl in $5C/5D, die jetzt noch 0 
ist. 

f) Situation am Ende der ersten Schleife. Der Bitzähler ist um 
1 reduziert. 


Damit dürfen wir getrost die 16-Bit-Arithmetik abschließen. 
Alle vier Grundrechnungsarten können Sie jetzt programmie¬ 
ren. Weitere Rechenarten, wie Potenzieren, das Ziehen von 
Wurzeln, Logarithmen etc. bedingen ohnehin, daß die Argu¬ 
mente oder Ergebnisse keine Integerzahlen sind. Hier wer¬ 
den wir dann mit Fließkommaarithmetikarbeiten und den dazu 
vorgesehenen Interpreterroutinen. 


1 REM ********************************* 


2 REM * * 

3 REM * PROGRAMM 2 * 

4 REM * * 

5 REM * ERSTELLEN UND AUFRUF EINES * 

6 REM * HILFSBILDSCHIRMES * 

7 REM * * 


B REM * HEIMO PONNATH HAMBURG 1985 * 

9 REM ********************************* 

10 PRINT CHRS(147):POKE 7B5,0:POKE 786,96: 
GOTO 30 

15 REM-UP CURSOR SETZEN- 

20 POKE 211,SP:POKE 214,Z:SYS 58640:RETURN 
25 REM- ERSTELLEN DES HILFSBILDSCHIRMES- 
30 Z=1:SP=1:GOSUB 20:PRINT"**************» 
***********************" 

40 Z=21:SP=1: GOSUB 20: PRINT' 1 ************** 
************************" 


<250> 

<229> 

< 125> 
<231 > 

< 1B6> 
<216> 
<234> 
<0B2> 
< 002 > 

<095> 

< 112 > 
< 163 > 
<123> 

<1517 

<211 > 


50 Z=10:SP=7:GOSUB 20:PRINT"TEST FUER DIE 

VERSCHIEBUNB" <110 > 

55 REM-AUFRUF ZUM VERSCHIEBEN- <033> 

60 A=USR(DUMMY) <195> 

65 REM -BILDSCHIRM NEU BESCHREIBEN- <193> 

70 GET A*:IF A*="“THEN 70 <122> 

B0 PRINT CHR*(147):Z-2iSP=2:GOSUB 20:PRINT 

"JETZT SOLLTE DER ALTE BILDSCHIRM" <092> 

90 Z=4:SP=2:GOSUB 20:PRINT"UNTER DAS KERNA 

L-ROM GESCHOBEN SEIN" <150> 

100 PRINT:PRINT:PRINT" — JEDER<2SPACE>USR 

-AUFRUF HOLT DEN —" <003> 

110 PRINT" — HILFSBILDSCHIRM WIEDER .<3SP 


ACE>—" <068> 

120 PRINT" — AUCH IM DIREKT-MODUS<7SPACE> 


<056> 

130 PRINT:PRINT:PRINT"<2SPACE>PRQBIEREN SI 

E MAL: A=USR(1) CRETURND" <050> 

140 Z=19:SP=0:GOSUB 20:END <164> 


© G4'er 

Programm 2. Das Demo-Programm zur neuen 
Verschieberoutine. Vorher müssen Programm 3 und 
Programm 4 geladen werden. 
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Kurs 


45. Das Programmprojekt wird fortgeführt 


Im Kap. 32 haben wir ein Projekt gestartet, das dort eine 
Kopfzeile rückholbar unter den oberen ROM-Bereich ver¬ 
schob. Unser Wissen ist seither gestiegen und damit auch 
unsere Ansprüche. Eine Kopfzeile reicht nicht mehr, jetzt soll 
es ein ganzer Hilfsbildschirm sein, den wir erst in aller Ruhe 
erstellen wollen, um ihn dann jederzeit abrufbar unter das 
Betriebssystem zu packen. Den Aufruf wollen wir wieder mit 
der USR-Funktion steuern. Diesmal soll aber so programmiert 
werden, daß der Hilfsbildschirm erhalten bleibt und man ihn 
also mehrfach einblenden kann. Über die Nützlichkeit einer 
solchen Routine braucht man sicherlich nicht viele Worte zu 
verlieren: Denken Sie da nur mal an Programme, die irgend¬ 
welche Tasten mit besonderen Funktionen belegen, für die 
Sie eine Gedächtnisstütze brauchen, oder... 

Als Programm 2 ist ein kleines Demo-Programm abge¬ 
druckt, welches zuerst einen Bildschirm erstellt, dann die 
Routine »Verschieben« auf ruft, den Bildschirm löscht und neu 
beschreibt und schließlich mit einem weiteren USR den alten 
Bildschirm einblendet (vorher Programm 3 und 4 laden). 

Von nun an können Sie immer - auch im Direktmodus - 
durch ein USR-Kommando diesen Bildschirm abbilden. Zum 
Programm in Kap. 32 sind noch zwei Dinge zu bemerken, die 
hier geändert werden sollen. Erstens eine Frage: Ist Ihnen der 
Computer mal abgestürzt beim Aufruf des Programms? Die 


6000 

A9 

00 

LDA 

«00 

6002 

85 

5F 

STA 

5F 

6004 

A9 

04 

LDA 

«04 

6006 

85 

60 

STA 

60 

6008 

A9 

E8 

LDA 

«E8 

600A 

85 

5A 

STA 

5A 

600C 

85 

58 

STA 

58 

600E 

A9 

07 

LDA 

«07 

6010 

85 

5B 

STA 

5B 

6012 

A9 

E3 

LDA 

#E3 

6014 

85 

59 

STA 

59 

6016 

20 

BF A3 

JSR 

A3BF 

6019 

A9 

00 

LDA 

«00 

601B 

85 

5F 

STA 

5F 

601D 

A9 

DB 

LDA 

#D8 

601F 

85 

60 

STA 

60 


6021 

A9 

ES 


LDA 

WE8 

6023 

85 

SA 


STA 

5A 

6025 

A9 

DB 


LDA 

«DB 

6027 

85 

5B 


STA 

5B 

6029 

A9 

Dl 


LDA 

«Dl 

602B 

85 

SS 


STA 

58 

602D 

A9 

E7 


LDA 

«E7 

602F 

85 

5*? 


STA 

59 

6031 

20 

BF 

A3 

JSR 

A3BF 

6034 

A9 

40 


LDA 

«40 

6036 

BD 

11 

03 

STA 

0311 

6039 

A9 

60 


LDA 

«60 

603B 

BD 

12 

03 

STA 

0312 

603E 

60 



RTS 



.? 


Programm 3. Erster Teil der Verschieberoutine 


, 603F 

EA 



NOP 


,6084 

85 

22 

STA 

22 

,6040 

A9 

00 


LDA 

M00 

,6086 

A8 


TAY 


,6042 

85 

5F 


STA 

5F 

,6087 

A5 

5B 

LDA 

5B 

,6044 

A9 

E0 


LDA 

ME0 

,6001» 

ES 

60 

BBC 

6« 

,6046 

85 

60 


STA 

60 

, 60BB 

AA 


TAX 


,6048 

A9 

E8 


LDA 

HEB 

, 608C 

E8 


INX 


, 604A 

85 

5A 


STA 

5A 

, 608D 

98 


TYA 


, 604C 

85 

58 


STA 

58 

, 60QE 

F0 

23 

BEO 

60B3 

, 604E 

A9 

E3 


LDA 

«E3 

,6090 

A5 

5A 

LDA 

5A 

,6050 

85 

58 


STA 

SB 

,6092 

38 


SEC 


,6052 

A9 

07 


LDA 

*07 

,6093 

E5 

22 

SBC 

22 

,6054 

85 

59 


STA 

59 

,6093 

83 

5A 

STA 

5A 

,6056 

20 

77 

60 

JSR 

6077 

,6097 

B0 

03 

BGS 

609C 

,6059 

A9 

E9 


LDA 

*E9 

,6099 

C6 

SB 

DEC 

5B 

, 605B 

85 

5F 


STA 

5F 

, 609B 

38 


SEC 


,605D 

A9 

E3 


LDA 

«E3 

, 609C 

A5 

58 

LDA 

58 

, 605F 

85 

60 


STA 

60 

, 609E 

E5 

22 

SBC 

22 

,6061 

A9 

Dl 


LDA 

«Dl 

, 60A0 

85 

38 

STA 

58 

,6063 

85 

5A 


STA 

5A 

, 60A2 

B0 

08 

BCS 

60AC 

,6065 

A9 

E7 


LDA 

*E7 

, 60A4 

C6 

39 

DEC 

59 

, 6067 

85 

5B 


STA 

5B 

, 60A6 

90 

04 

BCC 

60AC 

,6069 

A9 

E8 


LDA 

HEB 

, 60A8 

Bi 

5A 

LDA 

(5A) ,Y 

, 606B 

85 

38 


STA 

50 

, 60AA 

91 

58 

BTA 

(58),Y 

, 606D 

A9 

DB 


LDA 

HDB 

, 60AC 

88 


DEY 


, 606F 

85 

59 


STA 

59 

, 60AD 

D0 

F9 

BNE 

60A8 

,6071 

20 

77 

60 

JSR 

4,077 

, 60AF 

Bl 

SA 

LDA 

<5A>,Y 

,6074 

60 



RTS 


, 60B1 

91 

5B 

STA 

(5B) , Y 







, 60B3 

C6 

5B 

DEC 

5B 

,6075 

EA 



NOP 


, 60B5 

C6 

59 

DEC 

59 

,6076 

EA 



NOP 


, 60B7 

CA 


DEX 


,6077 

78 



SEI 


, 60B8 

D0 

F2 

BNE 

60AC 

,6078 

A5 

01 


LDA 

01 

, 60BA 

68 


PLA 


, 607A 

48 



PHA 


, 60BB 

85 

01 

STA 

01 

,6078 

A9 

35 


LDA 

*35 

,60BD 

50 


CLI 


,607D 

SS 

01 


STA 

01 

, 60BE 

60 


RTS 


, 607F 

38 



SEC 







,6080 

A5 

5A 


LDA 

5A 






,6082 

E5 

5F 


SBC 

5F 






Programm 4. Zweiter Teil der Verschieberoutine 


Wahrscheinlichkeit dafür ist ungefähr 1 : 60, wenn nämlich 
ein Interrupt stattfindet, während die Speicherstelle 1 geän¬ 
dert wird. Obwohl wir erst in den nächsten Kapiteln auf Inter¬ 
rupts eingehen werden, wollen wir die Wahrscheinlichkeit für 
so einen Absturz auf Null reduzieren. Eine andere Sache ist 
der Ort, an dem sich das Programm befand. Es hat sich näm¬ 
lich herausgestellt, daß anscheinend die Nutzung dieses dort 
gewählten Speicherbereichs nicht ganz so problemlos ist. 
Bei einigen Anrufen wurde mir erzählt, daß zumindest der 
Anfang ab $02A7 bei bestimmten Konstellationen über¬ 
schrieben wird. Deswegen packen wir unser Programm ganz 
unkonventionell nach $6000, von wo Sie es - das beherr¬ 
schen Sie ja mit dem SMON inzwischen sicher - dorthin 
schieben können, wo es Ihnen gefällt. Allerdings müssen 
dann auch die USR-Adressen geändert werden. Aber auch 
das dürfte für Sie inzwischen kein Problem mehr sein. 

Um diese immerhin schon 2 000 Byte (1 000 für den Bild¬ 
schirm und nochmal 1 000 für das Farb-RAM) zu verschie¬ 
ben, bedienen wir uns einer Interpreter-Routine, die seit Aus¬ 
gabe 3/85 des 64’er auch beim Checksummer verwendet 
wird - der Blockverschiebe-Routine (Bild 34). 


Name 

Zweck 

Adresse 

Vorbereitungen 


Speicherstellen 

Register 

Stapelbedarf 


BLTUC 

Verschieben von Speicherinhalten im 
Speicher 

$A3BF dez. 41919 

Quelle Startadresse nach S5F/60 

Endadresse+1 nach $5A/5B 
Ziel Endadresse+1 nach $58/59 
$58-5B, $5F, $60, $22 
Akku, X- und Y-Register 
keiner 


Bild 34. bLTUC 


Wieder besteht unser Programm aus zwei Teilen. Im ersten 
wird der aktuelle Bildschirm nach oben geschoben. Dieser 
Teil speist lediglich zuerst die Adressen des Bildschirms und 
des Betriebssystem-ROM in die Abholspeicherstellen der 
danach aufgerufenen Routine BLTUC und wiederholt diesen 
Vorgang für die Bildschirmfarbspeicheradressen. Danach 
verstellen wir noch den USR-Vektor und kehren mit RTS ins 
Basic-Programm zurück (siehe Programm 3). 

Komplexer ist der zweite Teil. Um nämlich die Informationen 
unter dem ROM lesen zu können, muß dieses ausgeschaltet 
werden. Leider läßt sich das Betriebssystem-ROM nur 
zusammen mit dem Basic-Interpreter ausschalten. $A3BF ist 
aber eine Interpreter-Routine! Da bleibt uns nichts anderes 
übrig, als diese Routine in unser Programm einzubauen, was 
uns die Gelegenheit gibt, sie uns mal etwas anzusehen. Als 
Bild 35 ist sie im Flußdiagramm abgebildet. 

Programm 4 zeigt den zweiten Teil unseres Hilfsbildschirm- 
Programms. 

Von $6040 an, wohin wir am Ende des ersten Teils den 
USR-Vektor gerichtet haben, wird zunächst wieder Quell- und 
Zielbereich in den Abholspeicherstellen spezifiziert und 
jeweils danach zuerst für den Bildschirm, dann für das Farb- 
RAM, das übernommene Unterprogramm angesprungen. Ab 
$6077 liegt dann das modifizierte Unterprogramm. Die 
Befehle SEI und CLI gehören zu den wenigen, die Sie erst 
noch kennenlernen. Sie sind es, die die Absturzwahrschein¬ 
lichkeit auf Null bringen. Jedenfalls wird zuerst das ROM aus- 
und dafür das RAM eingeschaltet. Ab $607F bis $60B9 
befindet sich die Interpreter-Routine BLTUC. Darin wird 
zunächst die Länge des zu verschiebenden Bereichs berech¬ 
net, dann festgestellt, ob nur ganze Pages (Seiten) oder auch 
ein Restbereich verschoben werden soll. Falls ein solcher 
Restbereich vorhanden ist, wird auch seine Länge berechnet 
und zuerst dieser verschoben. Daran schließt sich das Ver- 
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S-»£B on. 


(das ist ein unbedingter Sprung, weil 
Carry hier immer 0 ist) 


0—4 


Restbereich um- 
laden über A 


Bild 35. 

Flußdiagramm zur 
Betriebsroutine BLTUC 


schieben der ganzen Pages an. Das X- und das Y-Register 
dienen dabei als Zähler. 

Ab $60BB schließt sich wieder unsere eigene Routine an, 
in der wir die ROMs wieder einschalten. Auf diese Weise las¬ 
sen sich noch mehrere Hilfsbildschirme unter ROM-Bereiche 
packen. Vielleicht überlegen Sie sich mal dazu einen Weg? 

46. Die ROM-Bereiche als Datenquelle 


Die ROM-Bereiche enthalten nicht nur ausgeklügelte 
Maschinenprogramme, sondern auch eine Menge Daten. 
Sollten Sie mal in die Verlegenheit kommen, beispielsweise 
die Zahl Pi im MFLPT-Format verwenden zu müssen, dann 
erfordert das einen ganz schönen Aufwand an Rechen- und 
Programmarbeit, oder Sie möchten bestimmte Texte wie bei- 


Startadresse 

Format 

Zahl 

$AEA8 


MFLPT 

PI 

SB1A5 


MFLPT 

—32768 

$B9BC 


MFLPT 

1 

$B9C1 


1-Byte-lnteger 

3 

SB9C2 


MFLPT 

0.434255942 

SB9C7 


MFLPT 

0.576584541 

SB9CC 


MFLPT 

0.961800759 

SB9D1 


MFLPT 

2.88639007 

SB9D6 


MFLPT 

0.707106781 -SQR(1/2) 

$B9DB 


MFLPT 

1.41421356 -SQRI2) 

$B9E0 


MFLPT 

-0.5 

$B9E5 


MFLPT 

0.693147181 - 1n2 

$BAF9 


MFLPT 

10 

$BDB3 


MFLPT 

99 999999.9 

$BDB8 


MFLPT 

999 999999 

SBDBD 


MFLPT 

1000000000 

SBF11 


MFLPT 

0.5 

SBF16 


4-Byte-lnteger 

-100000000 

SBF1A 


— " — 

10000000 

SBF1E 


— " — 

-1 000000 

SBF22 



100000 

SBF26 


—" — 

-loooo 

SBF2A 



1000 

SBF2E 


— " — 

—100 

$BF32 


— " — 

10 

$BF36 


— " — 

-1 

SBF3A 


— ‘ — 

-2160000 

SBF3E 



216000 

SBF42 


— " — 

-36000 

SBF46 


—" — 

3600 

SBF4A 



-600 

SBF4E 


— M — 

60 

SBFBF 


MFLPT 

1 44269504= V1n2 

SBFC4 


1-Byte-lnteger 

7 

$BFC5 


MFLPT 

2.14987637E-05 

SBFCA 


MFLPT 

1.43523140E-04 

SBFCF 


MFLPT 

1.34226348E-03 

SBFD4 


MFLPT 

9.61401701E-03 

SBFD9 


MFLPT 

0.0555051269 

SBFDE 


MFLPT 

0.240226385 

SBFE3 


MFLPT 

0.693147186 = 1n2 

SBFE8 


MFLPT 

1 

SE08D 


MFLPT 

11 879546 

SE092 


MFLPT 

3.92767774E-08 

ccceo 


MFLPT 

1.57079633 = Pi/2 

~i: :E6 

A | 

MFLPT 

6.28318531 = 2* Pi 

SE2EA 


MFLPT 

0.25 

SE2EF 

■ft 

1-Byte-lnteger 

5 

SE2F0 


MFLPT 

—14.3813907 

SE2F5 


MFLPT 

42.0077971 

SE2FA 


MFLPT 

—76.7041703 

SE2FF 


MFLPT 

81.6052237 

SE304 


MFLPT 

—41.3417021 

SE309 


MFLPT 

6.28318631 = 2 - PI 

SE33E 


1-Byte-lnteger 

11 

SE33F 


MFLPT 

—6.8473912E—04 

SE344 


MFLPT 

4.85094216E—03 

SE349 


MFLPT 

-0.0161117018 

SE34E 


MFLPT 

0.034209638 

SEJ53 

SE358 


MFLPT 

-0.0542791328 


MFLPT 

0.0724571965 

SE35D 


MFLPT 

—0.0898023954 

SE362 


MFLPT 

0.110932413 

$£367 


MFLPT 

—0.1-12830800 

SE36C 


MFLPT 

0.19999912 

SE371 


MFLPT 

-0.333333316 

SE376 


MFLPT 

1 

SE3BA 


MFLPT 

0.811835157 

SE8DA 

SE8E9 

1-Byto-lntogors 

Tabollo dor Farbcodes 

SEB81 

SEBC1 

" 

Tbstaturdecodlerung: 

Einzelne Tasten 

SEBC2 

SEC02 

I-Byle-Integors 

Tosten mit Shlll 

SEC03 

SEC43 

1-Byte-lntegers 

Tasten mit Commodore-Taste 

SEC78 

SECB8 

1-Byte-lnlegers 

Tasten mit Control-Taste 

3ECB9 

5ECE5 

1-Byto-lntegera 

VIC-ll-Chlp-Reglstorworto 

SECFO 

SED08 

1-Byto-lntegors 

Tabelle der LSB9 der Bildschirm- 
Anfangsadressen 


Tabelle 16. Im ROM stehen nicht nur Programme, 
sondern auch Tabellen, hier einige wichtige Zahlen. 


spielsweise eine Fehlermeldung verfügbar halten ... und so 
weiter. Viele von diesen Daten sind schon in der Firmware 
enthalten und wir werden im folgenden festhalten, wo sie sich 
befinden und welches Format man vorfindet. Sehen wir uns 
zunächst Zahlen an (Tabelle 16): Es existieren noch weitere 
Zahlentabellen in den ROM-Bereichen, die aber selten von 
Interesse sind. Ebenso wie Zahlen, findet man auch Texte im 
ROM als ASCII—Werte abgelegt (Tabelle 17) 
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Sollten Sie mal in die Verlegenheit kommen, solche Texte aus¬ 
geben zu wollen, dann legen Sie sie nicht nochmal in einer 
eigenen Texttabelle ab, sondern schöpfen Sie aus dem Fun¬ 
dus, den wir im ROM-Bereich fix und fertig haben. 

Nun noch die Tabelle 18 mit den neuen Assembler- 
Befehlen. 

111 »Computerspiele und Wissenswertes Commodore64«, Haar bei München: Markts 
Technik Verlag. 1984. Das Ist die von P. Lücke besorgte Übersetzung des amerikani¬ 
schen Buches »More on the slxtyfour« und ist jedem Assembler-Programmierer zu 
emplehlen. 


$A004 

CBMBASIC 

SA09E - $A19D 

Texte der Basic-Befehlsworte 

(Im letzten Byte Ist Jeweils Bit 7 gesetzt) 

SA19E - $A327 

Texte der Baslc-Fehler- und System-Meldungen. (Im 
letzten Byte Ist jeweils Bit 7 gesetzt) 

SA364-SA38A 

Weitere System-Meldungen: OK, ERROR. IN, 

READY, BREAK. (Das letzte Byte Ist jeweils 0) 

SACFC-SAD1D 

Fehlermeldungstexte für INPUT. 7EXTRAIGNORED, 
7REDO FROM START. (Das letzte Byte Ist jeweils 0) 

SE460 

BASIC BYTES FREE 

SE473 

• ' * • COMMODORE 64 BASIC V2 * * • * 
64K-RAM-System 

SECE6 

LOAD (Return) RUN (Return) 

SFOBD - SF12B 

Texte tür Ein- und Ausgabe-Operationen 

SFD10 

CBM80 


Tabelle 17. Diese Texte sind im ROM als ASCII-Werte 
abgelegt 


Befehls- Adressierung 
wort 

Byte¬ 

zahl 

Hex 

Code 

Dez 

Takt¬ 

zyklen 

Beein¬ 

flussung 

von 

Flaggen 

LSR »Akkumulator« 

1 

1A 

26 

2 

N.Z.C 

absolut 

3 

4E 

78 

6 

N,Z,C 

O-page-absolut 

2 

46 

70 

5 

N,Z,C 

absolut-X-indiz. 

3 

5E 

94 

7 

N,Z,C 

O-page-X-lndiz. 

2 

56 

86 

6 

N.Z.C 

ROL »Akkumulator« 

1 

2A 

42 

2 

N.Z.C 

absolut 

3 

2E 

46 

6 

N.Z.C 

O-page-absolut 

2 

26 

38 

5 

N,Z,C 

absolut-X-lndiz. 

3 

3E 

62 

7 

N,Z,C 

O-page-X-lndiz. 

2 

36 

54 

6 

N,Z,C 

ROR »Akkumulator« 

1 

6A 

106 

2 

N.Z.C 

absolut 

3 

6E 

110 

6 

N.Z.C 

O-page-absolut 

2 

66 

102 

5 

N.Z.C 

abaolut-X-lndlz. 

3 

7E 

126 

7 

N.Z.C 

O-page-X-indiz. 

2 

76 

118 

6 

N.Z.C 


Tabelle 18. Die neu besprochenen Assembler-Befehle 


47. Was sind Interrupts? 


Die Assembler-Befehle haben wir bis auf vier noch offen¬ 
stehende alle behandelt. Diese vier, die alle mit dem Interrupt- 
Handling Zusammenhängen, sollen nun unser Thema sein. 
Wenn wir sie beherrschen, haben wir den ersten Schritt zum 
Meister der Assembler-Alchimie getan. Diese vier kleinen 
1 -Byte-Befehle öffnen uns eine geheime Pforte zu einem Uni¬ 
versum an Programmier-Möglichkeiten, von dem wir bisher 
kaum zu träumen vermochten: Genug der Schwärmerei, erst 
kommt noch eine Menge Arbeit, die uns wohl mehrere Kapitel 
in Atem halten wird. 

Zuvor noch eine Bemerkung: es gibt kaum ein Thema im 
Rahmen der Programmierung in Assembler, welches so 
penetrant häufig Abstürze provoziert, wie das nunmehr ange¬ 
steuerte! Falls Sie noch keine RESETTaste an ihrem Compu¬ 
ter haben, wird es nun höchste Zeit. Diese nützlichen Dinger 
werden inzwischen schon so preiswert angeboten (sehen 
Sie mal in den Kleinanzeigenteil!), daß Sie zur Grundausstat¬ 
tung eines Assembler Alchimisten zählen. 

Unser Computer ist - solange er eingeschaltet ist - ständig 
mit irgendwelchen Tätigkeiten beschäftigt. Im Direktmodus 
hängt er beispielsweise meistens in einer Warteschleife und 
harrt der Eingaben, im Programm-Modus arbeitet er sich mit 
Hilfe der Interpreterschleife durch einen Basic-Befehlstext 
hindurch und so weiter. Nun werden Sie ja sicher schon fest¬ 
gestellt haben, daß er im Direktmodus auch den Cursor blin¬ 
ken läßt, in beiden Modi die Tl$-Uhr weiterzählt und weitere 
Dinge macht, die anscheinend so nebenher passieren. 
Schon in Kapitel 8 aber haben wir einen Unterschied zwi¬ 
schen Mensch und Computer festgehalten: Der Mensch 
kann mehrere Dinge gleichzeitig tun, der Mikroprozessor ist 
nur fähig zu einer Arbeit pro Zeiteinheit. Weil aber diese Zeit¬ 
einheiten so unfaßbar kurz sind (etwa eine Millionstel 
Sekunde), haben wir Benutzer den Eindruck der Gleich¬ 
zeitigkeit. 

Wenn dem aber so ist, wie macht es der Computer, daß er 
beispielsweise ein Programm abarbeitet und trotzdem die 
Tl$-Uhr weiterzählt? Durch Unterbrechungen (interrupt = 
unterbrechen) der gerade ausgeübten Tätigkeit. Ein Beispiel 
aus dem täglichen Leben soll uns das illustrieren: Sie lesen 
gerade diesen Artikel, da klingelt das Telefon und ein Freund 
möchte von Ihnen wissen, was eigentlich Unterbrechungen 
sind. Während Sie es ihm erklären, fängt in der Küche der Tee¬ 
kessel schrill zu pfeifen an. Sie sagen Ihrem Freund, er möge 
sich einen Moment gedulden, gehen in die Küche und neh¬ 
men den Kessel vom Feuer. Dann kehren Sie ans Telefon 
zurück und beenden nach einer Weile das Gespräch. Nach 
dem Auflegen des Telefonhörers setzen Sie die Lektüre des 


Lesen>- 

(Hauptprogramm) 


Telefon 

4 


Kessel 


Türklingel 

L 




Telefonat 

(IRQ-Programm) 



> 


I 

I 


Kessel vom Feuer I_ i 

(NMI-Programm) 

Bild 36. Unterbrechungsbeispiele im täglichen Leben 
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Artikels fort, fest entschlossen, sich nun nicht mehr unterbre¬ 
chen zu lassen. Kurze Zeit später klingelt jemand an der Tür. 
Sie lassen sich dadurch nicht stören. 

Dieses Gleichnis gibt ziemlich genau wieder, was sich im 
Computer - nur bei millionenfacher Geschwindigkeit - bei 
Unterbrechungen abspielt. In Bild 36 ist das Schema des 
Ablaufes grafisch dargestellt. In gewisser Weise ähnelt das 
ganze dem Abarbeiten von Unterprogrammsequenzen. Wes¬ 
halb programmiert man dann nicht einfach mittels einiger JSR- 
Aufrufe? Dafür hat L.A.Leventhal einen einleuchtenden Ver¬ 
gleich: »Ein Unterbrechungs-System entspricht etwa einer 
Telefonklingel. Sie läutet, wenn ein Anruf empfangen wird, so 
daß man den Hörer nicht laufend abnehmen muß, um festzu¬ 
stellen, ob sich jemand in der Leitung befindet.« (L.A.Leven¬ 
thal, »6502 Programmieren in Assembler«, München te-wi 
Verlag, Seite 12-1). Unterbrechungen können dann angefor¬ 
dert und abgearbeitet werden, wenn sie nötig sind, im Gegen¬ 
satz zu Unterprogrammen, die erst dann berücksichtigt wer¬ 
den, wenn der Programmzähler einen JSR-Befehl erfaßt. Um 
also schnell reagieren zu können, müßte man sehr oft in 
einem Programm eine Unterroutine anspringen, die auf 
gewisse Registerinhalte prüft und dann zur Bearbeitung ver¬ 
zweigt oder - bei Nichtvorliegen einer Bedingung - im norma¬ 
len Programm weiterfährt. Das kostet unnötig Zeit und Spei¬ 
cherraum. Mancher Verkehr des Computers mit Peripherie 
erfordert so schnelle Reaktionen, daß diese nur geleistet wer¬ 
den können durch Unterbrechen des laufenden Programmes. 

Ich denke, daß Sie nun die Notwendigkeit von Unterbre¬ 
chungen erkennen. Fast jede CPU kennt solche Unterbre¬ 
chungssysteme. Man kann sie charakterisieren durch die 
Beantwortung folgender Fragen: 

1) Welche Unterbrechungs-Eingänge weist die CPU auf? 

2) Wie reagiert die CPU auf eine Unterbrechung? 

3) Wie bestimmt die CPU die Unterbrechungsquelle, wenn 
die Anzahl der Quellen größer ist als die Anzahl der Eingänge? 

4) Kann die CPU zwischen wichtigen und weniger wichtigen 
Unterbrechungen unterscheiden? 

5) Wie und wann wird das Unterbrechungssystem freigege¬ 
ben oder gesperrt? 

All diese Fragen werden wir für unseren Computer 
ergründen. 

48. Das Unterbrechungssystem 
der CPU 6510/6502 


Einige dieser Charakteristika sind schnell zu zeigen: 

Zu 1: Unsere CPU hat genau 2 Eingänge für Unterbrechun¬ 
gen (wenn man RESET außer acht läßt, was wir im folgenden 
meist tun werden). 

Zu 3: Natürlich gibt es weitaus mehr denkbare Unterbre¬ 
chungsquellen als diese 2 Eingänge, weshalb softwaremäßig 
eine Registerabfrage (das sogenannte Polling) durchgeführt 
wird, um die Quelle festzustellen. 

Zu 4: Zwischen wichtiger und nicht so wichtiger Unterbre¬ 
chung kann unsere CPU unterscheiden durch die Priorität der 
beiden Eingänge. Wir haben eine sogenannte maskierbare 
Unterbrechung, genannt IRQ, welche per Befehl ignoriert 
(maskiert) werden kann und eine andere, nicht maskierbare, 
die daher auch NMI (not maskable interrupt = nicht maskier¬ 
bare Unterbrechung) genannt wird. NMI hat eine höhere Prio¬ 
rität als IRQ und kann deshalb für die wichtigeren Aufgaben¬ 
stellungen eingesetzt werden. 

Zu 5: Freigegeben oder gesperrt werden kann die IRQ-Unter- 
brechung durch ein Sperrbit (auch Maskenbit genannt), wel¬ 
ches sich als Bit 2 im Flaggen-Register des Prozessors befin¬ 
det. Das ist die I-Flagge. Für den Empfang der NMI- 
Unterbrechung kann die CPU nicht gesperrt werden. 


Um mal die Parallele zu unserem Beispiel zu zeigen: Das 
Lesen des Artikels ist die gerade stattfindende Tätigkeit des 
Computers. Die Telefonklingel signalisiert einen IRQ, der im 
folgenden bearbeitet wird. Das Pfeifen des Teekessels soll 
einem NMI entsprechen. Wenn dieser dann bearbeitet ist, 
geht es mit der Abarbeitung des IRQ weiter. Nach Beendi¬ 
gung des Telefonates wird das Unterbrechungs-Sperrbit 
gesetzt (sie nehmen sich vor, sich nicht mehr stören zu las¬ 
sen) und mit der normalen Tätigkeit fortgefahren. Weil der nun 
folgende IRQ damit maskiert ist, wird das Türklingeln 
ignoriert. 

Die Frage 2, nämlich wie unsere CPU auf eine Unterbre¬ 
chung reagiert, blieb noch unbeantwortet. Nun soll sie behan¬ 
delt werden: 

a) Am Ende jedes Befehls überprüft die CPU automatisch den 
Zustand des Unterbrechungs-Systems. Wenn an einer der 
beiden Unterbrechungsleitungen eine Anforderung vorliegt 
und diese auch freigegeben ist, beginnt die Unterbrechung 
zu wirken. 

b) Zunächst wird der Programmzählerinhalt in der Reihen¬ 
folge MSB, LSB auf den Stapel geschrieben. Danach wandert 
noch der Prozessorstatus auf den Stapel (siehe Bild 37). 

c) Durch Setzen des Unterbrechungs-Sperrbits I werden wei¬ 
tere maskierbare Unterbrechungen (IRQ) unterbunden. 

d) Nun holt sich die CPU aus einem Vektor ganz am Ende des 
Speichers eine Adresse, lädt diese in den Programmzähler 
und startet auf diese Weise ein Serviceprogramm, das dem 
auslösenden Anlaß Rechnung trägt. In der Tabelle 19 sind die 
zu den Unterbrechungsformen und zum RESET gehörigen 
Vektoren aufgeführt. 

Bevor wir uns weiter mit den so angesteuerten Routinen 
befassen, wollen wir die 4 Befehle kennenlernen, die uns 
noch fehlen. 

49. Schlüssel zur Unterbrechungs¬ 
programmierung: CLI, SEI, RTI, BRK 


Das Sperren der maskierbaren Unterbrechung IRQ und das 
Löschen der Maske erfolgt durch Setzen oder Löschen des 
Sperrbits im Prozessorstatus-Register. Dieses Bit, die I- 
Flagge, kann durch den Befehl CLI gelöscht werden. CLI 







MSB Programmzähler 

LSB Programmzähler 

Status-Register 


^ Stapelzeiyei 


Bild 37. Die CPU rettet den Programmzähler und das 
Statusregister 

beim Eintreten einer Unterbrechung auf den Stapel 


Unterbrechung sart 

Vektor 

Zieladresse 

Maskierbare Unterbrechung (IRQ, BRK) 

SFFFE/FFFF 

65352 SFF48 

Raset 

IFFFC/FFFO 

64738 SFCE2 

Nichtmaskierbare Unterbrechung (NMI) 

SFFFA/FFFB 

65091 $FE43 


Tabelle 19. Unterbrechungsvektoren und ihre Inhalte 
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kommt von »CLear Interrupt mask«, was bedeutet »lösche die 
Unterbrechungs-Maske«. Immer dann, wenn IRQs zugelas¬ 
sen sein sollen zur Bearbeitung durch den Mikroprozessor, 
muß damit die I-Flagge gelöscht werden. Wie Sie sehen, ist 
CLI ein I-Byte-Befehl mit impliziter Adressierung. Er braucht 
genau 2 Taktzyklen zur Erledigung seiner Aufgabe. 

Wenn wir später eigene Unterbrechungsroutinen schrei¬ 
ben, stehen wir oft vor der Frage, ob wir innerhalb unseres 
Unterbrechungsprogramms weitere Unterbrechungen 
zulassen wollen. Manchmal ist das wichtig, beispielsweise 
bei der Tastaturabfrage. Wie wir vorhin erwähnt haben, sperrt 
die CPU automatisch bei der Annahme von Unterbrechungen 
weitere IRQs durch Setzen der I-Flagge. Einer der ersten 
Befehle der eigenen Unterbrechungsroutine wird dann die 
Freigabe von Unterbrechungen sein durch Löschen der 
I-Flagge. 

SEI bewirkt das Gegenteil von CLI. Der Befehl setzt die I- 
Flagge auf 1 (»SEt Interrupt mask«) und verhindert, daß der 
Mikroprozessor weiteren IRQs seine Aufmerksamkeit 
schenkt. Das ist in den Fällen wichtig, in denen beispiels¬ 
weise störungsfrei der Inhalt des Charakter-ROM gelesen 
werden soll oder während der Änderung von Speicherstellen, 
die die IRQ-Routine benutzt. Wie wichtig das Sperren von 
IRQs sein kann, haben Sie eventuell bemerkt, wenn Ihnen das 
Hilfsbildschirmprogramm aus Kap. 32 mal abgestürzt ist. Seit 
der letzten Folge - wo wir die IRQs gesperrt haben - ist Ihnen 
das sicherlich nicht mehr passiert. Ebenso wie CLI ist SEI ein 
I-Byte-Befehl mit impliziter Adressierung, und auch er 
braucht 2 Taktzyklen zur Bearbeitung. 

Noch eine Bemerkung zum Verhindern der IRQs. Wir wer¬ 
den später sehen, was alles während der 60mal pro Sekunde 
aufgerufenen Unterbrechung erledigt wird. Jede Routine, die 
SEI verwendet, verbraucht Rechenzeit. Wenn sie so lange 
dauert, daß eine oder mehrere dieser regelmäßigen IRQs 
unterbunden werden, kann das unter Umständen zu Störun¬ 
gen von Programmabläufen führen. In solchen Fällen ist es 
sinnvoll, in die eigene Routine den Teil der regulären IRQ- 
Routine einzubauen, der im Programmablauf durch sein Feh¬ 
len Störungen verursacht. Meistens kann man aber durch 
gute Planung eines Programmes dieses Problem umgehen. 

RTI heißt »ReTurn from Interrupt«, zu deutsch also: »kehre 
aus dem Unterbrechungsprogramm zurück.« Es entspricht in 
seinem Einsatz etwa dem RTS bei Unterprogrammrücksprün¬ 
gen. Während RTS aber lediglich den alten Programmzähler¬ 
inhalt vom Stapel holt (und noch eine 1 dazuaddiert), schafft 
RTI auch noch den alten Inhalt des Status-Registers vom Sta¬ 
pel zurück. Der genaue Ablauf ist wie folgt: 

1) Alten Prozessorstatus vom Stapel wieder ins Status- 
Register schieben. 

2) Stapelzeiger um 1 erhöhen 

3) LSB des alten Programmzählers vom Stapel nehmen und 
zurückschreiben. 

4) Stapelzeiger um 1 erhöhen 

5) MSB des alten Programmzählers vom Stapel nehmen und 
zurückschreiben. 

6) Stapelzeiger um 1 erhöhen. 

Damit ist der Zustand vor der Unterbrechung wiederherge¬ 
stellt. Auch die I-Flagge ist so automatisch wieder gelöscht, 
denn vor der Unterbrechung war sie sicher nicht gesetzt 
gewesen und der alte Status-Zustand ist ja jetzt wieder 
vorhanden. 

RTI ist ebenfalls ein I-Byte-Befehl mit impliziter Adressie¬ 
rung. Seine vollständige Bearbeitung dauert 6 Taktzyklen. 

Bei eigenen Unterbrechungs-Routinen verwendet man 
häufig nicht RTI, sondern springt durch JMP an eine sinnvolle 
Stelle des normalen Unterbrechungsprogrammes. Auf diese 
Weise kann man dann die normalen Arbeitsgänge der vorpro¬ 
grammierten Unterbrechung oder Teile davon noch ausfüh¬ 
ren lassen. 


Den Befehl BRK (break=Software-Unterbrechung) haben 
wir schon verwendet. Er entspricht in seinem Einsatz etwa 
dem STOP-Befehl in Basic und dient wie jener Befehl dort 
hauptsächlich dem Testen von Programmen. Tatsächlich 
unterscheidet sich die Reaktion unserer CPU bei Auftreten 
eines BRK kaum von der bei einem IRQ. Folgendes passiert: 

a) Der Programmzähler wird um 2 erhöht. 

b) Bit 4 des Prozessorstatusregisters, die Break-Flagge B, 
wird auf 1 gesetzt. 

c) Das MSB des Programmzählers wird auf den Stapel 
gebracht und der Stapelzähler um 1 heruntergezählt. 

d) Dasselbe geschieht nun mit dem LSB des Pro¬ 
grammzählers 

e) und mit dem Statusregister. 

f) Das Unterbrechungsmaskenbit, die I-Flagge, wird auf 1 
gesetzt um IRQs zu sperren. 

g) In den Programmzähler wird nun aus dem Vektor 
FFFE/FFFF dieselbe Adresse geladen, die auch bei IRQs 
benutzt wird. Damit startet nun das Programm, das diese 
Unterbrechung bearbeitet. 

Sie sehen, daß der BRK-Befehl ein ziemlich komplizierter 
Geselle ist. Zwar handelt es sich wieder um einen I-Byte- 
Befehl mit impliziter Adressierung, aber er benötigt immerhin 
7 Taktzyklen, um all diese Arbeit zu bewältigen. 

Wir haben BRK bisher immer zur Programmunterbrechung 
mit nachfolgender Registeranzeige durch den SMON einge¬ 
setzt. Der SMON ist - wie fast jeder Monitor - so program¬ 
miert, daß ein BRK zur Registeranzeige führt. Das ist natürlich 
sinnvoll beim Einsatz von BRK zur Fehlersuche. In dem 
Moment, wo ein BRK vom Prozessor bearbeitet wurde, kann 
nur durch die gesetzte B-Flagge von einem IRQ unterschie¬ 
den werden. Es ist manchmal nötig, schon zu diesem Zeit¬ 
punkt die nen Unterschied festzustellen. Deshalb verwendet 
man den nachfolgend beschriebenen Test zu diesem Zweck: 
PLA 

in den Akku wird das zuletzt auf den Stapel geschobene Pro¬ 
zessorstatus-Register geholt. 

PHA 

und sogleich wieder zurückgeschoben 
AND #$10 

durch die AND-Verknüpfung mit der Binärzahl 0001 0000 
kann eine eventuell vorhandene B-Flagge isoliert werden. 
BNE BREAK 




Falls eine B-Flagge gesetzt war, ist der Akku ungleich 0 und 
die Bearbeitung verzweigt zum von uns konstruierten 
BREAK-Programm. War der Akku nach dieser AND- 
Verknüpfung gleich 0, dann erfolgt keine Verzweigung und es 
handelt sich um einen IRQ, zu dessen Bearbeitung nun zu 
springen ist. 

Es gibt noch eine andere - gebräuchlichere - Möglichkeit, 
zwischen einem BRK und einem IRQ zu unterscheiden, die 
allerdings erst zu einem späteren Zeitpunkt des computerin¬ 
ternen Unterprogrammes erfolgt. Von dieser zweiten Mög¬ 
lichkeit wird im SMON Gebrauch gemacht und wir werden sie 


nachher auch kennenlernen. 

Natürlich kann der BRK-Befehl auch zu anderen Zwecken 
als zur Registeranzeige durch einen Monitor verwendet wer¬ 
den. Es kommt immer darauf an, welches Service-Programm 
wir dem Computer anbieten. Springt man aus so einem 
Service-Programm mittels RTI zurück ins Hauptprogramm, 
dann muß man berücksichtigen, daß der Programmzähler vor 
der Sicherung auf dem Stapel um 2 erhöht worden ist. Manch¬ 
mal sind deshalb noch Korrekturen des Programms nötig. 






Ich hoffe, daß Sie bisher diesen Artikel nicht zu frustrierend 


fanden, denn ständig ist die Rede vom eigenen Unterbre¬ 


chungs-Programm und dabei wissen Sie - außer durch BRK - 
noch gar keine Möglichkeit, einen IRQ oder NMI auszulösen, 
und Sie sind sicher noch sehr vorsichtig mit dem Gedanken 
an eigene Unterbrechungs-Routinen, weil Ihnen ja noch 
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unbekannt ist, wie die normale Firmware Unterbrechungen 
behandelt. Keine Angst: All das werden wir noch klären. 
Betrachten Sie diesen Teil zum Thema Unterbrechungen viel¬ 
leicht mehr wie ein Handbuch, in dem Sie dann, wenn Ihr Ver¬ 
ständnis gestiegen ist, nochmal zurückblättern können. 

Wir haben bisher nur betrachtet, wie unsere CPU reagiert, 
wenn an einem der beiden Unterbrechungs-Eingänge (IRQ 
und NMI) eine Unterbrechungs-Anforderung vorliegt. Um nun 
aber selbst ins Geschehen eingreifen zu können, ist es nötig 
zu wissen, wie diese Anforderung dorthin gelangt. Das erfor¬ 
dert von uns die Beschäftigung mit anderen Computerbau¬ 
steinen als der CPU, die bisher im Mittelpunkt unseres Inter¬ 
esses stand. 


50. Woher kommen die 
Unterbrechungs-Anforderungen? 


Quellen für Unterbrechungen können viele genannt werden: 
Diskettenstation, Datasette, Drucker, Modem, Schalt¬ 
elemente und so weiter. Um aber eine gewisse Übersicht zu 
bekommen, sollte man unterscheiden zwischen primären 
und sekundären Unterbrechungsquellen. Das soll kurz erläu¬ 
tert werden: Die Diskettenstation beispielsweise ist über den 
seriellen Port mit dem Computer verbunden. Dieser wie¬ 
derum steht in direktem Kontakt zu 2 Bausteinen, den CIAs. 
Erst diese CIAs stehen in direktem Kontakt zur CPU. Alle 
Unterbrechungs-Quellen, die direkt Signale an die beiden 
Unterbrechungseingänge unserer CPU senden, sollen künf¬ 
tig »primäre« Quellen genannt werden, die anderen, die nur 
über solch eine primäre Quelle Unterbrechungs-Anforde¬ 
rungen stellen, werden von uns als »sekundäre« Quellen 
bezeichnet. Weil wir irgendwo einen Schnitt machen müssen 
- einmal, um nicht völlig auszuufern in der Erklärung von peri¬ 
pheren Geräten (das soll anderen, kompetenteren überlas¬ 
sen bleiben) und zum anderen, weil ich mich da auch nicht so 
gut auskenne - werden wir uns im folgenden auf die primären 
Unterbrechungsquellen beschränken. Da bleibt aber noch 
mehr als genug zu tun übrig und deshalb soll auch nur eine 
Auswahl dieser Primärquellen detailliert behandelt werden. 

Welches sind nun die primären Unterbrechungsquellen? 
Hier sind sie aufgeführt: 

1) Der VIC-ll-Chip (MOS 6566/6567 Video Interface 
Controller) 


2) Die beiden CIAs (MOS 6526 Complex Interface Adapter) 

3) Die RESTORE-Taste 

4) Der Expansion-Port 

5) RESET (paßt hier nicht ganz her, woanders aber auch nicht 
besser) 

Den Expansion-Port werden wir nicht behandeln und einen 
RESET nur ziemlich kurz betrachten, weil es sich dabei 
eigentlich nicht um eine Unterbrechung im bisher definierten 
Sinn handelt. 

51. Der VIC-ll-Chip als 
Unterbrechungsquelle 


Soweit ich feststellen konnte, kommt der VIC-ll-Chip in 
Bezug auf unsere CPU nur als Anforderer von maskierten 
Unterbrechungen (IRQ) in Frage. Die Handhabung seiner Un¬ 
terbrechungs-Verlangen geschieht im VIC-ll-Chip durch zwei 
Register. Vier Ereignisse sind eingeplant, deren Eintreten zur 
Unterbrechung führen kann: 

1) Rasterzeilen-Unterbrechung 

2) Kollision eines Sprites mit Hintergrund 

3) Kollision von Sprites untereinander 

4) Lichtgriffel-Unterbrechung. 

Die ersten 3 Auslöser werden wir uns in kommenden Fol¬ 
gen genau ansehen und dabei vielerlei interessante Möglich¬ 
keiten feststellen. Die Option, die der Lichtgriffel bietet, wird 
nicht behandelt werden: Meine Kenntnisse auf diesem Sek¬ 
tor sind nur gering (nobody is perfect). 

Das sogenannte Interrupt Enable Register (Unterbre- 
chungs-Zulassungs-Register) des VIC-ll-Chips ist Register 
26. Es befindet sich in der Speicherstelle 53274 ($D01A) 
(siehe 38). 

In diesem Register wird festgelegt, ob eines - oder mehrere 
- der 4 möglichen auslösenden Ereignisse eine Unterbre¬ 
chungsanforderung an den Mikroprozessor senden soll. 
Jedem Ereignis ist ein Bit zugeordnet. Ist dieses Bit gleich 1, 
dann ist die Unterbrechung freigegeben, ist es gleich 0, dann 
liegt eine Sperrung vor. Die Zuordnung der Bits ist wie folgt: 
Bit 0 Rasterzeilen-IRQ 

Bit 1 Sprite/Hintergrund-Kollision 

Bit 2 Sprite/Sprite-Kollision 

Bit 3 Lichtgriffel-IRQ 

Bits 4 bis 7 sind ungenutzt und haben immer den 
Wert 1. 
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Bild 38. Das Interrupt-Enable-Register (53274 = SdOlh) des VIC-ll-Chip 
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Bild 39. Das Interrupt-Latch-Register (53273 = $d019) des VIC-ll-Chip 
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Das Register 2 5 wird Interrupt Latch Register genannt, was 
etwa zu übersetzen wäre mit »Unterbrechungs-Einrast- 
Register« (siehe Bild 39). Der englische Ausdruck »latch«, 
der nur umschreibend oder sehr technisch übersetzt werden 
kann, beschreibt eigentlich recht genau, was in diesem Regi¬ 
ster geschieht. Ein »latch« ist nämlich so etwas wie ein 
Schnappriegel, also ein Riegel, der bei der Betätigung ein¬ 
rastet. Wenn eines der 4 möglichen Ereignisse eintritt, 
schnappt im dazugehörigen Bit dieses Registers der Inhalt 
auf 1. Die Bit-Zuordnung ist die gleiche wie in Register 26. 
Aber das Bit 7 hat hier noch eine Bedeutung: Ist eines der Bits 
0 bis 3 auf 1 gesetzt und das dazugehörige Ereignis in Regi¬ 
ster 26 auch zur Unterbrechung zugelassen (also auch dort 
gleich 1), dann taucht in Register 2 5, Bit 7 eine 1 auf. So kann 
durch einfaches Lesen dieses Bits festgestellt werden, ob ein 
IRQ durch den VIC-ll-Chip ausgelöst wurde. 

Will man in diesem Register ein gesetztes Bit löschen, muß 
man - außergewöhnlich! - eine 1 in die Bitposition schreiben. 

Mit Recht erwarten Sie nun eigentlich eine Anwendung des 
bisherGelernten. Bei Unterbrechungsprogrammen istesaber 
dringend nötig, immer den gesamten Komplex im Auge zu ha¬ 
ben. Ich habe mich daher entschlossen, zuerst alles zu erklä¬ 
ren und dann Anwendungsmöglichkeiten vorzustellen. Ihre 
Geduld wird auf eine harte Probe gestellt, aber ich hoffe, daß 
Sie später feststellen, daß es sich gelohnt hat, etwas zu 
warten. 

52. Die beiden CIA-Bausteine 
als Unterbrechungsquellen 


An sich sind die beiden CI As in unserem Computer völlig iden¬ 
tisch. Sie werden aber unterschiedlich eingesetzt. Sehen wir 
uns zunächst einmal an, was beiden in Bezug auf Unterbre¬ 
chungen gemeinsam ist, um danach die Unterschiede festzu¬ 
halten. Die Unterbrechungs-Steuerung geschieht in Register 
13 dieser Bausteine. Dieses Register hat 2 Funktionen: Es 
bestimmt, ob eine Unterbrechungsanforderung an die CPU 
gesandt werden soll, und es stellt fest, ob ein Ereignis stattge¬ 
funden hat, das zur Unterbrechung führen kann. Die Bedie¬ 
nung dieses Registers ist demzufolge auch etwas unüber¬ 
sichtlich, aber wir haben schon ganz andere Probleme 
gemeistert. 

Sehen wir uns zuerst einmal an, welche Ereignisse vom 
Standpunkt eines CIA-Bausteines als Unterbrechungskrite¬ 
rium dienen können: 

1) Unterlauf der Uhr A 

2) Unterlauf der Uhr B 

3) Die interne Uhr hat eine Alarmzeit erreicht 

4) Am SP-Eingang (hängt mit dem seriellen Port zusammen) 
ist ein bestimmter Zustand erreicht 

5) An einem Eingang namens FLAG ist ein bestimmter 
Zustand erreicht. 

Die Ereignisse 4 und 5 werden wir ebenfalls im weiteren weit¬ 
gehend ausklammern. 

Nun zum Register 13, dem Unterbrechungs-Kontroll-Regi- 
ster (siehe Bild 40). 


Auch hier gehört zu jedem Ereignis ein Bit. Dabei - um Wie¬ 
derholungen zu vermeiden - ist die Zuordnung schon durch 
die eben angegebene Ereignisaufzählung gegeben. Ziehen 
Sie von der vorangestellten Nummer immer eine 1 ab und Sie 
haben die Bitnummer. Die Bits 5 und 6 sind unbenutzt. Bit 7 
hat eine dreifache Funktion, die eng mit den anderen Bitinhal¬ 
ten verknüpft ist. Sehen wir uns das mal der Reihe nach an: 
Lesen des Registers 

Sind Unterbrechungsereignisse aufgetreten, dann sind die 
dazugehörigen Bitsauf 1 gesetzt. Bit 7 ist gleich 1, wenn min¬ 
destens ein solches Ereignis stattgefunden hat und außer¬ 
dem dieses Ereignis als Unterbrechungsauslöser freigege¬ 
ben ist. Auf diese Weise kann - ähnlich wie beim VIC-ll-Chip- 
Register 25 - festgestellt werden, ob die Unterbrechung 
durch einen der beiden CIAs angefordert wurde. Im Unter¬ 
schied aber zum VIC-ll-Register wird Register 13 durch das 
Lesen gelöscht. Braucht man den Inhalt also noch, sollte man 
ihn irgendwo Zwischenspeichern. 

Schreiben in das Register 
Bit 7 = 0 erzeugt Sperren. 

Das erkennt man am besten an einem Beispiel. Nehmen wir 
an, wir möchten die Unterbrechung sperren, die durch einen 
Unterlauf von Uhr A erzeugt werden kann. Das betrifft das Bit 
0. Wir schreiben in das Register 13 folgende Zahl: 0000 
0001 

Wie Sie sehen, ist das Bit 7 gleich 0. Die 1 in Bit 1 bewirkt 
die Sperrung. Durch die Nullen in den anderen Bits wird 
bewirkt, daß die anderen Unterbrechungs-Ereignisse nicht 
beeinflußt werden. Wollten wir alle sperren, dann müßten wir 
einschreiben: 0001 1111 

Auf diese Weise können selektiv einzelne Unterbrechun¬ 
gen durch Einschreiben der 1 bei gelöschtem Bit 7 gesperrt 
werden. 

Bit? - ' erzeugt Freigabe. 

Auch hier wieder ein Beispiel. Wenn wir ganz gezielt Unter¬ 
brechungen durch Unterlauf der Uhr A freigeben wollen, 
müssen wir die folgende Zahl in Register 13 schreiben: 1000 
0001 

Bit 7 (gleich 1) zeigt an, daß diejenigen Unterbrechungen frei¬ 
zugeben sind, deren Bits auf 1 gesetzt sind. Alle anderen 
Unterbrechungen, wo also in der dazugehörigen Bitposition 
der einzuschreibenden Zahl eine 0 steht, bleiben 
unverändert. 

Ein wichtiger Unterschied zwischen den beiden CIAs ist 
der, daß der Unterbrechungsausgang von CIA 1 mit dem IRQ- 
Eingang der CPU verbunden ist, wohingegen der entspre¬ 
chende Ausgang von CIA2 an den NMI-Eingang unseres 
Mikroprozessors führt. Daher löst der CIA 1 nur IRQs aus, er 
wird manchmal deshalb auch IRQ-CIA genannt. Der andere 
ist dann der NMI-CIA, weil er nur NMIs anfordern kann. 


53. Der IRQ-CIA 


Das Register 13 des IRQ-CIA (der die Speicherstellen 56320 
bis 56335 belegt), liegt in Zelle 56333 ($DC0D). Die einzel- 
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Bild 40. Genereller Aufbau der Unterbrechungs-Kontroll-Register (13) der beiden CIA-Bausteine 
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nen Bits sind wie folgt zugeordnet: 

Bit 0 Unterlauf Uhr A 

Von hier kommt der IRQ, der 60mal pro Sekunde stattfindet 
zur Tastaturabfrage, zum Weiterstellen der Tl$-Uhr etc. 

Bit 1 Unterlauf Uhr B 

Spielt bei Kassettenoperationen und dem seriellen Port eine 
Rolle. 

Bit 2 ALARM bei interner Uhr. 

Spielt beim Zufallszahlengenerator (RND(O)) eine Rolle. 

Bit 3 Hier kommen durch den User-Port Unterbrechungs-An¬ 
forderungen. 

Bit 4 ist verbunden mit dem seriellen Port und der Kassetten- 
Lese-Leitung. 

54. Der NMI-CIA 


Ebenso kurz und schmerzlos wie beim CIA 1 soll auch das 
besondere am CIA 2, dem NMI-CIA (er belegt den Speicher 
von 56576 bis 56831) vorgestellt werden. Sein Register 13 
findet sich in Speicherstelle 56589 ($DD0D). Die Bits 0 und 
1 (Unterläufe der beiden Uhren) spielen beim Senden bezie¬ 
hungsweise Empfangen von Daten über die RS232C- 
Schnittstelle eine Rolle, Bit 2 (ALARM) wird nicht verwendet, 
Bit 3 ist direkt mit dem User-Port verbunden ebenso wie Bit 4. 
Der NMI-CIA wird uns in seiner normalen Funktion nicht mehr 
beschäftigen. 
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55. Die RESTORE-Taste und ein 
kleines Testprogramm 


Am besten speichern Sie nun das Programm ab und schal¬ 
ten dann mittels dem SMON-Kommando M 0318 die Anzeige 
der Bytes ab $0318 ein. Dort steht in den beiden ersten Spei¬ 
cherzellen 47 und FE. Mit dem Cursor fahren Sie in diese 
Zeile und ändern den Inhalt in 00 und 60, also unsere 
Programmstartadresse in der LSB/MSB-Form. Nach einem 
RETURN läuft nun jede NMI-Anforderung über unser Pro¬ 
gramm. Nun können Sie es ausprobieren, indem Sie mal die 
RESTORE-Taste drücken. Es genügt völlig, alleine diese Taste 
zu betätigen. Das wirkt - sichtbar durch die Änderung der 
Rahmenfarbe - in jedem Modus und jederzeit. Eine kleine 
Merkwürdigkeit ist, daß man manchmal etwas Geduld aufbrin- 
gen muß, bis man die Wirkung sieht. Ich vermute, daß der NMI 
so schnell erledigt wird, daß sich mehrer NMIs pro Tasten¬ 
druck ereignen. Man müßte sich noch eine kleine Routine 
überlegen, die die Wirkung etwas verzögert, denn 2 solche 
EOR-Kommandos nacheinander heben sich gegenseitig auf. 
Zum Schluß noch eine Aufstellung (Tabelle 20) mit den 
besprochenen Befehlen. 

56. Der normale Verlauf eines IRQ 


Neulich hatten wir bereits festgestellt, daß eine IRQ- 
Anforderung (nach dem Retten des Programmzählers und 
des Prozessorstatus-Registers, sowie dem Setzen der I- 
Flagge) den Inhalt des Vektors $FFFE/FFFF in den Pro¬ 
grammzähler holt. Dort steht die Adresse $FF48(dez. 
65352) und deshalb startet nun das dort im ROM verankerte 
Programm, welches wir uns nun im einzelnen ansehen wer¬ 
den (alle Adressen als Dezimalzahlen, in Bild 41 finden Sie 
das Flußdiagramm dazu) 


Die RESTORE-Taste ist direkt mit dem NMI-Eingang unseres 
Mikroprozessors verbunden. Das ermöglicht es uns, durch 
einfaches Drücken dieser Taste jederzeit ins Geschehen ein¬ 
zugreifen, ohne uns um Details kümmern zu müssen, ob sich 
der Computer gerade im Direkt- oder im Programm-Modus 
befindet und so weiter. Denn NMI hat die höchste Priorität der 
Unterbrechungen. 

Ein kleines Testprogramm soll Ihnen hier noch vorgestellt 
werden, das Sie vielleicht aber noch nicht ganz verstehen 
werden, weil wir erst in den nächsten Kapiteln die eingebau¬ 
ten Serviceprogramme kennenlernen werden. Schalten Sie 
also den SMON ein und geben Sie das Programm 5 ein (ab 
$6000): 


6000 

6001 

6002 

6003 

6004 

PHA 

TXA 

PHA 

TYA 

PHA 

mit diesen Befehlen retten wir Akku und Register aut 
den Stapel. 

6005 

LDA #$7F 

0111 1111 Ist das In binär. 

6007 

STA SDD0D 

Dadurch werden alle NMIs. die vom CIA 2 kommen 
könnten, gesperrt. Erinnern Sie sich: Bit 7 Ist Null 
beim Schreiben, also Sperrtunktlon. 

600A 

LOY SDD0D 

Lesen des Registers 13 löscht dieses und zeigt uns, 
ob die NMI-Anforderung von dort kam. 

6000 

BMI S601A 

falls NMI-Anforderung vom CIA 2 kam, wird verzweigt 

600F 

LDA 5D020 

ansonsten kommt der NMI von der RESTORE-Taste, 
und In den Akku wird die Rahmenlarbe eingeladen 

6012 

EOR #$0E 

Ausgehend davon, daß als Rahmenlarbe 14 vorliegt, 
wird diese exklusiv geORDERt zu Null. Ist die Rah¬ 
menfarbe 0, dann wird sie wieder 14. 

6014 

STA SD020 

Einschreiben des neuen Farbwertes 

6017 

JMPSFEBC 

Sprung In den Rest der normalen NMI-Routlne 

601A 

JMP SFE72 

Sprung In die normale NMI-Routine für den Fall, daß 
die Anforderung durch den NMI-CIA kam. 


Programm 5. Ein kleines Testprogramm demonstriert die 
Wirkung einer Unterbrechung: Durch Drücken der 
RESTORE-Taste wird die Rahmenfarbe geändert. 


Befehls¬ 

wort 

Adressie¬ 

rung 

Byte¬ 

zahl 

Code 

Hex Dez 

Takt- 

cyden 

Beeinflussung 
von Flaggen 

CLI 

implizit 

1 

58 

88 

2 

I-Flagge 

SEI 

implizit 

1 

78 

120 

2 

I-Flagge 

RTI 

implizit 

1 

40 

64 

6 

alle Flaggen 

BRK 

implizit 

1 

00 

0 

7 

B-Flagge vor dem 
Schieben aut den 
Stapel, I-Flagge 
danach 


Tabelle 20. Die Daten zu den letzten Assembler-Befehlen 



Bild 41. So bearbeitet der C 64 
normale IRQs. Das Programm 
wird im Text erklärt. 
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65352 


PHA 

Zunächst werden der Akku und 

TXA 

die Register X und Y auf den Sta¬ 

PHA 

pel geschoben 

TYA 


PHA 



Trickreich sind die beiden folgenden Befehle, mit denen 
das zu Beginn durch die CPU gerettete Statusregister gele¬ 
sen wird: 

TSX Stapelzeiger ins X- Register 

LDA 260,X Einladen des Status-Registers 

Nun wird geprüft, ob die BRK-Flagge gesetzt ist. Wenn das 
der Fall ist, dann ist der Auslöser ein BRK gewesen, anson¬ 
sten ein IRQ: 

Isolieren der BRK-Flagge 
Wenn keine BRK-Flagge, dann 
überspringen des nächsten 
Befehls. 

Falls BRK 
Falls IRQ 

Den vorletzten Sprungbefehl werden wir bei der BRK-Be- 
handlung verfolgen. Interessant für uns ist jetzt der indirekte 
Sprung bei 65368. Der Vektor 788/789 ($314/315) liegt im 
RAM! Damit können wir ihn auf eigene Routinen verstellen. 
Genau hier ist der Ansatzpunkt für nahezu alle Eingriffe in die 
Unterbrechungsbehandlung. Der voreingestellte Wert in die¬ 
sem Vektor ist die Adresse 59953 ($EA31). Das dort ange¬ 
siedelte Programm wird im Normalfall 60 mal in der Sekunde 
ausgeführt: 

59953 JSR 65514 Das ist ein Kernel-Sprungbefehl 

zur Routine UDTIM bei 63131. 

In diesem Unterprogramm wird zuerst die Uhr Tl$ weiterge¬ 
stellt und dann die Tastaturabfrage vorbereitet. 


65365 

65368 


AND #16 
BEQ 65368 


JMP (790) 
JMP (788) 


59956 

bis 

60000 

60001 

bis 

60026 


In diesem Programmteil erfolgt 
die Cursorbehandlung. 


60027 JSR 60039 


60033 

PLA 

Zurückholen des 


TAY 

Y- und 


PLA 



TAX 

des X-Registers 


PLA 

sowie des Akku. 

60038 

RTI 

Damit kehrt der Computer zu 
dem durch den IRQ unterbroche¬ 
nen Programm zurück. 


Somit hätten wir's. Nun können wir je nach Bedarf entschei¬ 
den, welche von diesen Servicetätigkeiten wir bei einem 
eigenen IRQ-Programm brauchen: Die Uhr TIS, die Cursor¬ 
behandlung, die Abfrage der Recordertasten und die Tastatu¬ 
rabfrage. 

Sehen wir uns nun an, was geschieht, wenn ein BRK-Kom- 
mando der Auslöser war. 

57. BRK-Unterbrechung 


Wir hatten vorhin am Scheideweg zwischen IRQ und BRK 
den letzteren links liegen gelassen. Normalerweise verwen¬ 
det man beim Programmieren in Assembler ja ein Software- 
Instrument wie zum Beispiel den SMON, der so gebaut ist, 
daß der BRK-Vektor, welchen wir vorhin kennengelernt 
haben ($316/317 = 790/791) auf die Registeranzeige 
weist. Was geschieht eigentlich, wenn der BRK-Vektor unver¬ 
ändert bleibt, so also, wie er im Einschaltzustand des Compu¬ 
ters vorliegt? 

Dann zeigt er auf die Adresse 65126 ($FE66), wo ein Teil 
der NMI-Routine zu finden ist (Siehe auch das Flußdiagramm 
in Bild 42): 

Sprung ins Programm RESTOR, 
in dem alle Vektoren (788-819) 
gemäß einer ROM-Liste auf ihre 
Ausgangswerte gesetzt werden. 
Sprung in das Programm 
l/O-RESET. 

werden die beiden CIAs auf die 


65126 JSR 64789 


JSR 64931 


Anschließend wird abgefragt, ob 
eine Recordertaste gedrückt ist 
und entsprechende Flaggen 
bearbeitet. 

Dieses Unterprogramm dient zur 
Tastaturabfrage. 

Auch in dieser Routine tritt übrigens ein indirekter Sprung 
nach einem RAM-Vektor auf (655/656 = $28F/290), der 
normalerweise auf 60232 zeigt, aber auch auf eine eigene 
Routine verbogen werden könnte. 

Enthalten in der Tastaturabfrage ist auch die Überprüfung 
der RUN/STOP-Taste, die aber nur zusammen mit den in dem 
UDTIM-Aufruf voreingestellten Flaggen funktioniert. Deshalb 
wird das Abschalten der RUN/STOP-Taste im allgemeinen 
dadurch durchgeführt, daß man den IRQ-Vektor auf 59956 
stellt und damit den ersten JSR-Befehl überspringt. Aller¬ 
dings wird auf diese Weise auch die Tl$-Uhr nicht weiter¬ 
gestellt. 

60030 LDA 56333 Das ist das Unterbrechungs- 

Kontrollregister des IRQ-CIA, das 
hier durch Auslesen gelöscht 
wird. 

Den Abschluß der IRQ-Routine bildet nun noch das 
Zurückschreiben der Register: 


In diesem Programm 
Anfangswerte gestellt. 

JSR 58648 Sprung in ein Programm, welches 
zuerst den VIC-ll-Chip initialisiert, 
dann einen Bildschirmeditor- 
RESET durchführt.Nach Beenden 
dieser Routine ist der Bildschirm 
gelöscht. 

JMP (40962) 

Mit diesem indirekten Sprung ist die BRK-Unterbrechung 
beendet. Man sieht aber jetzt schon deutlich, daß es sich hier 
nicht um eine Unterbrechung im eigentlichen Sinn handelt, 


( BRK- \ 
Behandlung/ 


RESTOR: 
Initialisieren aller 
Vektoren 


I/O-RESET: 
CIAs auf 
Anfangswerte 


Initialisierung des 
VIC-II-Chip und 
Bildschirmeditors 


( Sprung zum 
Basic-Warmstart ) 


Bild 42. Auf diese Weise verläuft ein 
unvorhergesehener BRK im Sande. 
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vielmehr um einen Abbruch. In 40962/40963 steht die 
Adresse des Basic-Warmstarts (58235). Danach befindet 
sich der Computer im READY-Zustand in der Eingabe- 
Warteschleife. 

Das Zurückholen der Register und ein RTI erübrigt sich 
hier, weil ohnehin viele Werte aus dem unterbrochenen Pro¬ 
gramm inzwischen weitgehend zerstört sind und alle Unter- 
brechungskontrollregister (CIAs und VIC-ll-Chip) neu belegt 
wurden. Ein unkontrollierter BRK hat also recht fatale Folgen! 


58. Was macht ein NMI? 


Wenden wir uns nun der Firmware zu, die zur Bearbeitung 
eines NMI vorgesehen ist (Dazu sehen Sie sich bitte in 
Bild 43 das Flußdiagramm an). 

In den letzten Kapiteln erfuhren wir, daß auch für diese Un¬ 
terbrechung am Ende des Speichers ein Vektor vorhanden ist, 
nämlich SFFFA/FFFB (65530/65531). Dort steht die 
Adresse 65091 ($FE43), die nun in den Programmzähler 
gelangt und damit startet das folgende Programm: 

65091 SEI Unterbrechungen niedrigerer 

Priorität werden gesperrt. 

JMP (792) 

Das ist nun wieder ein für uns sehr interessanter Vektor 
792/793 ($318/319), der — weil er im RAM-Bereich liegt — 
verstellbar ist. Genau das haben wir am Ende der letzten 
Folge getan mittels des M-Kommandos von SMON um den 
NMI zu testen, den wir mit der RESTORE-Taste ausgelöst 
haben. Der vorher eingestellte Wert in diesem Vektor ist die 
Adresse 65095 ($FE47), also direkt der nächste Befehl 
nach dem indirekten Sprungbefehl. 

65095 PHA Ebenso wie vorhin beim IRQ wer- 

TXA den hier die Inhalte des Akku und 

PHA der 

TYA Register auf den Stapel 

PHA geschoben. 

LDA #127 das ist binär 01111111. 

STA 56589 Sperrt alle weiteren NMI- 
Anforderungen 

LDY 56589 NMI-CIA Kontrollregister laden. 

BMI 65138 Wenn der NMI von der 

RESTORE-Taste kam, ist Bit 7 des 
Registers = 0, sonst = 1 (bei 
NMI-Anforderung durch NMI- 
CIA). Wenn also nicht durch die 
RESTORE-Taste, erfolgt Sprung. 

An dieser Stelle läuft nun das Programm weiter, wenn die 
RESTORE-Taste der NMI-Auslöser war: 

65110 JSR 64770 Das ist ein Unterprogramm, wel¬ 
ches prüft, ob ein Modul ab 
$8000 vorhanden ist. 

Dies wird dadurch angezeigt, daß von $8004 bis $8008 
die Werte stehen: 195, 194,205, 56, 48 (dasist»CBM80«), 

BNE 65118 Wenn kein Modulprogramm ab 
$8000 vorliegt, erfolgt ein 
Sprung. 

JMP (32770) Falls Modul. 

Wenn ein Modul angezeigt wurde, erfolgt der indirekte 
Sprung nach dem Vektor $8002/8003, der vom Modul vor¬ 
gegeben wird. Das kann man auch nutzen, um eigene 
Maschinenprogramme zu starten durch einen Druck auf die 
RESTORE-Taste. Man muß dann nur in die Speicherstellen 
$8002 bis 8008 die geforderte Zieladresse beziehungs¬ 
weise »CBM80« schreiben. 

Der nun folgende Abschnitt wird nur angesprungen, wenn 
die RESTORE-Taste der NMI-Auslöser war: 



Bild 43. Flußdiagramm zum Ablauf einer NMI- 
Unterbrechung. 
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65118 JSR 63164 Das ist ein Programmteil, der 

auch schon von der IRQ-Routine 
(nach dem Weiterstellen von TIS) 
durchlaufen wird. Hier werden 
einige Voreinstellungen für die 
Tastaturabfrage erledigt, die 
insbesondere die RUN/STOP- 
Taste betreffen. 

JSR 65505 Kernelroutine STOP. 

Dort befindet sich ein indirekter Sprung über den Vektor 
808/809 ($328/329), also auch ein verstellbarer RAM- 
Vektor. Im Normalfall zeigt dieser Vektor auf 63213 ($F6ED). 
Dort wird geprüft, ob die RUN/STOP-Taste gedrückt ist. Eine 
andere Methode zum Ausschalten des RUN/STOP bietet 
sich hier an, die die Uhr TIS ungeschoren läßt. 

BNE 65138 Falls nur die RESTORE-Taste 

(also ohne RUN/STOP) gedrückt 
ist, erfolgt nun ein Sprung. 

Waren aber sowohl die RUN/STOP- als auch die RESTORE- 
Taste gedrückt, dann folgt nun ein Programmabbruch, der 
uns schon von BRK her bekannt ist. Hier wie dort endet das 
Ganze dann mit dem Reset der I/O-Bausteine, des VIC-II- 
Chips, der Vektoren, des Bildschirmeditors und das Ergebnis 
ist ein Basic-Warmstart. 

Ab 65138 befindet sich der Rest der NMI-Routine, auf die 
das Programm läuft, wenn 

1) die NMI-Anforderung nicht von der RESTORE-Taste kommt 
oder 

2) zwar von dieser Taste kommt, aber die RUN/STOP-Taste 
nicht gedrückt ist. 

65138 bis 65211 Dieser ganze Abschnitt ist zur 

Behandlung der RS232C- 
Schnittstelle eingerichtet. 



65212 

PLA 

Abschluß des NMI durch Rück¬ 


TAY 

schreiben des Akku und der 


PLA 

TAX 

PLA 

Register vom Stapel 

65217 

RTI 

Rückkehr zum unterbrochenen 
Programm. 


Wenn Sie sich nun mal unser kleines Demo-Programm aus 
Kapitel 55 ansehen, dann werden Sie feststellen, daß der 
Programmteil bis S600E lediglich den ersten Teil der norma¬ 
len NMI-Routine kopiert. Die Prüfung auf das Modul und die 
RUN/STOP-Taste werden übersprungen. Statt dessen erfolgt 
nach der Abarbeitung des für die RESTORE-Taste gebauten 
Programmes das Ende der NMI-Routine (SFEBC = 65212). 
Im anderen Fall, wenn also die RESTORE-Taste nicht der Aus¬ 
löser des NMI war, wird in die normale Routine ab 65138 ein¬ 
gemündet. 


59. Eigentlich keine Unterbrechung: 
RESET 


Weil wir alle Unterbrechungen hier bearbeiten wollen, soll 
auch der RESET angesprochen werden. Es handelt sich 
dabei aber nicht um eine Unterbrechung im bisher definierten 
Sinn. Mir fällt allerdings kein Platz ein, wo der RESET besser 
hinpassen würde. Ähnlich wie bei NMI und IRQ wird auch hier 
ein Vektorinhalt in den Programmzähler geladen, der in den 
höchsten Speicheradressen zu finden ist (Auch hierzu wie¬ 
der ein Flußdiagramm in Bild 44). 

Diesei Vektor liegt in SFFFC/FFFD. Der Inhalt ist die 
Adresse 64738 (SFCE2) und genau dort geht das Pro¬ 
gramm dann weiter: 


64738 


LDX #255 

Im ersten Teil wird der 
Stapelspeicher initialisiert. 

SEI 

Verhindern von IRQ 

TXS 

Stapelzeiger auf $FF 

CLD 

Dezimal-Modus ausschalten (falls 
er eingeschaltet war). 

JSR 64770 

Das ist wieder das Unterpro¬ 
gramm, das auf ein Modul prüft. 


Hier ergibt sich die Möglichkeit, auch beim RESET einzu¬ 
greifen, indem man die Kennung CBM80 an die abgefragten 
Orte packt. 


BNE 64751 Falls kein Modul, erfolgt Sprung. 

64748 JMP(32768) 


Dieser indirekte Sprung erfolgt nach dem Vektorinhalt von 
$8000/8001 = 32768/32769. Das ist ein anderer Vektor 
als wir ihn vorhin beim NMI hatten (dort war es $8002/8003 
= 32770/32771). So kann ein anderer Programmteil ange¬ 
steuert werden als durch den NMI, was übrigens auch drin¬ 
gend erforderlich ist, weil der Stapelzeiger zerstört wurde. 


64751 Hier läuft das Programm weiter, 

falls keine Modulkennung erkannt 
wurde. 


Der ganze Rest dient dem Versetzen des Computers in den 
Einschaltzustand. Allerdings bin ich davon überzeugt, daß 
noch irgendein Unterschied bestehen muß zwischen dem 
einfachen Aus- und wieder Anschalten des Computers und 
einem RESET. Es hat sich nämlich bei einigen Programmen 
gezeigt, daß sie nach einem RESET fehlerhafte Verläufe neh¬ 
men können, was nach einem totalen Aus- und wieder 
Anschalten nicht zu beobachten war. Der Grund für diesen 
Unterschied liegt (für mich) noch im Dunkeln. Vielleicht weiß 
das ja jemand von Ihnen. Dann schreiben Sie doch mal! 
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60. Die Sache mit dem Modulstart 61. Nutzung der Unterbrechungen 


Sowohl beim RESET als auch beim NMI haben wir festge¬ 
stellt, daß der Modulstart-Bereich ab $8000 eine besondere 
Rolle spielt. In Bild 45 finden Sie nochmal zusammengefaßt, 
was sich dort findet wenn ein Modul vorhanden ist. 

Wir wollen im folgenden Beispielprogramm (Programm 6) 
ein Modul simulieren, indem wir den SMON mittels des 
RESET anspringen. Der NMI — also die RUN/STOP- 
RESTORE-Tastenkombination — soll dabei wirkungslos 
gemacht werden. 

Bild 46 zeigt ein Flußdiagramm dieses Beispiel¬ 
programmes: 

Achten Sie bitte darauf, daß Sie nach dem Eintippen des 
Programmes abspeichern und — natürlich — daß die 
SMON-Version ab $C000 im Speicher vorliegt. Wenn Sie nun 
mal die RESTORE-Taste - oder RUN/STOP und RESTORE - 
drücken, passiert offensichtlich nichts. Das liegt daran, daß 
unser Programm lediglich die auf den Stapel gelegten Regi¬ 
ster wieder zurückholt und aus der Unterbrechung mit RTI ins 
normale Geschehen zurückkehrt. 

Haben Sie einen RESET-Taster eingebaut? Dann drücken 
Sie doch mal drauf. Zunächst erkennen Sie den normalen 
RESET-Verlauf. Dann meldet sich aber nicht wie gewohnt die 
Nachricht CBM-Basic..., sondern der SMON mit einer Regi¬ 
steranzeige. Das RESET-Programm ab $602E folgt dem 
Firmware-Programm. Auf diese Weise (und mittels eines 
AUTOSTART) sichern sich Softwarehäuser manchmal gegen 
unbefugtes Kopieren ihrer Programme. 


100 


■LI 1,3 

110 

- 

. BA *8000 

112 

-1 


114 

-;******************************* 

116 

MODULSIMULATION 

117 

— 5 ******************************* 

118 

-i 


120 


.EQ INITCZ=*E3BF 

130 

- 

.EQ INITMS=*E422 

140 

- 

•EQ INITV=*E453 

150 

- 

.EQ SCREENCLR=*E544 

160 

- 

■ EQ RAMTEST=*FD50 

170 

- 

.EQ I0RESET=*FDA3 

180 

- 

.EQ TVTAKT=*FF5B 

190 

- 

.EQ REST0R=*FF8A 

192 



194 

****** 

MODULKENNUNG UND -VEKTOREN **** 

l*?<b 

”P 


200 


-WO RESET,NMI 

210 

- 

.BY *C3,*C2,*CD,*38,*30 

212 

-i 


214 

-;****** 

RESET-PROGRAMM ******** 

216 

-j 


220 

-RESET 

STX *D016 |RESET-BIT 

230 

— 

JSR IORESET 

240 

- 

JSR RAMTEST 

250 

- 

JSR RESTOR 

260 

- 

JSR TVTAKT 

270 

- 

CLI 

280 

- 

JSR INITV 

290 

- 

JSR INITCZ 

300 

- 

JSR INITMS 

310 

- 

JSR SCREENCLR 

320 

— 

JMP *C000 (SPRUNG IN SMON 

322 

“5 


324 

-( ** NMI 

-PROGRAMM (RESTORE-TASTE) ** 

330 

-NMI 

PLA 

340 


TAY 

350 

— 

PLA 

360 

- 

TAX 

370 

- 

PLA 

380 

- 

RTI 

390 

" 

.SY 1,4 


Programm 6. Simulation eines Moduls 


64 


Sowohl was die Hardware als auch die Firmware für die Unter¬ 
brechungsbehandlung angeht, haben wir nun einen guten 
Überblick gewonnen. Es ist jetzt an der Zeit, daß wir uns 
ansehen, auf welche Weise man dieses Reservoir an vielfälti¬ 
gen Möglichkeiten für sich nutzen kann. Dazu soll uns ein 
Überblick dienen: 

I) Auslösung der Unterbrechung durch Hardware- 
Einwirkungen. 

Da hätten wir beispielsweise den Userport oder den 
Expansion-Port, über die wir per CIAs Unterbrechungen 
anfordern können. Um es gleich zu sagen: Damit werden wir 
uns nicht auseinandersetzen. Meine Kenntnisse auf diesem 
Gebiet sind zu dünn. Aber vielleicht verstehen Sie das auch 
mal als Aufforderung, Ihre Versuche dazu anderen zu offen¬ 
baren? Also: Schreiben Sie doch mal! 

II) Unterbrechungsauslösung per Software: 

Damit haben wir immer noch ein weites Feld von Möglich¬ 
keiten vor uns: 

lla) Vorgesehene Nutzungen des IRQ 
— mittels des VIC-ll-Chips. 



Bild 46. Diesen Inhalt müssen die Speicherstellen $8000 
bis $8008 haben, damit ein Modulstart stattfindet. 


RESET-PROGRAMM 



Bild 46. 

Flußdiagramm zum Programm 6, Modulsimulation. 












































































C 64/VC 20 


Kurs 


Da können wir uns auf den Rasterzeileninterrupt, die 
Sprite/Hintergrund- oder die Sprite/Sprite-Kollision stützen. 

— oder mit Hilfe des CIA1 

Da ist es vor allem der 60mal pro Sekunde auftretende 
Timer A-Unterlauf, der uns interessieren soll. 

l lb) Vorgesehene Nutzungen des NMI 

— CIA2: Läßt man die RS232C-Schnittstellenbehandlung 
außer acht, dann gibt es keine vorgesehene Nutzung. 

— RESTORE: Zusammen mit der RUN/STOP-Taste kann man 
die vorgegebene Routine verändern, wie wir es schon in eini¬ 
gen Beispielen gezeigt haben. 

Wir können außerdem noch unterscheiden zwischen Nut¬ 
zungen, die periodisch stattfinden sollen (zum Beispiel eine 
spezielle Tastaturabfrage) und solchen, die stochastisch ( = 
zufallsabhängig) oder willkürlich erfolgen (zum Beispiel 
Drücken der RESTORE-Taste). Beides ist auch durchführbar 
bei: 

llc) Nicht vorgesehene Nutzung der Unterbrechungen. 

Da bietet sich vor allem der meistens völlig brach liegende 
CIA2 an mit seinen beiden Timern und der Alarmfunktion. 

Wenn Sie aber erst einmal vertraut sind mit der Unterbre¬ 
chungs-Programmierung und auch etwas Zeit zum Tüfteln 
investieren, finden Sie bestimmt noch eine ganze Menge wei¬ 
terer Möglichkeiten. 

Bei mehreren gleichartigen Unterbrechungsanforderun¬ 
gen (zum Beispiel IRQs) muß noch ein Weg gefunden wer¬ 
den, wie zwischen den dann vielleicht anfallenden unter¬ 
schiedlichen Service-Routinen differenziert werden kann. 
Denkbar wären beispielsweise Aufgabenstellungen wie: 

Jeder 3. Timer-IRQ soll den Joystick abfragen, oder 
RESTORE+h soll den Hilfsbildschirm zeigen, RESTORE+z 
soll den aktuellen Bildschirm wieder restaurieren, etc. 


PROGRAMM 7 


,6000 

78 



SEI 


,600 1 

A9 

28 


LDA 

#28 

,6003 

BD 

14 

03 

STA 

0314 

,6006 

A3 

60 


LDA 

*60 

,6008 

80 

15 

03 

STA 

0315 

,600B 

A3 

F8 


LDA 

*F8 

,6000 

8D 

12 

D0 

STA 

D0I2 

,6010 

AD 

1 1 

D0 

LDA 

D01 1 

,6013 

29 

7F 


ANO 

#7F 

,6015 

3D 

1 1 

D0 

STA 

D0 1 1 

,6018 

A9 

81 


LDA 

*81 

, 60 1A 

8D 

1A 

D0 

STA 

D01A 

, 60 1D 

A9 

00 


LDA 

#00 

,60 1F 

8D 

20 

D0 

STA 

D020 

,6022 

A9 

04 


LDA 

#04 

,6024 

83 

02 


STA 

02 

,6026 

58 



CLI 


, 6027 

60 



RTS 


,602g 

AD 

19 

D0 

LDA 

D0 19 

,602B 

8D 

19 

D0 

STA 

D019 

, 602E 

30 

07 


BMI 

6037 

,6030 

AD 

00 

DC 

LDA 

DC0D 

,6033 

58 



CLI 


,6034 

4C 

31 

EA 

JMP 

EA31 

,6037 

AD 

12 

D0 

LDA 

D012 


, 603A 

C9 

F8 


CMP 

WF8 

, 603C 

B0 

1 1 


BCS 

604F 

, 603E 

18 



CLC 


, 603F 

65 

02 


ADC 

02 

,604 1 

8D 

12 

D0 

STA 

D012 

,6044 

A0 

03 


LDY 

#03 

,6046 

88 



DEY 


,6047 

D0 

FD 


BNE 

6048 

,6049 

EE 

20 

D0 

INC 

D020 

, 604C 

4C 

81 

EA 

JMP 

EA8 1 

, 604F 

A9 

00 


LDA 

#00 

,6051 

8D 

20 

D0 

STA 

D020 

,6054 

A9 

32 


LDA 

#32 

,6056 

8D 

12 

D0 

STA 

D0 12 

,6059 

4C 

0 1 

EA 

JMP 

EA8 1 

, 605C 

78 



SEI 


,605D 

A9 

00 


LDA 

#00 

, 605F 

8D 

1A 

D0 

STA 

00 1A 

,6062 

A3 

31 


LDA 

*31 

,6064 

8D 

14 

03 

STA 

0314 

,6067 

A3 

EA 


LDA 

MEA 

,6069 

3D 

13 

03 

STA 

0315 

,606C 

A3 

0E 


LDA 

«06 

, 606E 

8D 

20 

00 

STB 

D020 

,6071 

58 



CLI 


,6072 

60 



RTS 



Programm 7. Das im Artikel entwickelte Programm auf 
einen Blick 



Bild 47. So sieht das 9-Bit-Register im VIC-ll-Chip aus, 
welches die Rasterzeilen mitzählt. 


Sie sehen, eine große Menge Arbeit wartet auf uns. Nicht 
zu allen Möglichkeiten werde ich hier Beispielprogramme zei¬ 
gen. Außerdem dürfen die dann auch nicht zu undurchsichtig 
sein und man sollte möglichst den Erfolg eines solchen 
Demo-Programmes auf dem Bildschirm erkennen können. 
Trotzdem hoffe ich, daß die nachfolgend und in den nächsten 
Kapiteln gezeigten Programmlösungen ausreichen, Ihnen 
die Unterbrechungs-Behandlung mit eigenen Routinen 
durchschaubar zu machen. Ich will Ihnen aber nicht ver¬ 
schweigen, daß auch mir noch längst nicht alle Geheimnisse 
der Unterbrechungsprogrammierung offenbar geworden 
sind. Oft finde ich mich unversehens in Programm- 
Sackgassen wieder. Das soll Ihnen als kleiner Trost dienen, 
wenn Sie mal nach dem 1001. Absturz müde und mit rau¬ 
chendem Kopf vor Ihrem Commodore-Ungeheuer sitzen. 


62. Ein Programm zum VIC-II-IRQ 


Sehr schöne Effekte lassen sich durch eine periodische 
IRQ-Anforderung per Rasterzeileninterrupt mittels des VIC-ll- 
Chip erzielen. Deshalb ist sowas auch ein beliebtes Objekt 
für Demos von Unterbrechungsprogrammen. Als Ziel setzen 
wir uns, einen Bildschirm zu konstruieren, dessen Rahmen in 
allen Farben schillert. 

Leser der Grafikserie werden diese Möglichkeit des VIC-ll- 
Chip schon kennen: Man kann dem Kathodenstrahl, der über 
den Monitor huscht, um das Bild zu erzeugen, über zwei 
Register folgen, die Rasterregister, wo jede Rasterzeile mit¬ 
gezählt wird. Ohne an dieser Stelle allzusehr auf die Einzel¬ 
heiten einzugehen, soll hier nur bemerkt werden, daß die 
Numerierung dabei etwa von 0 bis 280 geht, weil auch der 
Rahmen'’^nd nicht sichtbare Teile des Bildschirmes vom 
Strahl überstrichen werden. Wo das Textfeld anfängt, ist von 
Monitor zu Monitor (oder Fernseher) etwas unterschiedlich. 
Bei mir beginnt es oben in Rasterzeile 50 und endet unten bei 
Zeile 248. Sollten die im Beispielprogramm 7 (Programm 7) 
nachher voreingestellten Randwerte bei Ihnen also anders 
sein, können Sie sie durch einige später noch angegebenen 
POKEs ändern. Die beiden Rasterzeilenregister sind: 
$D012 (53266) 

$D011 (53265) 

Von $D011 allerdings ist nur das Bit 7 als msb der Raster¬ 
zeilenzahl für uns von Bedeutung. Bild 47 soll diese Bele¬ 
gung deutlich machen: 

Das Interessante an diesen Registern ist nun, daß man 
auch in sie schreiben kann. Die auf diese Weise festgelegte 
Rasterzeile ist dann der Auslöser des IRQ, falls dieser im 
Interrupt-enable-Register $D01A freigegeben wurde (das 
kennen wir noch aus Kapitel 51). 

Damit kann also unsere primäre Unterbrechungsquelle 
(der VIC-ll-Chip) programmiert werden. Halten wir die zwei 
Schritte dazu nochmal fest: 

1) Rasterzeile festlegen, bei der ein IRQ ausgelöst werden 
soll, durch Einschreiben in die Register SD012 und Bit 7 von 
$D011. 

2) Freigeben des Rasterzeileninterrupts durch Einschreiben 
von 1000 0001 in das Interrupt-enable-Register $D01A. 

Der nächste Schritt betrifft die Bearbeitung des IRQ durch 
die CPU. Wie wir vorhin sahen, springt das Programm beim 
IRQ mittels eines indirekten Sprunges, der auf den Vektor 
788/9 ($314/5) zugreift. Dieser Vektor muß nun auf die 
eigene Routine verbogen werden, also: 

3) Vektor $314/5 auf die IRQ-Service-Routine richten. 

Damit wären alle Vorbereitungen getroffen. Der Rest liegt 

nun ganz bei uns — beziehungsweise bei dem von uns zu 
schreibenden Service-Programm. Als Bild 48 finden Sie ein 
Flußdiagramm unseres Beispielprogrammes 7. 
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Gehen wir nun an die Realisierung. Zunächst also die Initia¬ 
lisierung, die wir bei $6000 (also durch SYS 24576 zu star¬ 
ten) beginnen lassen: 


601A 


STA D01A ins IRQ-enable-Register 
geschrieben, um den 
Rasterzeilen-IRQ zuzulassen. 


Festlegen einiger Startwerte: 


6000 

SEI 

Sperren von IRQs 

601D 

LDA #$00 

Farbe schwarz 

Schritt 3: 



601F 

STA D020 

in Rahmen schreiben 

6001 

LDA #$28 

LSB der IRQ-Routine 

6022 

LDA #$04 

Streifenbreite in 

6003 

STA 0314 

in IRQ-Vektor-LSB 

6024 

STA 02 

Merkregister schreiben. 

6006 

LDA #$60 

MSB der IRQ-Routine 

6026 

CLI 

IRQ freigeben 

6008 

STA 0315 

in IRQ-Vektor-MSB 

6027 

RTS 

Ende der Initialisierung. 

Schritt 1: 



Von nun an laufen alle IRQs über unsere eigene Routine, 

600B 

LDA #$F8 

Rasterzeile, bei der das Textfen¬ 

die bei $6028 beginnt. 

i 



ster endet. Von da an soll der 

Zunächst müssen wir prüfen, ob die Unterbrechung vom 



Rahmen schwarz sein. 

VIC-ll-Chip kommt oder vom CIA1: 

600D 

STA D012 

in Rasterzeilen-Register (LSB) 

6028 

LDA D019 

IRQ-Request-Register des VIC-ll- 



schreiben. 



Chip (siehe Kapitel 51). Dort ist 

6010 

LDA D011 

Register mit dem msb des 



Bit 7 gesetzt, wenn die Anforde¬ 



Rasterzeilenzählers 



rung vom VIC-ll-Chip kam. 

6013 

AND #$7F 

0111 1111 löscht das Bit7 

602B 

STA D019 

Zurückschreiben 

6015 

STA D011 

Zurückschreiben. Damit ist die 

602E 

BMI 6037 

Sprung, falls VIC-IRQ, sonst 



Rasterzeile, die den IRQ auslösen 



CIA-IRQ. 



soll, festgelegt. 

Bearbeiten eines CIA-IRQ: 

Schritt 2: 



6030 

LDA DC0D 

Löschen des CIA1 

6018 

LDA #$81 

1000 0001 wird nun 



Unterbrechungs-Kontrollregisters. 
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6033 

CLI 

IRQ zulassen. Damit können 
innerhalb eines CIA- IRQ auch 
unsere VIC-IRQs geschehen. 

6034 

JMP EA31 

Bearbeitung des CIA-IRQ durch 
die normale Routine. 

Unser 

Programm für VIC-ll-IRQs: 

6037 

LDA D012 

Rasterzeilen-Register laden um 
festzustellen, welche Zeile den 
IRQ auslöste. 

603A 

CMP #$F8 

Vergleich mit Ende des Text¬ 
fensters. 

603C 

BCS 604F 

Wenn unterhalb des Textfensters, 
Sprung. 

Der 

folgende Programmteil ist wirksam, wenn der IRQ- 

Auslöser eine Zeile in Höhe des Textfensters war: 

603E 

CLC 

Addition vorbereiten. 

603F 

ADC 02 

Streifenbreite aus dem Merkregi¬ 
ster addieren. 

6041 

STA D012 

Neuen Wert in Rasterzeilen- 
Register schreiben. 


Damit wird eine neue Rasterzeile als IRQ-Auslöser festge¬ 
legt, die um die Streifenbreite tiefer liegt als die vorher¬ 
gegangene. 

Es folgt eine kleine Verzögerungsschleife, die aber nur zum 
Experimentieren eingebaut wurde: 

6044 LDY #$03 Schleifen-Startwert 

6046 DEY Herunterzählen 

6047 BNE 6046 NEXT Y, bis Y=0. 

Ändern der Rahmenfarbe bis zum nächsten Raster-IRQ: 
6049 INC D020 Farbcode+1. Wenn Code im 

Rahmenfarbregister größer als 15 
wird, fängt wieder Farbcode 0 an, 
weil die Bits 5-7 keine Funktion 
haben. 

Abschließend erfolgt der Rücksprung in den Rest der nor¬ 
malen IRQ-Routine: 

604C JMP EA81 Siehe unsere Untersuchung der 

IRQ-Firmware. 

Damit ist der Rahmen in Höhe des Textfensters behandelt. 
Es schließt sich nun der Teil an, der die Rahmenbereiche 


unter- 

und oberhalb bearbeitet: 

604F 

LDA #$00 

Farbcode schwarz 

6051 

STA D020 

in Rahmenfarb-Register. 

6054 

LDA #$32 

Rasterzeile, bei der oben das 
Textfenster beginnt. 

6056 

STA D012 

In Rasterzeilen-Register 
schreiben 

6059 

JMP EA81 

Abschluß durch Sprung zum 

Ende der normalen IRQ- Routine. 


Damit ist festgelegt, daß ober- und unterhalb des Textfen¬ 
sters die Rahmenfarbe schwarz wird. 


Unsere eigene Routine ist jetzt abgeschlossen. Zum guten 
Ton gehört es, dem Benutzer auch die Möglichkeit zu öffnen, 
diese Routine wieder abzuschalten. Das erfolgt im letzten 
Programmteil, der mittels SYS24688 aktiviert werden kann: 


605C 

SEI 

IRQ sperren 

605D 

LDA #$00 

Raster-IRQ 

605F 

STA D01A 

abschalten 

6062 

LDA #$31 

IRQ-Vektor 

6064 

STA 0314 

restaurieren 

6067 

LDA #$EA 

auf den 

6069 

STA 0315 

Normalwert. 

606C 

LDA #$0E 

Farbcode hellblau 

606E 

STA D020 

in Rahmenfarb-Register 
schreiben 

6071 

CLI 

IRQ zulassen 

6072 

RTS 


Unser Programm ist 

komplett. Speichern Sie es bitte vor 

dem Starten ab. Nach dem SYS 24576 finden Sie einen hüb- 


13 ^ 


sehen bunten Rahmen vor, oberhalb und unterhalb des Text¬ 
fensters ist er schwarz. Besonders gut — finde ich — sieht 
das Ganze aus, wenn man die Hintergrundfarbe des Textfen¬ 
sters auch auf Schwarz setzt. Das Programm erlaubt noch 
einige Experimente: 

Durch POKE-Kommandos in die Speicherstelle 2 kann die 
aktuelle Streifenbreite variiert werden, durch POKEs in die 
Zelle 24645 der Startwert der Verzögerungsschleife. Pro¬ 
bieren Sie’s doch mal aus. Eine Erkenntnis werden Sie gewin¬ 
nen: In der Unterbrechungs-Programmierung spielt die Zeit 
eine wichtige Rolle. Das zeigt sich auch, wenn man zum Bei¬ 
spiel Cursorbewegungen durchführt: Die Streifen fangen an 
zu wandern. 

Weitere Möglichkeiten zum Experimentieren sind gege¬ 
ben, wenn Sie die Rasterzeilen verändern, die den oberen 
und unteren Rand des Textfensters markieren: 

Durch POKE 24661,Zahl verschieben Sie die obere, durch 
POKE 24635,X:POKE 24588,X die untere Rasterzeile, von 
der an alles schwarz ist. Wie schon vorhin erwähnt, habe ich 
im Programm diese Werte auf 50 beziehungsweise 248 
fixiert, weil genau dort auf meinem Monitor das Textfenster 
liegt. 

Mit diesem Beispiel und dem aus der Grafikserie sollte es 
Ihnen nun möglich sein, auch andere Unterbrechungspro¬ 
gramme zu schreiben, die sich der Rasterzeilen- 
Unterbrechung per VIC-ll-Chip bedienen. Eine Bemerkung 
sollte ich Ihnen noch auf den Weg Ihrer eigenen Versuche 
mitgeben: Der Elektronenstrahl, der über den Bildschirm 
saust und beim Erreichen des von uns bestimmten Rasterzei¬ 
lenwertes zum Auslösen des IRQ führt, ist enorm schnell. Die 
Serviceprogramme dürfen deshalb nicht zu lang sein, sonst 
steht der nächste IRQ schon wieder an, bevor der vorange¬ 
gangene bearbeitet ist. 

63. Unterbrechungen mit den CI As 


Lassen Sie uns kurz rekapitulieren: Als primäre Unterbre- 
chungsanforderer hatten wir drei Bausteine unseres Compu¬ 
ters benannt, nämlich den VIC-ll-Chip und die beiden CIA- 
Bausteine. CIA kommt von »Complex Interface Adapter« und 
ist die Bezeichnung für die beiden Ein- und Ausgabe-Baustei¬ 
ne, die den gesamten Verkehr zwischen dem zentralen 
Gehirn unseres C 64 und der Peripherie managen. Wir hatten 
bemerkt, daß ein CIA, der IRQ-CIA (Adressen von 56320 bis 
56575), ausschließlich für die maskierbaren Unterbrechun¬ 
gen zuständig ist. Dazu gehören die 60mal pro Sekunde statt¬ 
findenden »Timer-Interrupts«, die die Cursorbehandlung, die 
Tl$-Uhr, die Tastaturabfrage etc. bearbeiten. Der andere CIA, 
genannt NMI-CIA, (Adressenraum 56576-56831) ist nur für 
die nicht maskierbaren Unterbrechungen verantwortlich und 
wird bei normaler Nutzung des C 64 so gut wie nie eingesetzt. 
Ich gehe im folgenden davon aus, daß Sie keine RS232C- 
Schnittstelle in Ihren Computer eingesetzt haben. Sollte das 
aber der Fall sein, dann müßten Sie darauf achten, die folgen¬ 
den Beispiele - die den NMI-CIA betreffen - ohne gleichzeiti¬ 
gen Betrieb dieser Schnittstelle anzuwenden, weil sich sonst 
Störungen ergeben könnten. 

In Kapitel 52 haben wir uns ein Register (das Register 13, 
Interrupt-Kontrollregister) der CIAs schon genauer angese¬ 
hen und auch die Unterschiede beider Bausteine festgestellt. 
Dort war dann die Rede von Timern, Echtzeituhren, 
Alarm-Funktionen etc. Was es damit auf sich hat und wie man 
diese Möglichkeiten nutzen kann, das soll nun unser Thema 
sein. Wir werden uns dazu alle Register der CIAs genauer 
ansehen, die für die von uns ausgewählten Unterbrechungs¬ 
optionen eine Rolle spielen. Dabei fallen einige unter den 
Tisch - das habe ich aber schon in Kapitel 52 angekündigt -, 
nämlich diejenigen, die mit dem Verkehr über den seriellen 
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Port, beziehungsweise über die RS232C-Schnittstelle, zu 
tun haben. Es bleibt dann anderen - kompetenteren - über¬ 
lassen, darüber zu schreiben. Wie wäre es zum Beispiel mit 
Ihnen ? 

Auch so bleibt uns genug zu tun. In Tabelle 21 finden Sie 
zunächst eine Übersicht der von uns behandelten Register. 

Sie sehen darin, daß jeder CIA über zwei sogenannte Timer 
(A und B) verfügt, sodann über die »Time of Day« (zu deutsch 
etwa »Tageszeit«) genannte Echtzeituhr mit vier Registern und 
schließlich noch über drei Kontrollregister, zu denen auch 
das schon erwähnte Register 13 gehört. Sehen wir uns 
zunächst die Timer an. 


64. Die Timer der CIAs 


Insgesamt verfügen wir über vier dieser Timer: Timer A und 
B im CIA1 und dasselbe nochmal im CIA2. Es handelt sich 
dabei um 16-Bit-Register, in die ein Startwert geschrieben 
werden kann, von dem an dann heruntergezählt wird. Jedes¬ 
mal, wenn dann der Wert 0 unterschritten ist, gibt es für uns 
die Möglichkeit, bestimmte Ereignisse stattfinden zu lassen. 
Man kann diese Register unabhängig voneinander, aber auch 
kombiniert, benutzen. Ein Lesen des Registers liefert immer 
den momentan gerade aktuellen Wert. Ein Schreiben in das 
Register führt automatisch zum Festlegen eines Startwertes. 
Was an Optionen mit diesen Timern möglich ist, wird über 
Kontrollregister gesteuert. Das CRA (Register $ OE) bezieht 
sich vor allem auf den Timer A, das CRB (Register $ OF) auf 
Timer B. Die 16-Bit-Register werden - wie gewohnt - in der 
Form LSB/MSB betrieben. In den Timer A des CIA1 wird bei 
jedem I/O-Reset folgendes Wertepaar eingetragen: 

56324 dezimal 37 LSB 

56325 dezimal 64 MSB 

Das entspricht einem Startwert von 16421. Im PAL-System 
hat der Quarz, der die Taktfrequenz bestimmt, eine Frequenz 
von 17.734472 MHz. Die Prozessorfrequenz errechnet sich 
daraus mittels Division durch 18 zu 985248.4 Hz (also etwas 
weniger als 1 MHz, was den europäischen C 64 langsamer 
macht als den amerikanischen, der etwas mehr als 1 MHz ver¬ 
wendet). Wenn mit dieser Geschwindigkeit der Timer herun¬ 
tergezählt wird, erhält man alle % Sekunden genau einen 
Unterlauf. Das ist der Weg, eine kontrollierte Zeitspanne 
durch den Timer zählen zu lassen. Sei X der gesuchte Start¬ 
wert, der zu einer Spanne von T Sekunden führt, dann kann 
man X berechnen mittels: 

X = 985248.4 * T 

Der Integerwert von X ist dann in ein LSB und ein MSB zu tei¬ 
len und in die Timer-Register einzutragen. Allerdings ergibt 
sich so eine natürliche Grenze. Die höchste durch 2 Byte 
darstellbare Zahl ist ja 65535. Wenn wir diesen Wert in den 
Timer schreiben, dann ist er alle 1/15 Sekunden auf 0 herun¬ 


tergezählt. Für längere Zeiten ist aber vorgesorgt. Die beiden 
Timer A und B sind kombinierbar (wie, dazu kommen wir 
gleich noch) zu einem 32-Bit-Register. Die höchste Zahl X ist 
dann: 

4 2 9 4 9 6 7 2 96 = 2 32 

Damit kann im Extremfall eine Herabzählzeit von 1 Stunde, 
12 Minuten und zirka 40 Sekunden eingeplant werden, was 
für die meisten Zwecke ausreichen dürfte. 

Möchten Sie also genau eine Sekunde Spielraum haben 
beim Herunterzählen, dann muß die Zahl 985248 als 4-Byte- 
Integer-Wert in die Speicher von Timer A und Timer B 
gebracht werden. Das führt dann zu den WertenO, 15,8,160 
(weil 985248 = 0*16777216 + 15*65536 4- 8*256 + 
160). 0 und 15 gelangen als MSB beziehungsweise LSB in 
Timer B (also Register 07 und 06), 8 und 160 sind MSB und 
LSB für den Timer A (Register 05 und 04). Sehen wir uns nun 
an, wie wir dem Computer sagen, was mit diesen Startwerten 
in den Timer-Registern geschehen soll. Die beiden Kontroll¬ 
register CRA und CRB beziehen sich weitgehend auf die 
gleichnamigen Timer. Im Bild 49 finden Sie das Register $0E, 
also CRA und in Bild 50 das andere Kontrollregister CRB 
($0F): 

Die Bedeutung der Bits 0 bis 4 ist - jeweils für den dazuge¬ 
hörigen Timer - identisch: 

Bit 0 an dieser Stelle führt zum sofortigen Anhalten 

des Timers. 1 in diesem Bit startet das Herun¬ 
terzählen. 

Bits 1 und 2 Diese beiden Bits hängen mit dem externen 
Signalverkehr zusammen und werden von uns 
außer acht gelassen. 

Bit 3 Ist dieses Bit = 1, dann ist der sogenannte »One 

Shot«-Betrieb des Timers aktiv. Das bedeutet, 
daß vom Startwert an heruntergezählt wird bis 
auf Null. Es findet nun das programmierte Ereig¬ 
nis statt (zum Beispiel ein IRQ). Anschließend 
wird der Startwert wieder eingeladen und der 
Timer gestoppt. 

Im Gegensatz dazu läuft der »Continuous«- 
Betrieb, wenn das Bit den Wert 0 enthält. Dabei 
geschieht zunächst dasselbe wie beim One 
Shot Modus, der Timer wird aber nicht angehal¬ 
ten, sondern der ganze Vorgang wiederholt 
sich in einer Endlosschleife. 

Bit 4 Ein Hineinschreiben einer 1 in dieses Bit 

erzeugt ein sofortiges Neuladen der Timer- 
Register mit dem Startwert. Dabei ist es gleich- 


7 

6 5 

4 

3 

2 1 

0 

TOD IN 
50Hz 

00 Hz 

Bxterner In MODE 
Slgnal- 
verkahf 

Force- 

load 

ONE 

Shot/ 

Contlnu- 

oua 

externer Signal- 
verkehr 

Start / 

/Stop 


Blld 49. Das Kontrollregister des Timers A. 


Register 

Nr. <$) 

Adresse (dez.) 
CIA-1 CIA-2 

Name 

Funktion 

04 

56324 

56580 

TALO 

TIMER A LSB 

05 

56325 

56581 

TAHI 

TIMER A MSB 

06 

56326 

56 582 

TBLO 

TIMER B LSB 

07 

56327 

56 583 

TBHI 

TIMERB MSB 

08 

56328 

56584 

TODIOTHS 

'/m-Sekunden-Reglster 

09 

56329 

56585 

TODSEC 

Sekunden-Reglster 

OA 

56 330 

56 586 

TODMIN 

Minuten-Reglster 

OB 

56331 

56587 

TODHR 

Stunden-Reglster, 

AM/PM-Flagge 

OD 

56333 

56 589 

JCR 

Unterbrechungs-Kon- 

trollregister 

OE 

56334 

56 590 

CRA 

Kontrollregister A 

OF 

56335 

56591 

CRB 

Kontrollregister B 


Tabelle 21. Die wichtigen Register der beiden CIAs. 


7 


8 5 

4 3 

2 1 0 

ALARM 


In MODE 

Force- ONE Shot/ 
load ContlnuoU8 

externer Signal- Start / 
verkehr /Stop 

Bild 50. 

. Dasselbe für den Timer B. 


Register 
Name Nr. 

7 

6 5 4 

3 2 10 

TODIOTHS 08 


unbenutzt 

yiVSokundemvert 

TODSEC 

09 

unbenutzt 

Zehnerstelle Sekunden 

Einerstelle Sekunden 

TODMIN 

OA 

unBenutzt 

Zehnerstelle Minunten 

Einerstelle Minuten 

TODHR 

OB 

AM/PM 

Flagge 

unbenutzt Zehnerstelle 

Stunden 

Einerstelle Stunden 


Bild 51. Die Register der Echtzeituhren. 
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gültig, ob der Timer gerade läuft oder nicht. 
Schreibt man eine Null ein, hat das keine Wir¬ 
kung. 

Beim Lesen des Registers ist dieses Bit 
immer 0. 

Zu diesem Bit und seiner Wirkung ist noch 
etwas zu sagen. Das Neuladen des Timers 
geschieht 

- immer dann, wenn ein Unterlauf stattgefun¬ 
den hat oder 


- falls der Timer steht und in die Register ein 
Startwert geschrieben wird. Dabei ist der CIA 
so konstruiert, daß man kein zwangsweises 
Laden (also mit Bit 4 = 1) braucht, wenn man 
den Startwert in der Reihenfolge LSB MSB in 
die Register bringt. 

Die Bits 5 bis 7 haben nun unterschiedliche Bedeutung im 
CRA und im CRB: 


Register CRA (SOE) 

Bit 5: Ist dieses Bit gleich Null, dann wird im System¬ 

takt gezählt. Den hatten wir vorhin zur Zeitbe¬ 
rechnung schon verwendet. Wenn das Bit auf 1 
gesetzt ist, zählt der Timer externe Signale. 

Bit 6: Spielt für den Signalverkehr über den seriellen 

Port eine Rolle und soll uns hier nicht weiter 
beschäftigen. 

Bit 7: Damit steuert man nicht den Timer A, sondern 

dieses Bit bezieht sich auf die gleich noch zu 
behandelnde Echtzeituhr. 


Register CRB ($0F) 

Die Bits 5 und 6 sind hier im Zusammenhang von Bedeu¬ 
tung. Es gibt vier Kombinationsmöglichkeiten: 

Bit 6 - Bit 5 Der Timer B wird - wie vorhin der Timer A - im 

0-0 Systemtakt heruntergezählt. 

0 - 1 Der Timer B wird durch externe Signale herun¬ 
tergezählt. 

1 - 0 Der Timer B zählt die Unterläufe von Timer A. 

Das ist der vorhin erwähnte Punkt, der beide 
Timer kombiniert zum 32-Bit-Zähler. Man kann 
also im Extremfall 65536 mal 65536 Takte zäh¬ 
len lassen. 

1-1 Auch in diesem Fall zählt Timer B die Unterläufe 
von Timer A. Er tut das aber nur, wenn ein 
bestimmtes externes Signal vorhanden ist. 

Bit 7: Auch beim Register CRB steuert dieses Bit 

bestimmte Möglichkeiten der Echtzeituhr. Des¬ 
halb haben Sie noch ein wenig Geduld, bis wir 
diese Uhr behandeln. 

Wir kennen uns nun ganz gut aus, wie wir mit den Timern 
umzugehen haben. Unser Wissen soll in einem kleinen Test 


erprobt werden. Dazu bedienen wir uns des ‘/ 60 Sekunden 
IRQ. Wir verändern diese regelmäßige Unterbrechung derart, 
daß sie nur noch einmal in der Sekunde geschieht. Welche 
Zahlen dazu in ein 32-Bit-Register gepackt werden müssen, 
haben wir schon vorhin berechnet. Jeweils in der Reihenfolge 
LSB/MSB müssen wir sie einschreiben und vorher die Timer 
anhalten, indem die Bits 0 der Kontrollregister CRA und CRB 
auf 0 gesetzt werden. Nach dem Einschreiben und Starten 
der beiden Timer müssen folgende Bitmuster in CRA und 
CRB stehen: 


Ol 


CRA 

Bit 0 = 1 Start Timer A 
Bit 3 = 0 Dauerlauf 
Bit 5 = 0 Systemtakt 

CRB 

Bit 0 = 1 Start Timer B 
Bit 3 = 0 Dauerlauf 
Bit 5 = 0 

Bit 6 = 1 Timer B zählt Unterläufe von Timer A. 


Bevor wir die Timer starten, muß auch noch das Interrupt- 
Kontrollregister verändert werden (das hatten wir uns in Kapi¬ 
tel 52 genauer angesehen). Bislang erzeugt ein Unterlauf 
des Timers A eine Unterbrechung. Wir möchten aber, daß der 
Timer B (damit wir das 32-Bit-Register voll ausnutzen) der 
Auslöser ist. Dazu muß Bit 0 des ICR gelöscht und statt- 
dessen Bit 1 gesetzt werden. 

Im Programm »Timer-Test« (siehe Listing 8 und 9) ist all das 
realisiert. Mit SYS 49152 gestartet, zeigt sich sofort ein deut¬ 
lich verlangsamter Cursor. Noch langsamer kann alles wer¬ 
den, indem Sie höhere Werte in die Timer-Register schreiben. 


.programm 

1 prg 

timer 

t»*tC000 

C03 1 

CUUU 

7B 

Ad 

Be 

de 

29 

tm 

Bd 

0e 

4b 

cOOU 

de 

ad 

0f 

dt 

29 

1.. 

Gd 

0f 

#9 

•:«1H 

de 

•9 

Bf 

Bd 

06 

de 

-9 

00 

24 

c Mir 

Hd 

07 

de 

a9 

.10 

Bd 

04 

de 

dS 

cB-W 

-V 

011 

Bd 

03 

de 

a9 

H 

Bd 

B4 

C07B 

0d 

de 

a9 

02 

Rd 

0d 

de 

Ad 

6*» 

cW30 

Be 

de 

29 

d/ 

Bd 

0e 

de 

ad 

0a 

c-.ono 

Bf 

de 

29 

d7 

Bd 

0» 

de 

ad 

U. 

rH4n 

Bo 

de 

09 

01 

Bd 

0o 

de 

Ad 

37 

cB4ü 

Bf 

de 

09 

41 

Bd 

0f 

de 

38 

A3 

UA3« 

6» 

»< 

00 


00 

M 

00 

♦ 4 

b0 


Listing 8. Programm Timer- 
Test, ein Beispiel für die 
Anwendung eines 
32-Bit-Timers. 


PASS 

1 






PASS 

7090 

2 



0923 J 



7000 




0373 » t 


• 

7000 




009E > t 

TIMER-TEST 

• 

7000 




09C7 ;• 


a 

7000 




0BF0 ). TIMER A UND B DES CIA1 WERDEN 30 • 

7000 




03 19 Ja GESCHALTET, DASS »4JR NOCH 

1 MAL « 

7000 




0942 »» PRO SEKUNDE DER TIMER-IRQ 

AUFTRITT a 

7000 




09BB 1 I 


a 

7C00 




0994 ;» 

HE 1140 POt»ATH HAMBURG 

1985 8 

7000 




0900 »■ 


« 

7000 




09E6 ;*»**»r..».,i. 

70O0 




09E9 ; 



7O0B 


09EC ! 



C000 




09F9 

.BA SC000 


C000 




03FE 

.OS 


C000 




0A0 1 ; 



C000 




0A27 »♦♦ + BENUTZTE ADRESSEN OES CIA 1 *«* 

C000 




0A2A » 



C000 




0A3A TALO 

.DE SDC04 


C000 




0A4A TAH I 

.DE SDC05 


C000 




0A3A TBLO 

.DE SDC06 


C000 




0A6A TBHI 

•DE SDC07 


C000 




0A79 ICR 

.DE *DC0D 


C000 




0AB9 CRA 

.DE SOC0E 


C000 




0A97 CRB 

.DE SDC0F 


C00O 




0A9A » 



C000 




0AC3 I*** EINSCHALTEN DES 1 SEKUNDEN IRO 

CO00 




0AC6 » 



C000 

73 



0AE3 START 

SEI 

» SPERREN ALLER IROS 

COO 1 




0AE0 ; 



CO01 

AD 

0E 

DC 

0AF2 

LDA CRA 


C004 

29 

FE 


0B03 

AND m:< 1 I I 111 10 


C00B 

BD 

OE 

DC 

OB 1B 

STA CRA 

» STOP TIMER A 

C009 

AD 

OF 

OC 

0BP3 

LDA CRB 


C00C 

29 

FE 


0B36 

AND H'/.l III 1 1 10 


coctc 

QO 

OP 

DC 

tBDAC 

9TA CBB 

I3TOP TIME« D 

C0I I 




0B3I » 



C0I 1 

A9 

0F 


0BGF 

LDA M13 

1 NEUER STARTWERT IN 

C0t3 

80 

06 

OC 

0B8A 

STA TBLO 

»32-BIT-REGISTER 

C0I6 

A9 

00 


0B94 

LDA MO0 


C010 

00 

07 

OC 

0B9F 

STA TBHI 


C01B 

A9 

A0 


0BAA 

LDA HI60 


C0IO 

SD 

04 

DC 

0BBS 

STA TALO 


C020 

A9 

00 


0PBF 

LDA HOS 


C022 

BD 

03 

DC 

OBCA 

STA TAH I 


C023 




0BCO 1 



C083 

A9 

1F 


OBDE 

LDA M/4000 l i 111 


C0f?7 

0D 

0D 

OC 

OBFB 

STA ICR 

»ALLE IRO VERBOTEN 

C02A 

A9 

82 


0C0C 

LDA MV. 100000 10 


coec 

0D 

00 

OC 

0C27 

STA ICR 

»NUR TIMER B IRO 

C02F 




0C2A » 



C02F 

AO 

0F 

OC 

0C34 

LDA CRA 


C032 

29 

D7 


0C43 

ANO M/41 1010 1 11 


C034 

80 

OE 

DC 

0C6I 

STA CRA 

»BITS 3 UNO 3 - 0 

C037 




0CG4 1 



C037 

AD 

CF 

OC 

OCBE 

LOA CRO 


C03A 

29 

D7 


0C7P 

AND M’/'.l 10101 1 1 


C03C 

90 

0F 

OC 

0C9F 

STA CRB 

»DITO 

C03F 




0C92 1 



C03F 

AD 

OE 

OC 

0C3C 

LDA CRA 


C042 

09 

01 


0CAD 

ORA M' .0000000 1 


C044 

BD 

0F 

DC 

0CC6 

STA CRA 

»TIMER A START 

C04-* 




0CC3 ' 



C047 

AD 

0F 

DC 

0CD3 

LDA CRB 


C04O 

09 

4! 


0CE4 

CRA •»:« 1000001 


C04C 

00 

0F 

DC 

0D01 

STA CRB 

»TIMER B START MIT 

C04F 




0D24 ; 

TIMER H UNTERLAUF 

C04F 




0D27 ; 



C04F 

30 



0D3D 

CLI 

» IRQS FREI GEBEN 

C030 




0D4O ; 



C050 

G0 



0D46 

RTS 


C051 




0D49 ) 



COS 1 




0D4F 

.EN 



Listing 9. Der Quelltext zum Timer-Set. 
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Den Normalzustand stellen Sie einfach durch Drücken der 
RUN/STOP- und der RESTORE-Tasten her. Dabei wird ja - wie 
Sie aus dem letzten Kapitel her wissen, auch ein I/O-Reset 
ausgeführt, der den Ausgangszustand wiederherstellt. 

Die Verlängerung des IRQ-Zyklus hat übrigens noch einen 
sinnvollen Nebeneffekt. Je seltener ein laufendes Programm 
unterbrochen wird, desto schneller wird es mit seinen Jobs 
fertig. Das kann man immer dann tun - im Extremfall sogar den 
IRQ ganz ausschalten - wenn man die Möglichkeiten, die der 
Computer während des normalen IRQ anbietet, nur selten 
oder aber gar nicht braucht. 

65. Die Echtzeituhren 


Wir kennen nun fünf Uhren in unserem Computer: Die vier 
Timer (jeweils A und B im CIA1 und CIA2), die wir, weil wir die 
Impulszahlen in Zeiteinheiten umrechnen können, zur Zeit¬ 
messung einsetzen könnten und die im Basic verfügbare Uhr 
TIS, die aber - wie wir nun wissen - lediglich die Umsetzung 
des Timers A im CIA1 in ein bequemer handhabbares 
Software-Instrument ist. Zudem ist die Ganggenauigkeit die¬ 
ser Uhr recht gering. Schon einige Kassettenoperationen 
genügen, sie völlig aus dem Takt zu bringen. 

Um so mehr verwundert es, daß zwei hervorragende Echt¬ 
zeituhren im Commodore 64 so gut wie nie benutzt werden, 
ja nicht einmal in irgendeiner Weise softwaremäßig unter¬ 
stützt werden. Vielleicht ist das ein bißchen zuviel »mehr sein 
als scheinen«, was Commodore da betreibt, wenn man 
bedenkt, welche verborgenen Schätze da alle zutage geför¬ 
dert werden können (man denke nur an die hochauflösende 
Grafik) bei genauer Untersuchung des Computers. 

Jeder der beiden CIAs verfügt über solch eine Uhr, die 
direkt von der Netzfrequenz getaktet wird. Die Zählung der 
Zeit geschieht in vier Registern (Register $08 bis $0B), die 
in Bild 51 gezeigt sind. 

Vielleicht fällt Ihnen etwas auf, wenn Sie sich diese vier 
Byte mal genauer ansehen: Die Speicherung geschieht in 
Form von Einer- und Zehnerstellen. Das kann also weder im 
Binärformat noch als ASCII-Zeichen funktionieren. Hier wer¬ 
den die Ziffern als BCD-Zahlen abgelegt. In Kapitel 13 wurde 
dieses »binary coded decimak-Förmat erklärt. Das ist lange 
her und soll deshalb hier nochmal vorgestellt werden, damit 
alle wissen, wovon die Rede ist. 

In dieser Zahlendarstellung wird jede Dezimalstelle einer 
Zahl gesondert in eine Binärzahl umgewandelt. Dann ergibt 
sich der folgende Zusammenhang: 

Binär Dezimal 

0000 0 

0001 1 

0010 2 

0011 3 

0100 4 

0101 5 

0110 6 

0111 7 

1000 8 

1001 9 

Das war’s! Die anderen möglichen Binärkombinationen 
(also zum Beispiel 1010 etc.) werden nicht benutzt. Die Zahl 
25 beispielsweise lautet im BCD-Format: 

0010 0101 
t t 

2 5 

Jetzt ist es Ihnen sicherlich verständlich, warum für die 
Sekunden- und Minuten-Zehnerstellen nicht mehr als drei 


Bit reserviert wurden: größer als 6 wird die Zehnerstelle nicht. 

Zum Stundenregister TODHR ist aber noch etwas zu 
sagen: Dort ist nur ein Bit reserviert für die Stunden- 
Zehnerstelle. Die Uhr läuft nicht bis 24 Uhr, sondern lediglich 
bis 12 Uhr. Zur Unterscheidung, ob vor- oder nachmittags 
gemeint ist, dient das Bit 7. Dieses sogenannte AM/PM-Flag 
ist orientiert an der angelsächsischen Gewohnheit, zum Bei¬ 
spiel für 16 Uhr den Ausdruck 4 PM zu verwenden. PM kommt 
vom lateinischen »post meridiem«, was übersetzt heißt »nach 
dem Mittag«, wohingegen AM steht für »ante meridiem«, also 
»vor dem Mittag«. Meint man nun AM, dann muß diese Flagge 
auf 0, bei PM aber auf 1 gesetzt sein. 

Beim Stellen der Uhren sollte eine Reihenfolge eingehalten 
werden. Sobald nämlich in das Stundenregister geschrieben 
wird, hält die Zählung automatisch an. Man kann nun die ande¬ 
ren Werte in die Register schreiben. Den Startschuß liefert 
das Schreiben in das Register TOD1OTH: von nun an tickt die 
Uhr wieder. 

Ähnlich funktioniert das Lesen der Uhrzeit. Sobald das 
Stundenregister gelesen wird, führt das zum Anhalten der 
Uhr, so daß die restlichen Register reibungslos auslesbar 
sind. Wieder ist es das Zehntelsekundenregister, das beim 
Auslesen ein Weiterlaufen der Uhr bewirkt. Aber, so werden 
Sie bemerken, wenn der Auslesevorgang eine bestimmte Zeit 
beansprucht, führt das zu Verzögerungen? Die Lösung ist, 
daß der gesamte Inhalt der vier Register gleichzeitig mit dem 
Auslesen des Stundenwertes in einen internen Speicher 
transferiert wird und dort weiterläuft. Nach dem Lesen des 
TOD1 OTH kommt der aktuelle Wert zurück in die Register und 
dieser wird weitergezählt. 

Nun wird es höchste Zeit, daß wir uns die beiden Bits im 
CRA und im CRB ansehen, die wir vorhin bei der Timer-Be¬ 
handlung links liegen ließen. Bit 7 im CRA kündigt der Echt¬ 
zeituhr welche Netzfrequenz zu erwarten ist. Eine 1 an 
dieser Stelle steht für 50 Hz, eine 0 für 60 Hz. Unser Strom¬ 
netz in Deutschland liefert einen Wechselstrom mit 50 Hz, 
weshalb wir dann dort die 1 setzen sollten. Da gibt es ein klei¬ 
nes Problem: Beim I/O-Reset, der durch Drücken der 
RUN/STOP- und der RESTORE-Tasten zusammen ausgelöst 
wird, schreibt der Computer immer den amerikanischen Wert 
für 60 Hz in dieses Bit. Dann geht die Uhr aber empfindlich 
nach. Man muß also einen Weg finden, der erlaubt, dort in die¬ 
sem Fall wieder eine 1 einzuschreiben. Das ist durch eine 
eigene NMI-Routine möglich. Sie sehen schon, der Weg zur 
Nutzung dieser verlockenden Uhren ist ziemlich dornen¬ 
reich! 

Noch interessanter Ist das Bit 7 im CRB. Das Setzen der 
Uhrzeit ist nämlich nur möglich, wenn dieses Bit den Inhalt 0 
hat. Was geschieht, wenn dort eine 1 steht? Dann bestimmt 
man nicht die aktuelle Uhrzeit, sondern man stellt einen 
Wecker (das ist die Alärmzeit). Das geschieht nach dem Set¬ 
zen dieses Bits genauso wie vorhin das Einschreiben der 
Uhrzeit (also erstaunlicherweise auch in genau dieselben 
Register!). Im Unterschied dazu ist allerdings ein Lesen der 
Alarmzeit nicht möglich - das ergibt immer die aktuelle Uhr¬ 
zeit. Man muß für diesen Fall die Weckzeit irgendwo abspei¬ 
chern und bei Bedarf dann von dort lesen. 

Weil man ja meistens nach dem Erreichen der Alarmzeit 
irgendeine Reaktion erwartet, ist im ICR (also dem Unterbre- 
chungskontrollregister 13) jedes CIAs noch ein Bit reserviert 
- das Bit 2 —, mit dessen Hilfe der Alarm per IRQ oder NMI wie 
auch immer geartet losbrechen kann. Der Phantasie sind hier 
nur wenige Grenzen gesetzt. Wie man mit diesem ICR 
umgeht, haben wir schon besprochen. 

Damit sind wir durch die Eigenheiten der CIAs durch. Man 
braucht tatsächlich keine Scheu zu haben, diese Echtzeituh¬ 
ren zu nutzen. Lediglich die Uhr im CIA1 wird manchmal ver¬ 
wendet, einen bestimmten Wert für die Zufallszahlenerzeu¬ 
gung zu generieren. Aber das sollte einer eigenen Uhren- 
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Routine nicht in die Quere kommen. Solch eine Echtzeituhr 
finden Sie in Listing 10 und 11. 

Durch SYS49152 aktivieren Sie die Uhr, die Sie mit 
SYS49261 auch wiederabschalten können. Durch ein USR- 
Kommando A=USR (String) stellen Sie die Startzeit ein. 
String kann dabei eine Stringvariable sein oder auch direkt ein 
String der Form »HHMMSST« (also Stunden, Minuten, Sekun¬ 
den, Zehntelsekunden). In A steht eine 0, wenn kein Fehler, 
aber eine -1, wenn ein Fehler aufgetreten ist. Das Lesen der 
Uhr erfolgt über ein zweites USR-Kommando: 

PRINTUSR(Zahl). Dabei kann Zahl eine beliebige Zahl oder 
Variable sein. Eine Alarmzeit ist ebenfalls einstellbar durch ein 
USR-Kommando, in dem vor der Zelteingabe noch ein Buch¬ 
stabe steht. Beispielsweise stellt A=USR(»A1200000«) 
einen Wecker auf 12 Uhr. Der Alarm im Programm läßt den 
Bildschirmrahmen blinken. Abstellen kann man das durch 
Auslösen eines RESTORE-NMI (also RUN/STOP und RE- 
STORE). Sollten Sie vor dem eingestellten Alarm mal solch 
einen NMI auslösen, dann muß die Alarmzeit neu gestellt wer¬ 
den. Als Basis für dieses Programm diente ein Listing aus dem 
schon oft erwähnten Buch von Babel/Krause/Dripke »Das 
Interface Age Systemhandbuch zum Commodore 64«. 

Die Unterbrechungs-Programmierung ist damit abge¬ 
schlossen - ebenso dieser Kurs, der als Einführung in die 
Assembler-Alchimie nun alle Geheimnisse der Kunst aufge¬ 
deckt hat. In den letzten Kapiteln sind wir schon in die Mei¬ 
stergrade der Zunft aufgestiegen. Vielleicht ging es man¬ 
chem etwas zu schnell? Dann wird Ihnen der Kurs »Von Basic 
zu Assembler« eine Hilfe sein, der behutsam und mit vielen an 
Basic angelehnten Beispielen die nötige Programmierpraxis 
vermitteln wird (ab 64'er, Ausgabe 1/86). So wie die Segler 
sich oft »Mast- und Schotbruch« wünschen, verabschiede ich 
mich, indem ich Ihnen viele grandiose Abstürze wünsche. 

(Heimo Ponnath/gk) 


Programm i obj.alarmuhr cBOB c!8d 


C000 


a9 

B* 

Bd 

11 

03 

a9 

C0 

Bd 

11 

cMlAB 


12 

03 

a9 

ld 

Bd 

18 

03 

a9 

a3 

C01B 


c.0 

Od 

19 

03 

ad 

0e 

dd 

09 

12 

cBlB 


80 

Bd 

Be 

dd 

60 

4B 

Ba 

4B 

al 

C020 


98 

40 

a9 

74 

Bd 

0d 

dd 

ac 

49 

cBOB 


0d 

dd 

10 

06 

4c 

6a 

cl 

4c 

aB 

C030 


72 

♦ e 

20 

bc 

46 

20 

el 

44 

b9 

C03B 


d0 

♦ 3 

a 2 

04 

bd 

24 

4d 

9d 

b4 

C040 


13 

03 

ca 

dB 

47 

a 2 

la 

bd 

la 

C04B 


33 

4d 

9d 

19 

03 

ca 

dB 

47 

C0 

C050 


a9 

74 

Bd 

0d 

de 

Bd 

Bd 

dd 

eB 

C03B 


8d 

00 

de 

a9 

0B 

Bd 

Be 

de 

30 

C060 


a9 

BB 

Bd 

Be 

dd 

a9 

BB 

20 

4e 

c«6B 


H6 

fr« 

«c 

6c 

4« 

a9 

40 

Od 

37 

C070 


11 

03 

.»9 

b2 

Dd 

12 

03 

78 

2 a 

C07B 


a9 

47 

Bd 

1B 

03 

a9 

4e 

Bd 

C0 

c0U0 


19 

03 

a9 

31 

Bd 

14 

03 

a9 

B4 

C0OB 


na 

Bd 

13 

03 

58 

60 

24 

Bd 

12 

C090 


30 

03 

4c 

70 

Cl 

70 

62 

b7 

40 

C09B 


C0 

07 

dB 

40 

ad 

04 

dd 

29 

35 

C0*0 


74 

Bd 

04 

dd 

aB 

00 

a9 

24 

Se 

c 0 aB 


20 

4 • 

C0 

dB 

02 

a9 

24 

c9 

23 

c 0 b 0 


13 

90 

07 

«8 

38 

•9 

12 

d8 

b9 

C0bü 


09 

BU 

Bd 

Bti 

dd 

20 

♦ c 

C0 

la 

C0C0 


Bd 

0 a 

dd 

20 

4c 

C0 

□d 

09 

ec 

c0cB 


dd 

20 

66 

Cl 

Bd 

BB 

dd 

a9 

6b 

r. 0 d U 


00 

4c 

3c 

bc 

6B 

68 

60 

60 

d9 

C0dO 


•9 

44 

dB 

43 

c 0 

BB 

dB 

4 B 

43 

C0U0 


ad 

04 

dd 

09 

BB 

Bd 

04 

dd 

la 

C0»O 


«9 

B4 

Bd 

Bd 

dd 

„9 

3c 

B3 

44 

C040 


04 

85 

02 

a9 

44 

□3 

0 1 

aB 

e6 

C04O 


01 

4c 

a6 

C0 

a9 

*• 

B3 

24 

dd 

C100 


20 

13 

cl 

0 a 

0 a 

Ba 

0 a 

B3 

OB 

CI0B 


23 

20 

13 

Cl 

03 

25 

c3 

24 

13 

Cl 10 


b0 

c4 

60 

bl 

22 

38 

■9 

30 

3d 

CllB 


90 

ba 

c9 

Ba 

bB 

b6 

cB 

60 

3e 

c 120 


•9 

07 

20 

7d 

b4 

aB 

00 

ad 

bB 

1120 


0b 

dd 

0Q 

29 

14 

c9 

12 

dB 

73 

c 1 30 


02 

a9 

00 

28 

10 

05 

40 

1B 

49 

cl 38 


69 

12 

dB 

70 

35 

cl 

ad 

0 a 

13 

C140 


dd 

20 

55 

cl 

ad 

09 

dd 

20 

96 

C14U 


33 

Cl 

ad 

08 

dd 

20 

60 

Cl 

ce 

c 100 


68 

60 

4c 

ca 

b4 

4B 

4a 

4a 

a4 

cISB 


4a 

4a 

20 

60 

cl 

6B 

29 

04 

4e 

Cl60 


09 

30 

91 

62 

cB 

60 

20 

13 

68 

c I6U 


cl 

60 

a9 

77 

Bd 

14 

03 

a9 

Gb 

cl 70 


cl 

Bd 

13 

03 

4c 

bc 

4b 

c6 

d2 

c 178 


02 

40 

03 

4c 

31 

ea 

a5 

04 

46 

C1B0 


85 

02 

ad 

20 

dB 

43 

03 

Bd 

d4 

clBB 


20 

dB 

4c 

31 

ea 

00 

44 

00 

4B 


Listing 10. Eine Echtzeituhr. 


Of 


pass e 

7000 


COOO 

COOO 

CBOB 

C000 

C000 

C000 

C000 

C0O0 

C000 

C000 

C000 

C000 

C000 

C000 


7000 

7000 

7000 

7000 

7000 

7000 

7000 

7000 

7000 

7000 

7000 

7000 

7000 

7000 

7000 

7000 

0873 »• « 

069E »• ECHTZEITUHR MIT ALARMFUMKTION * 

00C7 »* . 

0QFO >. LAEUFT MIT DEM Mil-CIA « 

0919 /* IN VERBINDUNG MIT DEM IRQ FUER « 

0942 »• DEN ALARM * 

G96B 1• « 

0994 »» HEIMO PONNATH HAMBURG 1883 » 

09BD »• * 

09E6 »• (TEILWEISE WURDE EIN PROGRAMM AUS * 

0A0F »■ DEM INTERFACE AGE SVSTEM4AN0BUCM » 

0A38 »« ZUM COhWODORE G4 , SEITE 114 • 

0A6I »a ALS BASIS VERMEIDET > a 

0A8A »a • 

7000 

OABG » 



CO0O 

0AC2 

.BA «COOO 


COOO 

0ACO 

.03 


cooo 

OACB » 



COOO 

0AP7 » 



cooo 

OB 18 VERZ 

.DE *02 

»AKTUELLE VERZOEG. 

cooo 

0838 FÄRB 

.DE «03 

1 WER T FUER RAMI EN 

cooo 

0837 » 

EOR-OPERATION 


cooo 

0878 VORW 

.DE «04 

» VERZ OEGERUI DG WERT 

cooo 

0U9B VALTYP 

.DE *011 

»INHALTiFF-STR 0-N 

cooo 

0G9E » 



C00O 

OBAD INDEX 

.DE *22 


cooo 

OBCG tfOEX3 

.DE *24 

»POINTER 

cooo 

PBD6 IN0EX4 

•DE *23 


COOO 

0BF5 FAC1 

.DE *62 

» 1 .MANTISSEMBYTE 

cooo 

0BF8 » 



cooo 

0C21 )«>•«••••** LABELS PAGES 3 •••••»••>>•• 

cooo 

0CC4 » 



C00O 

0C44 USRADDL 

.DE *0311 

»USR-POINTER 

cooo 

0C37 USRADDH 

.DE *0312 


cooo 

0C3A » 



cooo 

OCGA FRE1 

.DE *0313 


cooo 

0C6D » 



cooo 

OCBA IRQVL 

.DE *0314 

» IRQ-VEKTOR 

cooo 

0C9B 1R0VH 

.DE *03)5 


cooo 

0C9E » 



cooo 

OCDC NMINVL 

.DE *0310 

»NMI-VEKTOR 

cooo 

OCCE NMINVH 

•DE *0319 


C000 

0CD1 » 



CO0O 

0CFD » 



C000 

0D23 ILLQUERR 

.DE *8240 

»ILLEGAL QUANTITY 

cooo 

0D48 ; 

ERROR»NDRMALWERT USR-VEKTOR 

C0O0 

0D4E ; 



cooo 

0D70 STR INIB 

.DE *8470 

»SPEICHERPLATZ 

cooo 

0D99 » 

PRUEFEN.STRINGPOINTER SETZEN 

cooo 

ODBF STRLIT67 

.DE *B4CA 

»REST DER STRING- 

C000 

0DD8 » 

LESE-ROUT ITC 


cooo 

0DF7 LEN1 

.DE *8782 

JSTR1NGLAENGE 

C000 

OE 1 1 » 

IN Y-REGISTER 


cooo 

0E32 ACTOFC 

.DE SBC2C 

»AKKU NACH FAC 

CCO0 

0E33 » 



cooo 

0E3E »aaaaaa 

• *» LABELS V1C-1I-CHIP »>>■<■. 

cooo 

0E6 1 » 



cooo 

0E7E PAFD 

.DE *0020 

»RAHHENFARBE 

C00Q 

OEB1 » 




OEAA 
OE AD 
0ECA CIA1 
0EEC ICR 1 
0F0E CRA1 
0F1I » 


LABELS CIA-BAUSTEIh« 


0F34 
0F3! 
0F6D 
0F0F 
0FB I 
0FD3 
OFFS 
OFF0 


TOD 10 TH 2 
T0DSEC2 
TOOMIN2 
TODHR 
ICR2 
CRA2 
CR02 


•DE *OC00 
.DE *OC0O 
.OE *OC0E 

.OE *0008 
.DE «ODOS 
.DE *OO0A 
.OE *0008 
.OE *OD0D 
.OE «OD0E 
.OE *OO0F 


»START CIA-I 
JIRQ-KONTROLLREG. 
»TIMER-A KONTRREG 

I1/10 SEKUMJEN 
J SEKUNDEN 
»MINUTEN 
»STUNDEN » AM/PM 
» Mil -KONTROLLREG. 
»TlhCR-A KONTRREG 
»TIMER-B KONTRREG 


COOO 




OFFB 

» 



COOO 




1024 

»aaaaaaaa* 



COOO 




1027 

» 



C000 




1043 

NORM 

.DE *EA31 

J NORMALER IRQ 

COOO 




1048 

» 



eene 




IBOli 

TASTr-LAO 

.DE *F6BC 

» te ie der raii- 

C000 




1O0E 

» 

ROUTIFE (KEIN MODUL» 

C000 




10AD 

VCCTAB 

.DE *F02F 

»TABELLE DER 

COOO 




ioch 

» 

ROM-VEKTOREN 


COOO 




10E9 

VECTAB7 

.OE *F033 

»MSB DES M1I- 

COOO 




1 1 OE 

» 

VEKTORS IN DER TABELLE 

cooo 




1 132 

IORESE TI9 

•DE *FDB6 

»I/0-RE9ETIBEI 

cooo 




1 137 

» 

SETZEN DES CRA IRQ 

■CIA 

cooo 




1 17B 

MilXCTIG 

.DE «FE6C 

»NMI -ROUTINE AB 

cooo 




1 I9D 

» 

SCREEN-ED1 TOR-RESET 

cooo 




1 ICI 

MÜRS232 

.DE *FE72 

» Mil -ROUT INE AB 

cooo 




1 IDE 

1 

RS232-MAMJLIN0 


cooo 




1 1FF 

MilEM) 

.OE *FEBC 

»EfCE DER Mil- 

cooo 




1213 

1 

ROUTIFC 


cooo 




1837 

STOP 

.DE *FFE1 

»KERNAL STOP BPRG 

cooo 




1234 

1 

NACH JMP<*328) 


cooo 




1237 

» 



cooo 




123A 

» 



cooo 




1203 

# aaaaaaaaa 



cooo 




I20G 

» 



cooo 

A9 

BE 


12A2 

INI T 

LOA KL.USR 

»USR-VEKTOR 

C0O2 

0D 

1 1 

03 

1287 


STA USRADDL 

»LADEN 

C003 

A9 

CO 


12C4 


LDA KH.USR 


C007 

80 

12 

03 

1202 


9TA USRADDH 


C00A 




1203 

f 



COOA 

A9 

10 


12F2 


LDA KL,NMI 

»Mil-VEKTOR MIT 

cooc 

8D 

18 

03 

130D 


STA NMINVL 

»STARTADRESSE 

C00F 

A9 

C0 


1327 


LDA HH,NMI 

»DER EIGENEN 

CO 1 1 

80 

19 

03 

1343 


STA IMWH 

»Mil -ROUTITC LAD 

C014 




1348 

» 



CO 14 

AD 

OE 

DD 

1383 


LDA CRA2 

»BIT7 CRA SETZEN« 

CO 17 

09 

80 


137C 


ORA K*00 

»XI000 0000 

CO 19 

BO 

OE 

DD 

1397 


STA CRA2 

»KCTZFREQ.-30HZ 

CO IC 




I39A 

1 



CB1C 

na 



13AO 


RTS 


C01D 




13A3 

l 



CO ID 




I3CC 


• EIGEFC Mil-ROUTIFC 


CO 10 




13CF 

1 



CO ID 

40 



I3EF 

Mil 

PHA 

»AM^ANG NORMALE M- 


Listing 11. Der Quelltext zur Echtzeituhr. 
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Kurs _ C 64/VC 20 


C01E 8A 

1406 

TK8 

»REGISTER RETTEN 

C0B3 


IE40 » 

NEIN, 0AM4 SPRUNG 

C0IF 48 

140C 

PH8 


C0B3 F0 


IEG7 

SED 

»SONST OAVON BCO 12 

C0S0 98 

1412 

TYR 


C0B4 38 


IE7B 

SEC 

»SUBTRAHIEREN 

C021 40 

1410 

PH8 


C0B5 E9 12 


1E9B 

SBC 4*12 

»UFO 

C022 

14 1B l 



C0B7 08 


IE91 

CLO 


C022 89 7F 

1439 

L08 

•*7F »SPERREN 8LLER NMI 

C0B8 09 80 


1E89 

ORR 4*80 

»B1T7 SETZEN 

C024 0D 00 0D 

1444 

STR 

CR2 

C0B8 


1E8C » 



C027 

1447 » 



C0B8 60 06 

)0 

1ECF STDSET 

STR TOOHR 

»BCO-STUNOEN UND 

C027 AC 00 00 

1462 

LOY 

CR2 »PRUEFEN OB NM! 

C0BO 


1EF7 > 

AM/PM-FLAQ IN T0D-CI82 

C02A 10 06 

1401 

BPL RESTNMI »VOM C182 KOMMT. 

C0BD 


1EF8 » 



C08C 

1484 » 


WENN NEIN-SPRUNG 

C0BD 20 FC 

CO 

IPie 

JSR ASCBC01 

»ZEICHENTEST U. 

C02C 4C 68 CI 

MCI 

Jf-*» 8L8RM »WEFM JA, 8L8RM 

C0C0 


1F3F » 

UMWANDELN IN BCO-ZAHL 

C02F 4C 72 FE 

14E1 CI8MM1 


vfllRSaaE »REST OER 

COC0 90 08 

DO 

1F38 

STR T0DM1N2 

»ERGEBNIS IN 

C032 

1300 » 


N0RM8LEN NM1-ROUT 1 FC 

C0C3 


IF7F » 

TOD-M1NUTENREO1STER 

C032 

1308 » 



C0C3 


IP82 » 



C032 

1334 E I GEI E RESTORC-KMI-ROUI If«. **•»• 

C0C3 20 FC 

CO 

IF9F 

JSR 86CBC01 

»DASSELBE FUER 

C03B 

1337 » 



C0C6 8D 09 

00 

IFBB 

STR T008EC2 

»OIE 8EKUNDEN 

C032 

133F 1 OIE 

40DULPRUEFUN0 WIRD AUSOELASSEN 

C.0C9 


1FBE > 



C032 

1362 » 



C0C9 20 66 

:i 

IFD8 

JSR TEST 

»PRUEFEN,OB 1/10 

C03P 20 ec F6 

1307 RESTNMI 

JSR 

T8STFL8G »TEIL DER f*II - 

C0CC 


1PF9 » 

SEKUFCEN-ZAHL 


C033 20 El FF 

1383 

JSR 

STOP »ROUTINE ZUR STOP- 

COCC BD 08 

OD 

2017 

STR TOD10TH2 

»UND EINTRAOEN 

CO30 DO F3 

I3C2 

BNE 

CIAM41 » T8STEN-RBFR80E 

COCP 


2039 » 

INS TOD-REGISTER 

C038 

I3C3 » 



COCF 


2030 » OIE UHR 

BEGINNT JETZT ZU LAUFEN 

C038 82 04 

I3E3 

LOX 

4*04 »IRQ UND BRK VEKT. 

C0CF 


2060 1 



C03C BO 2F FO 

I60G UHL8D1 

L08 

VECT8B,X »RESTRUR 1EREN 

C0CF 89 00 


2070 

L08 4*00 

»KENNUNG FUER OK. 

C03F 90 13 03 

1613 

STR 

FREI.X 

CODI 4C 3C 

?C 

2082 8KKUF8C 

JMP 8CT0FC 

»AKKU ZUR UEBER- 

C042 C8 

1619 

OEM 


C004 


20C9 » 

GABE IF6 BASIC 

IN F8C 

C043 D0 F7 

1626 

BNE 

JM.80 1 

C004 


20CC » 



C043 

1629 » 



C0O4 


20F3 1 .......... FEHLER RUFGETRETEN 


C043 

1631 » DER 

Ml-VEKTOR WIRD UEBERSPRUNGEM 

C0D4 


2OF0 ; 



C043 

1634 » 



C0D4 68 


2116 FEHLER 

PL8 

»JSR-ADRESSEN VOM 

C043 82 18 

1671 

LOK 

4*18 » HEST8URIEREN OER 

C003 89 


2128 

PL8 

»STAPEL HOLEN 

C047 PO 33 FO 

1693 UMLA02 

LD8 

VECT8B7,X »RESTLICHEN 

COOG 


2 ISO > 



C048 90 19 03 

168C 

STR 

NMINVH.X »VEKTOREN 

CODG 68 


2I3B ERROR 

PL8 


C04O C8 

1602 

DEX 


C0D7 69 


2 1 3E 

PL8 


C04E DO F7 

1 GBF 

BNE 

UMLRDfi 

C0D9 


2141 » 



C030 

iGce » 



CODB 89 FF 


2164 EPRnRl 

LD8 4*FF 

»FEHLERKENNUNG IN 

CO30 

IGE3 » 2UM8ECMST NORMALER I/O-RESET 

CODA 00 F3 


2180 

BNE AKKUFAC 

»AKKU UND F8C 

C030 

1GE6 » 



C0OC 


2183 » 



C03O 89 ?F 

16F0 

LD8 

4*?F »*0111111 

C0OC 


2 IRC »ENDE DIESES TEILS D. UNBEDINGTEN SPRO. 



















C033 BD 00 DO 

1739 

STR 

ICR2 »SPERREN 8LLER HUI 

C0OC 


2 1 DB > 



C03B 

1778 » 


PORT 8 RUF NORMALUERT 

C0OC 


2204 » 



C03B 89 08 

1791 

L08 

NIOB J 0000 1000 

C0OC 


2228 » AUFRUF 

DURCH 7.B. USR<"AHHMM5ST") 

C03O 80 0F OC 

1780 

STR 

CR81 »TIMER 8 IM C18I 

C0OC 


2220 » 



C0GO 

17B0 > 



C0DC C0 09 


224B 8LSET 

CPY 4*08 

» 8 ZEICHEN 7 

C06O 

1702 » ERSATZ FUER BELEGUNG DES CR82 

C0DF 00 F8 


2263 

BI4E ERROR 1 

»NEIN-FEHLER 

C0S0 

I7D5 i 



C0FO 


2268 1 



C060 89 08 

17EC 

L08 

4*88 »»1000 1000 

C0E0 80 0F 

00 

2273 

L08 CRB2 


C062 8D OE 00 

1809 

STR 

CR82 » TIf-ER A IM C1A2« 

C0E3 09 80 


228E 

ORR MX. 10000000 

»ALARMBIT 

C065 

1829 ; 


BIT 0 RUF STOP 

C0E5 00 0F 

00 

228 1 

STR CRB2 

»SETZEN 

C0B3 

I04F » 


BIT 3 AUF EINZELLAUF 

C0E9 


2284 » 



C065 

1875 > 


BIT 3 SYSTEMT8KT EIN 

C0E0 89 84 


22C0 

LD8 »XI0000100 

»ALARM-NMI 

C063 

189D » 


BIT 7 ECHTZEITUHR-30HZ 

C0E8 80 0D 

DO 

22D3 

STR ICR2 

»ZULASSEN 

C063 

1380 ; 



C0EO 


2208 1 



C0S3 

18C0 » RESr 

DES N0RM8LEN I/O-RESET 

C0EO 89 3C 


2BF3 

LOfi 4S3C 

! VER20EGERUNGS- 

C065 

1BC3 > 



C0EF 83 04 


290D 

STR VORU 

»WERT VORGEBEN 

C063 

18CG ‘ 



C0F1 83 02 


2318 

STR VERZ 


C063 89 08 

18DE 

LD8 

NCOS »- 0000 1000 

C0F3 89 FF 

C^7 "" 7l 


2336 

LD8 4*FF 

»EOR-l-ERT VORGEBEN 



JSR 






C068 

1919 » REST 

DER N0RM8LEN RE3T0RE-NM1-ROUT. 

C0F9 4C 86 

CO 

236D 

JMP STELLEN 


C0G8 

19 IC » 



C0FC 


2370 » 



C0G8 4C GC FE 

1938 

JMP 

NMIHCT16 »EINSPRUNG BEI 

COFC 


2373 » 



C0GD 

193F » 


SCREEN EDITOR RESET 

COFC 


239C >••••■••«■*•••■•*■■**•■•■*••*••»>*••**• 

CB60 

1962 > 



C0FC 


23C5 »UMTERPROGRAf'M 2UR UMWANDLUNG 

DER 8SCII 

C0BO 

1988 »»*** 8BSCH8LTEN OER TIME OF 08Y UHR •* 

C0FC 


23EC »CODES IN 

BCD-28HLEN UND PRUEFUNG OER 

COGO 

198E » 



COFC 


23FF »EINGABE-ZEICHEN. 


C0GD 

198D 1 

DURCH SYS-KOFT-IANOO 

COFC 


2402 » 



COGO 

19B0 » 



COFC 89 G0 


2427 ASCBCD! 

LD8 4*60 

»BCD 60 RLS GRENZE 

C0GO 89 48 

1901 8US 

LD8 

4L , ILLQUERR JUSR-VEKTOR 

C0FE 


244F » 

FUER MIN UNO SEK WERTE 

C0BF 90 11 03 

19EF 

STR 

USR8DDL »RUF MORf«LUERT 

C0FE 


2432 » 



C072 89 B2 

1801 

L08 

MH.ILLQUERR 

COFE 93 24 


2465 ASCBCD 

STR IKOEX3 


C074 BO 12 03 

180F 

STR 

USR80DH 

C100 20 13 

CI 

24B2 

JSR TEST 1 

»PRUEFEN OB ZAHL 

C077 

1812 ; 



CI03 08 


2498 

8SL 

»AUS LSB INS USB 

C077 78 

1818 

SEI 


C104 08 


2480 

8SL 

»SCHIEBEN 

C078 89 47 

1833 

L08 

4*47 »RESTRURIEREN DES 

CI03 08 


24B2 

8SL 


C078 00 18 03 

184F 

STR 

FMINVL »F*>II-VEKTORS 

C10G 08 


24B9 

8SL 


C07D 83 FE 

1838 

L08 

4*FE 

C 107 83 23 


2407 

STR INDEX» 

»UFO ZW.SPEICHER 

C07F 80 19 03 

1887 

STR 

NM1NJH 

C 103 


2408 1 



C082 

1868 » 



C109 20 13 

CI 

24F7 

JSR TEST1 

JNAECHSTE ZIFFER 

C082 89 31 

1887 

L08 

4L,NORM »RESTAURIEREN 

C10C 


2310 » 

PRUEFEN 


C084 80 14 03 

1884 

STR 

1RQVL »OES 1RQ-VCKT0R5 

C10C 03 23 


232C 

ORR INOEX4 

»»-SB AUS ZWSP. 

C0O7 89 C8 

18P? 

LD8 

4H.N0RM 

C 10E 


2332 » 

UNO LSD ZU6RMMEUJREN 

C089 80 13 03 

I8BE 

STR 

IRQVM 

C10E C3 24 


23BF 

C»*» INDEX3 

»UNTER GRENZW.7 

C08C 

I8C1 I 



CI 10 B0 C4 


2380 

BCS ERROR 

»NEIN-FEHLERAUSG. 

C08C 50 

18C7 

CLI 


C 1 12 


2390 » 



C08O 60 

I8CD 

RTS 


CI 12 60 


2396 

RTS 


CODE 

1800 1 



CI 13 


2399 » 



CODE 

18F9 »•••« DURCH USB 

AUFRUFBARE ROUTINE 

C 1 13 


23C2 »•« PRUEFUNG OB ASCII-ZAHL VORLIEGT 

T00E 

1 RFC » 



CI 13 


23C3 I 



C09E 24 00 

1810 USR 

BIT 

VALTYP »WELCHER TYP VON 

CI 13 Bl 22 


23EB TEST 1 

L08 < INDEX-,Y 

»ZEICHEN EIN- 

CO90 

1044 ; 


VARIABLEN LIEGT VOR 7 

C 1 13 


2607 » 

LESEN IN AKKU 


C09B 30 03 

1B3F 

BMI 

STRING »WEfM STRING, 

C113 38 


2600 

SEC 


roos 

1B03 l 


081M UEBERSPRINOEN 

CI 16 E9 30 


2623 

SBC 4*30 

»< ASCII 0 ? 

coo« 4c ee ci 

IB9F 

JMP 

Z8HLV8R »SONST SPKUNO 

C 1 10 90 B8 


2630 

BCC FEHLER 

»JA-FEHLER 

C093 

IB82 » 



C 1 18 


2640 » 



C093 

IBCB »*••«*• 

STELLEN OER ECHTZI.IIUHR ••••••• 

CI 18 C9 08 


2639 

er-* 1 4*08 

1 >- 8SC I I 1 7 

C093 

IBFB i 

DURCH 

U3R< '«Hf-t-tSST« > 

CI IC BO BG 


267 1 

BCS FEHLER 

»JA-FEHLER 

C093 

1BEE I 



CI IE 


2674 » 



C093 20 02 07 

1C0F 9TR INO 

J0R 

LCNI » Y-STRIN0L8EN0E 

CI IE CB 


2680 

1 NY 

> SCHLE IFENZ»'EHLER ♦ I 

CO90 CO 07 

IC2C 

CP'l 

4*07 » STRIM3-7ZCICHEN7 

C1IF 60 


2696 

RTS 


C098 00 40 

1C48 

orc 

8L5ET »NEIN ORNN ALARM 

C 120 


2699 1 



C09C 

ICG9 i 


ZEIT STELLEN? 

C 120 


2BC2 »•••• EFOE PR00RAM4TEIL UHR STELLEN ••• 

C09C 

1C6C 1 


CRB2 »TIMER B IN C182 

ciao 


26C3 » 











C09F 29 7F 

1C83 

ANT 

4*7F 1BIT7 LOESCHEN» 

C 120 


2GF1 J 



C081 00 0F 00 

ICBF 

STR 

CRB2 »NORMALE UHRZEIT 

CI 20 


2718 »•>•••••••• UHR LEBEN •••••••«•*••••*•* 

C084 

1CE4 » 


IN ECHTZEITUHR C182 

C 120 


2710 » 



C084 

ICE7 » 



C 120 


273E » GESCHIEHT DURCH USR(Z8HL> 

C084 

1003 » 8USLESEN DES 

ZEIT-STRINGS 

C 120 


8741 » 



C084 

ID09 » 



C 120 89 07 


2761 ZAHLVAR 

LOA 4*07 

» STRIN3LAENGE 

C084 80 PP 

1022 

LOY 

4*00 »Z8EHLER RUF 0 

C122 20 70 

D4 

E77F 

JSR STRINI0 

»SCHAFFT 7 BYTE 

C086 09 24 

1047 STELLEr 

LD8 

4*24 »BCD 24 STD-VERGL. 

C 123 


2787 » 

PLATZ FUER STRING UND 

C088 20 FE CO 

1DG3 

JSR 

8SCBC0 »ZEICHENTEST Ufü 

C 123 


27CF » 

LEGT START N4CH *62/63 

C08B 

1D90 » 


ur<U4M)LUNQ in bco-zrhl 

CI 23 


27F6 » 

SOWIE LAEMSE 

«CH *61 

C08B DO 02 

1 ORB 

BNE 

STDI2 »STUNDEN UNGLEICH 

C 123 


2814 » 

<FAC *61-66» 


C08D 

1DCF > 


NULL 7 OAFN SPRUNG 

C 123 


2817 » 



C08D 89 24 

IDE 6 

LD8 

»»24 »SONST - 24 

C123 80 OL 


2831 

LDY 4*00 

»ZAEHLER AUF 0 

C0OF 

IOE9 ; 



C127 80 OP 

DD 

284F 

LDR TOOHR 

»STUNDE AUSLESEN, 

C08F C9 13 

lE0B STD 12 

CMP 

4*13 »STUNDEN 0H0ES5EH 

CI 28 


2078 » 

DABEI WIRD GESAMTE ZEIT 

COB1 90 07 

1628 

BCC 

STOSET »OOER GLEICH 12 7 

C 1 28 


2881 » 

ZWISCHEFOESPE 

ICHERT UND 





C 128 


20C7 » 

ERST f**CH LESEN OER 





C 128 


29EF » 

I/I0-SEK ZURUECKGEHOLT 





CI SA 


2914 » 

MIT AKTUELLEN 

WERT. 
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C 64/VC 20 


Kurs 


CI 3* 




2917 

; 





C 150 




2E42 

1 





C 120 

00 



2933 



PHP 


/STATUS 2U1SCHENSPEICH. 

CI 30 

20 

GO 

CI 

2E3E 



JSR BCDOSCI 


/IN ASCII UM- 

C13B 




2938 

; 





C13D 




2E05 

/ 


RECHNEN UND SPEICHERN 

CI2B 

29 

IF 


294F 



OID 

HUF 

>=0001 1111 

C 13D 




2E80 

/ 





C 130 




2978 

> 



LOESCHEN OER OM/PM-FLOG 

CI 50 

68 



2E05 



PLO 


JZURUECKHOLEN DER BCO- 

CI SD 

C9 

IS 


2996 



CMP 

4* 12 

/-0001 0010 “BCO12 

CI3E 

29 

OF 


2EC3 



AND H*OF 


/ZAHL,LOESCHEN OES 

C13F 

DO 

02 


2980 



BIE 

NO 12 

/< >OONN SPRUNG 

CI 60 




2E08 

/ 


MSB 



CI31 

A3 

00 


29CE 



LDO 

4*00 

/SONST STOTTOESSEN 

CI 60 




2EDB 

1 





C133 




290! 

1 





C 160 

09 

30 


2F00 

BC00SC1 


ORO 4*30 


IOOZUODERN VON *30 

033 

29 



29F0 

MO 12 

PLP 


/STATUS 2UF*UECKHOLEN 

C 162 




2F28 

/ 


ERZEUGT <UEIL 

HJR ZAHL 

0 34 

10 

03 


200A 



BPL 

OM 

/FALLS KEir-C OM/ 

C 162 




BF4F 

l 


ZWISCHEN 0 

UNO 

9) DEN 

0 36 




202F 

1 



PM-FLOCJ GESETZT 

WAR 

CI 62 




2F7B 

1 


0SC11-UERT 

1*30 BIS 39) 

CI 36 




2032 

1 





C 162 




2F7B 

/ 





0 36 

FB 



204C 



SED 


/SONST OODIEREN VON 

C 162 

91 

62 


2F9B 



STA CFOCD.V 


/EINTRÄGEN IN 

0 37 

18 



2062 



CLC 


/BCO 12 WEIL PM 

C 164 




2FB7 

1 


STR INOTABELLE 


C 136 

69 

12 


2060 



ODC 

4*12 


CIG4 




2FD0 

1 





CI 30 

09 



2073 



CLO 



CIB4 

CO 



BFCC 



INY 


/ZAEHLER »l 

ose 




2076 

» 





C 163 




2FCF 

1 





CI3D 

30 

33 

C 1 

2096 

OM 


JSR 

BCDOSC 

/UP ZUR UMRECHU3 

C 1 GS 

GO 



2F03 



RTS 



C13T 




20BC 

Z 



VOM DCO IN OSCI 

UNO 

C 166 




2F0B 

1 





C13C 




20E5 

1 



ABLEQEN IM 8TRIN0. HIER 

C 168 




3001 

/•*■(•• 

REST DES UP OSCH- 

BCO 

• (••UM) 

CI3E 




2B02 

1 



STUIJ0GNWER7 


C16G 




3004 

1 





CI3E 




2803 

1 





C 1C6 

eo 

13 

CI 

30,70 

TEST 


JSR TEST 1 


/PRUEFT AUF 

CI3E 

00 

00 

DO 

2022 



LDO 

TOOMINf 

/DASSELBE FUER 

C 168 




3042 

/ 


OSCII-ZAHL 

(0- 

9/ 

04 1 

20 

33 

CI 

2B3C 



JSR 

BCDOSC 

ZMINUTENUCRT 

CI CO 

GO 



3040 



RTS 



044 




8B3F 

/ 





C1GA 




3048 

» 





044 

«0 

09 

DD 

2B3C 



LDO 

10DSEC2 

/ UND SEKUNDEN- 

C 160 




3074 

/•••••• 

nmi 

REAKTION AUF ALARM 


047 

20 

35 

CI 

2BGF 



JSR 

BCDOSC 

/WERT 

C 160 




3077 

/ 





0 40 




2972 

1 





CIGO 

09 

77 


3097 

ALARM 


LDO 4L,OL IRQ 


/NEUER IRQ- 

C140 

00 

09 

PO 

209C 



LDO 

TODI0TH2 

/UND 1/10- 

CISC 

80 

14 

03 

30OB 



ST« IROt/L 


/VEKTOR 

040 

CO 

BO 

CI 

2000 



J9R 

BCDOSC1 

/SEKUNDENUERT 

C1BF 

09 

CI 


30BO 



LDO 4H.OL IRQ 



0 30 




2800 

1 





C 17 I 

80 

13 

03 

30C6 



STA 1R0VH 



030 

60 



8BC7 



PLO 


/USR-STR ING-ARGUMENT- 

C 174 




30C9 

1 





031 

68 



2BE3 



PLO 


/RUECKSPRUNO VORBEREIT. 

C 174 

4C 

BC 

FE 

30E3 



JMP NMIEND 


/REST OER NOR- 

038 




2BE0 

1 





C 1 77 




3108 

1 


MALEN KMI- 

ROUTIfC 

038 

033 

4C 

CO 

B4 

2C06 

2C29 

l 


JMP 

STRLIT67 /BRINGT STRING 

OESCRIPTOR IN OIE 

C 177 
CI 77 
C 177 




31 OB 
3134 
3131 

1 

DIE 




035 




2C32 

1 



OESCRIP TORTOBELLE 1019- 




/ 

ROHMENBLlf*EN 



0 35 




2C73 

/ 



*21 / .SETZT POINTER IN 

C 177 




3134 

J 





033 




2C02 

1 



FOCtHIER *64/63> DARAUF 

CI 77 




3137 

1 





0 33 




2CC8 

l 



SETZT STRIM3-FLAGGE, 

C 177 

C6 

02 


3173 

OL IRQ 


OEC VERZ 


/ZE1T6CHLEIFE 

035 




2CE9 

/ 



ERHOEHT LETZTEN 


C 179 

FO 

03 


3191 



BEQ BLINK 


/BLINKEN LENN 0 

033 




20 10 

/ 



DESCRIPTOR-INDEX UM 3 

CI7B 




3194 

1 





033 




2038 

/ 



ROUTINE EI'OET MIT RTS. 

C17B 

4C 

31 

EO 

31B2 



JMP NORM 


/SONST NORMALE IRQ 

033 




2038 

/ 





C17E 




3 IBS 

1 





033 




2064 

/ • 

*•* ENDE DES LESENS DER UHR • 


C17E 

03 

04 


3103 

BLINK 


LOA VORW 


»ZAEHLER RUECK- 

033 




2D67 

i 





C 100 

83 

02 


31E8 



STA VERZ 


/SETZEN 





















033 




2033 

» 





CI 02 

00 

20 

DO 

3203 



LOA RONO 


ZRAHMENFARBE 

033 




20BC 

>* 

UNTERPROGRAMM Z. UMRECHNUNG 

ICO IN • 

C 183 

43 

03 


32 1B 



EOR FÄRB 


/ IFA/ERT IEREN 

055 




20E5 

i» 

OSCH 

U.EINTRÄGEN IN STRINGSPEICHER» 

C 1 07 

BD 

20 

DO 

3226 



STA RAID 



035 




20E8 

z 





C 1 BO 




3229 

/ 





035 

40 



2E0B 

BCDOSC 

PHfl 


/AUF STAPEL ZW.SPEICH. 

CI 80 

4C 

31 

EO 

3244 



JI*P NORM 


/ZUM NORMAL-4RO 

036 




2E0E 

z 





CI8D 




3247 

/ 





0 56 

40 



2E20 



LSR 


/MSB INS LSB SCHIEBEN 

C 180 




3240 



.EN 



037 

40 



2E3 1 



LSR 













CI3B 

039 

40 

40 



2E36 

2E3F 



LSR 

LSR 



Listing 11. 

Der Quelltcxt zur Echtzeituhr (Schluß) 
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Effektives Pro¬ 
grammieren in 
Assembler 

Es gibt viele Möglichkeiten, ein Basic- 
Programm schneller und komfortabler zu 
gestalten. Aber auch für die Assembler¬ 
programmierung gibt es einige Tricks und 
Kniffe, die wir Ihnen in diesem praxis¬ 
nahen Kurs verraten wollen. 

I m m »er das Optimum an Geschwindigkeit aus seinem 
^m Computer herausholen will, kommt an Maschinen- 
■ ■ spräche nicht vorbei. Die Grundlagen zur Maschi¬ 
nenprogrammierung wurden bereits im Kurs »Assembler ist 
keine Alchimie«, den Sie in diesem Sonderheft finden, 
geschaffen. Das Thema dieses Artikels ist es nun, die Mög¬ 
lichkeiten von Maschinensprache optimal zu nutzen. Sie 
erfahren, wie man 
a) Programme beschleunigen und 
b) Speicherplatz sparen kann. 

Dazu werden Ihnen eine Vielzahl von Programmiertechni¬ 
ken, Tips und Tricks vermittelt, die Ihnen die Programmierung 
erleichern. 

1. Beschleunigungen des Betriebs¬ 
systems (in Assembler) 


Der C 64 muß viele Aufgaben gleichzeitig erledigen: Bearbei¬ 
ten des Hauptprogramms, Ablauf der Systeminterrupts und 
Senden des Video-Signals (an den Monitor/Fernseher). Alle 
diese Funktionen erfordern 

- viele Zugriffe auf den Datenbus des Prozessors 

- und dadurch Ausführungszeit. 

Unser Grundproblem ist nun, wie wir den Computer dazu 
bewegen, diese Aufgaben nicht (oder nur teilweise) auszu¬ 
führen. 

a) Eingriffe in den Systeminterrupt 

Eine detaillierte Beschreibung des Systeminterrupts finden 
Sie im bereits erwähnten Kurs »Assembler ist keine Alchimie«. 
Hier möchte ich nur zusammenfassen, was im normalen Inter¬ 
rupt des Betriebssystems geschieht: 60 mal in der Sekunde 
wird das Hauptprogramm verlassen und die Routine ab 
$EA31 angesprungen. Ist diese abgearbeitet, wird wieder 
ins Hauptprogramm zurückgesprungen. Während dieser 
Unterbrechung (»interrupt«) tut sich einiges: 

- die RUN/STOP-Taste wird überprüft 

- die Tastatur und der Datasettenmotor werden abgefragt 

- das Cursorblinken wird erledigt 

- die interne Uhr (Tl$) wird gestellt. 

Überlegen wir uns, welche Funktionen verzichtbar sind: 
Die RUN/STOP-Taste bewirkt nur in Basic-Programmen einen 
Abbruch, in Assembler müßte sie zum Beispiel über »JSR 
$FFE1« zusätzlich abgefragt werden. Die interne Uhr findet 
von Maschinensprache aus praktisch keine Verwendung. 
Kurz und gut, ein Maschinenprogramm kann auf beide Funk¬ 
tionen verzichten. Dies wird durch ein 
LDA #$34 
STA $0314 



erreicht. Weil der Computer dadurch entlastet wird, läuft das 
Hauptprogramm etwas schneller ab. 

Die Normaleinstellung erhält man mit 
LDA #$31 
STA $0314 


Beschleunigungsmethode 1: 

Trick: Verkürzung der Interrupt-Routine 
Nebenwirkungen: Abfrage der STOP-Taste und interne 
Uhr entfallen 


Können Sie zwischenzeitlich auf die ganze Interrupt-Routine 
verzichten, genügt ein einziger Befehl: 

SEI (»set interrupt«) 

Er verhindert grundsätzlich das Auftreten von Interrupts. 

Die Normaleinstellung bewirkt: 

CLI (»clear interrupt«) 


Beschleunigungsmethode 2: 

Trick: Interrupt total abschalten 

Nebenwirkungen: Abfrage von Tastatur, STOP-Taste und 

Datasette, sowie Cursor und interne Uhr entfallen. 


Es gibt aber noch eine Möglichkeit, im Zusammenhang mit 
dem Systeminterrupt: Von der Adresse $DC05, die als Zähler 
dient, hängt die Anzahl der Interrupts (in der Regel 60 Aufrufe 
pro Sekunde) in einer bestimmten Zeit' ab. Diese Adresse 
kann durch Schreibzugriff geändert werden. Schreibt man in 
$DC05 Ainen niedrigen Wert (im Extremfall 0), so werden 
sehr vice Interrupts ausgelöst. Dies macht sich in der 
Geschwindigkeit der Interrupt-Routine bemerkbar. Cursor 
und Tastaturabfrage werden sehr schnell, die interne Uhr geht 
vor, und so weiter. Verwendet man eine eigene, eventuell zeit¬ 
kritische Interrupt-Routine, kann sie auf diese Weise 
beschleunigt werden. 

Dieser Geschwindigkeitszuwachs geht allerdings auf 
Kosten des Hauptprogramms, das stark verlangsamt wird. 
Bei wenigen Interrupts (große Zahl in $DC05) wird es 
beschleunigt. Die entsprechenden Assemblerbefehle lau¬ 
ten: 

LDA #$FF 

STA $DC05 

um eine starke Beschleunigung zu bewirken. 

Die Normaleinstellung wird durch 
LDA # $3A 
STA $DC05 
erreicht. 


Beschleunigungsmethode 3: 

Trick: Anzahl der Interruptaufrufe pro Sekunde ändern 
Nebenwirkungen: Bei zu wenigen Aufrufen hinken Uhr, 
Cursor und Tastaturabfrage nach; bei zu vielen werden 
sie zu schnell. 


b) VIC-Register Nummer 17 

Ist Ihnen schon bei Hypra-Load, beim Arbeiten mit der Data¬ 
sette und einigen Kopierprogrammen aufgefallen, daß 
manchmal der Bildschirm abgeschaltet wird (ähnlich wie im 
FAST-Mode des C 128)? Dies kann man mit einem Vorhang 
vergleichen, der zwischenzeitlich den Bildschirm verdeckt. 
Der Bildschirm kann zwar nach wie vor (hinter dem Vorhang) 
geändert werden (PRINT-Anweisungen werden also ausge¬ 
führt), aber sichtbar wird die Wirkung erst, wenn der Vorhang 
entfernt wird. 











C 64 


Kurs 


*>*? 


Verantwortlich für das Ein-/Ausschalten des Bildschirms ist 
das VIC-Register Nummer 17: 

Bit 4 gesetzt: Bildschirm wird angezeigt 
Bit 4 gelöscht: Bildschirm wird abgeschaltet 
und nimmt Rahmenfarbe an. 

Da wir die theoretischen Grundlagen haben, brauchen wir 
nur noch unser Wissen in Befehle umzusetzen: 

Bildschirm abschalten: 

LDA $D011 ($D011 ist VIC-Register #17) 

AND #$EF ($EF = %11101111) 

STA $D011 f 

Bit 4 

In diesem Zustand arbeiten manche Kopierprogramme um 
zirka 15% schneller. Programme, die nicht auf externe Geräte 
wie die Floppy zugreifen, laufen zirka 5% schneller ab. 
Bildschirm wieder einschalten: 

LDA $D011 

ORA #$10 ($10 = %00010000) 

STA $D011 t 

Bit 4 

Dies ist der Normalzustand. 


Beschleunigungsmethode 4: 

Trick: Bildschirm abschalten 
Nebenwirkungen: Der Bildschirminhalt ist nicht zu 
sehen, geht aber auch nicht verloren. 


c) Hinweise zum bisher Gesagten 

Alle bis zu dieser Stelle genannten Tricks beziehen sich auf 
die Beschleunigung von Programmen. Sie lassen sich leicht 
nachträglich einfügen, weil am Programmalgorithmus keine 
Änderungen erforderlich sind. 

Sie können das Abschalten des Bildschirms mit dem 
Abschalten oder Einschränken des Interrupts verknüpfen, 
um die Geschwindigkeit noch weiter zu erhöhen. Wenn Sie 
den Interrupt ganz abschalten (SEI), bringt es keinen zusätzli¬ 
chen Gewinn, ihn einzuschränken oder die Zahl der Aufrufe 
zu ändern. 

Beachten Sie bitte, daß alle beschriebenen Tricks durch 
RUN/STOP-RESTORE, einem Reset oder den Assemblerbe¬ 
fehl BRK rückgängig gemacht werden. 

2. Systembeschleunigungen in Basic 


Hier erfahren Sie, wie sich die Systembeschleunigungen von 
Basic aus verwerten lassen. Die Nebenwirkungen bleiben 
allerdings diegleichen, wie unter 1. genannt. 

a) Interrupt einschränken 

POKE 788,52 verkürzt die Interrupt-Routine um das Abfra¬ 
gen der RUN/STOP-Taste und das Stellen von Tl$. 

POKE 788,49 Normalzustand 

In Basic ist das Ausfallen von RUN/STOP und Tl$ wesent¬ 
lich störender als in Maschinensprache. Überprüfen Sie 
daher Ihre Programme auf Verwendung von Tl$ und fügen Sie 
den POKE erst nach (!) der Fertigstellung des Programms ein. 

b) Interrupt abschalten 

POKE 56334,PEEK (56334) AND 254 
schaltet den Interrupt ab, 

POKE 56334,PEEK (56334) OR 1 
schaltet ihn wieder ein. Dies geschieht dadurch, daß der 
Timer ab- beziehungsweise wieder eingeschaltet wird. 

c) Anzahl der Interrupt-Aufrufe ändern 

POKE 56325,0: Extrem viele Interruptaufrufe 
POKE 56325,255: Extrem wenige (daraus folgt: 
Interrupt langsam, Basic-Programm schnell) 

d) Bildschirm abschalten 

POKE 53265,PEEK(53265) AND 239 



schaltet den Bildschirm ab. 

POKE 53265,PEEK(53265) OR 16 
schaltet ihn wieder ein. 

An dieser Stelle sei noch einmal auf Punkt 1c hingewiesen, 
damit keine (vermeidbaren) Probleme auftreten. 

Anhand von Listing 1 wollen wir uns nun mit der Anwendung 
der Systembeschleunigungen befassen. Dieses kleine Bei¬ 
spielprogramm, an dem Sie nach Herzenslust experimentie¬ 
ren können, versucht, mit Hilfe von Tl$ die Arbeitsdauer der 
Schleife (Zeile 150) zu messen. 

Während des Ablaufs dieser Schleife, die kontinuierlich die 
Rahmenfarbe ändert, sollten Sie keine Taste drücken, um die 
Meßwerte nicht zu verfälschen. 

Wenn Sie dies beachten, erhalten Sie folgende Werte: 

1. Normalzustand: 000003 

2. Verkürzter Interrupt: 000000 

An der gemessenen Zeit können Sie erkennen, daß Tl$ 
abgeschaltet wurde. 

3. Häufige Interrupts: 000010 

Aufgrund vieler Interrupt-Anforderungen wurde die Uhr 
Tl$ sehr oft erhöht. 

4. Seltene Interrupts: 000001 

Da die IRQ-Routine nur selten durchlaufen wurde, ist Tl$ 
kaum weitergezählt worden. 

5. Bildschirm abgeschaltet: 000002 

Nur bei diesem Punkt (und natürlich auch bei »1«) hatTI$ volle 
Aussagekraft bezüglich der Ablaufzeit. An dieser Zeit können 
wir erkennen, daß durch das Abschalten des Bildschirms tat¬ 
sächlich gegenüber »1« ein Zeitgewinn anfällt. 

Bei den Punkten »3« und »4« wurde der Cursor eingeschal¬ 
tet. Bei »3« (häufige Interrupts) ist er sehr schnell, bei »4« 
dagegen sehr langsam. 

An Punkt »5« können Sie erkennen, daß bei abgeschalte¬ 
tem BiiuoChirm der Hintergrund immer die Rahmenfarbe 
($D020) annimmt, ohne daß wir die entsprechende Farbe ins 
Register $D021 »POKEn«. 


90 GOTO 200 

<026 > 

100 

REM » UP - SCHLEIFE << 

< 13B> 

1 10 


< 086 > 

120 

PRINT" < TASTE > "; :WAIT 19B,l:POKE 19B,0 



s FÜR 1-1 TO 7:PRINT CHR*(20);:NEXT 

<221 > 

130 

t 

< 106> 

140 

FOR 1-1 TO 100:NEXT 

< 122 > 

150 

TI*'*"000000"; FÜR I ■ 0 TO 255: POKE 532 



80,1 AND 13:NEX1iPRINT TI*:RETURN 

<205> 

160 

: 

< 136> 

170 

REM » UP - CURSURPLINKEN AUS << 

<206> 

180 

: 

< 156> 

190 

POKE 207,0:POKE 204,1:PRINT" ": RETURN 

<106> 

200 

REM - 

<222> 

210 

REM — HAUPTPROGRAMM — 

<045> 

220 

REM - 

<242> 

230 

: 

< 206 > 

240 

PRINT CHR*(147)"DEMO EUER SYSTEMBESCHL 



EUNIGUNGEN ( DASIC>"; 

<061 > 



<127> 

260 

PRINT"(2DQWNI1 ) NORMALZUSTAND"; : BOSUB 



100 

<033> 

270 

X 

<24B> 

2130 

PRINT"(DOWNJ2) YERKUERZTER INTERRUPT"; 



: POKE 780,52:BOSUB 100:POKE 788,49 

<0B4> 

290 

: 

<012> 

300 

PRINT"(D0WN13I HAEUFISE INTERRUPTS"::P 
OKE 56325,20:POKE 204,0:BOSUB 100:BOSU 



Et 170 

< 0 ie> 

310 

X 

<032> 

320 

PRINT"4 ) SELTENE{2SPACEHNTERRUPTS"; :P 
OKE 56325,150:POKE 204,0:GOSUB 100:GOS 



UB 170 

< 113> 

330 

SYS 64931:REM NORMALZUSTAND EIN 

<253> 

340 

: 

<062> 

350 

PRINT"5> BILDSCHIRM ABBESCHALTET ";:PO 



KE 53265,PEEK(53265) AND 239:BOSUB 140 

<107> 

360 

POKE 53265,PEEK(53265) OR 16:PRINT"<D0 



WN}«* ENDE **" 

<066> 

6 64'er 


Listing 1. Systembeschleunigungen in Basic 
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3. Optimierung der Bildschirmausgabe 


Ohne die Bildschirmausgabe kommt kein Programm aus, aber 
oft kostet sie unnötig viel Rechenzeit. Der Grund ist hier nicht 
beim Betriebssystem zu suchen, sondern bei umständlicher 
Programmierung. Diese wiederum ist auf mangelndes Know- 
how zurückzuführen, welches wir nun ändern wollen. 

In der Regel wird zur Ausgabe eines Zeichens dieses in den 
Akku geladen und die Routine BASOUT (SFFD2) aufgerufen. 
Veranschaulichen wir uns einmal die Arbeitsweise von 
BASOUT: Das Betriebssystem prüft bei jedem Zeichen, ob es 
sich um einen Buchstaben oder ein Steuerzeichen, zum Bei¬ 
spiel »Bildschirm löschen« handelt. Buchstaben werden in 
den Bildschirmcode umgewandelt und ins Bildschirm-RAM 
ab $0400 geschrieben. 

Für Steuerzeichen existieren jeweils Unterroutinen die zum 
Beispiel eine Leerzeile einfügen, den Bildschirm löschen 
oder ähnliches. 

Diese aufwendige Überprüfung verlangsamt die Bild¬ 
schirmausgabe erheblich. BASOUT läßt sich zwar gering¬ 
fügig beschleunigen, indem man statt bei $FFD2 (Kernelein¬ 
sprung) bei $E716 einsteigt, aber es geht noch schneller: 

a) Bildschirm löschen 

Langsam: 


d) Textausgabe 

Unkomfortable Lösung: 

Senden von Zeichen (Buchstaben, Grafikzeichen) über 
BASOUT. 

Eine solche Schleife finden Sie in Listing 2, Zeilen 148 - 
220 und 320 - 330. Nach dem Start durch »SYS 49152« gibt 
Listing 2 zweimal hintereinander den Text »DAS IST DER 
TEXT« aus. Das erste Mal wird der Text über eine BASOUT- 
Schleife gedrückt, beim zweiten Mal nimmt das Programm die 
Komfortable Lösung: 

Ab der Adresse »TEXT« muß der Text (in ASCII-Darstellung) 
stehen, in dem keine Anführungszeichen Vorkommen dürfen. 
Am Ende des Textes muß $00 als Endmarkierung zu finden 
sein. Die Ausgabe erfolgt dann über 

LDA # < (TEXT) Low-Byte der Adresse 
LDY # > (TEXT) High-Byte 
JSR $AB1E 

Die Routine $AB1E wird fortan als »STROUT« (STRing- 
OUTput = String-Ausgabe) bezeichnet. STROUT ist zwar 
etwas langsamer als BASOUT; dafür erlaubt die komfortable 
Parameterübergabe eine wesentlich bequemere Program¬ 
mierung, wie Sie am zweiten Teil von Listing 2 (Zeilen 260 - 
300, 320 - 330) sehen können. Mit nur drei Befehlen wird 
der Text ausgegeben! 


LDA # $93 $93 = 147 = Code für »Bildschirm 

löschen«, entspricht PRINT CHR$(147) 

JSR $FFD2 (oder $E176) 

Schnell: 

JSR $E544 (Routine für »Bildschirm löschen«) 
b) Cursor in Home-Position (linke obere Ecke) 

Langsam: 646R Oltv 

LDA #$13 ; $13 = Code für »Cursor Home« 

JSR $FFD2 (oder $E176) 


Schnell: 

JSR $E566 (Routine für »Cursor Home«) 

c) Cursor-Positionierung 

Langsam: 

Senden von Steuerzeichen (CRSR DOWN, UP und so weiter) 
über BASOUT. 


Beschleunigungsmethode 5. 

Zusammenfassung der bisherigen Alternativen 
zu BASOUT: 

CLEAR HOME: JSR $E544 

CURSOR HOME: JSR $E566 

Cursorpositionierung: LDX # Zeile 
LDY # Spalte 
JSR $E50C 

Textausgabe: Text ab TEXT ablegen 

(wie Listing 2, Zeile 320 - 330) 
LDA # < (TEXT) 

LDY # > (TEXT) 

JSR $AB1E 

Alle diese Verfahren sind nicht nur schnell, sondern auch 
speicherplatzsparend. 


Schnell: 


LDX # Zeile 
LDY # Spalte 

JSR $E50C (Cursorposition setzen) 


Eine Anwendung von (fast) allen Routinen aus der 
Beschleunigungsmethode 5 zeigt Listing 3. 


SEARCHING FÜR %% 


100 

-.LI 1,3,0 


110 



120 

TEXTAUSGABE (UEBER STROUT) 

130 

-\ 


140 

-.BA i('.000 ; START: SYS 49152 

150 

-j 


160 

-.QL STROUT - *AB1E 


170 

-.BL CURSOR - «E50C 


180 

-.GL L'LRSCR - *E544 ! BILDSCHIRM LOESCHEN 

170 

”1 


200 

-.GL ZEILE - 12 


210 

-.GL SPALTE - 10 


220 

-j 


230 

JSR CLRSCR | 

- PRINT CHR*(147) 

240 

LDX MZEILE ; 

ZEILE IN X 

250 

LDY »»SPALTE j 

SPALTE IN Y 

260 

JSR CURSOR ; 

CURSOR SETZEN 

270 

LDA #<(TEXT) l 

LOW-BYTE IN AKKU 

280 

LDY #>(TEXT) \ 

HIGH-BYTE IN Y 

270 

JMP STROUT | 

TEXTAUSGABE 8. ENDE 

300 



310 

-TEXT .TX "DAS IST DER 

TEXT!" 

320 

-.BY 0 j ENDMARKIERUNG FUER 

STROUT 

Listing 3. Die komfortable Lösung 

einen Text auszugeben 



100 

-.LI 1,3,0 


110 

— i 


120 

-I TEXT AUSGABE (UEBER BA90UT) 

130 

-; 


140 

-.BA JC000 ; START: SYS 

49152 

150 



160 

-.GL BASOUT - *FFD2 


170 

-1 


100 

LDX «0 


190 

-SCHLEIFE LDA TEXT.X 

1 ZEICHEN LESEN 

200 

INX 


210 

JSR BASOUT 

j UND AUSGEBEN 

220 

BNE SCHLEIFE 

; SCHON ENDMARKIERUNG? 

230 

- { 


240 

TEXTAUSGABE (UEBER STROUT) 

250 

-j 


260 

-.GL STROUT = *AB1E 


270 

— | 


200 

- LDA #<(TEXT) 

; LOW-BYTE IN AKKU 

290 

LDY »»/(TEXT) 

; HIGH-BYTE IN Y 

300 

JMP STROUT 

; TEXTAUSGABE UND ENDE 

310 



320 

-TEXT .TX "DAS IST 

DER TEXT'" 

330 

-.BY 0 ; ENDMARKIERUNG DES TEXTES 

Listing 2. Die unkomfortable Lösung, 

einen Text auszugeben 
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Der Bildschirm wird gelöscht und in Zeile 12 ab Spalte 10 
ein Text ausgegeben. Auch in diesem Programm sollten Sie 
zur Übung etwas experimentieren! 
e) Kopieren des Textes in den Bildschirmspeicher 

Dies ist die schnellste Methode: Der Text wird in den Bild¬ 
schirmspeicher kopiert. Die lange Umwandlung entfällt völlig, 
da der Text als fertiger Bildschirmcode im Speicher abgelegt 
wird. Wenn einige Kopfzeilen (zum Beispiel mit Copyright- 
Vermerken) an verschiedenen Stellen ausgegeben werden 
sollen, ist es ratsam, ein kleines Unterprogramm zu erstellen. 
Dieses schreibt dann die Kopfzeilen direkt in den Bildschirm¬ 
speicher, ohne die aktuelle Cursor-Position zu beeinflussen. 

Eines müssen Sie aber unbedingt beachten: Die Farbge¬ 
bung ist nur durch Ändern des Farb-RAMs möglich. 

Eine Tabelle der Bildschirmcodes finden Sie übrigens im 
Anhang des C 64-Handbuchs und am Schluß dieser Aus¬ 
gabe. 

Beschäftigen wir uns nun mit Listing 4: 

Dieses Programm entspricht in der Wirkung Listing 3, gibt 
den Text jedoch nicht über die Betriebssystem-Routinen 
CURSOR und STROUT aus, sondern schreibt ihn direkt in 


100 

—. LI 1,3,0 


110 

-j 


120 

-i TEXT IN VIDEO-RAM SCHREIBEN 

130 

-| 


140 

-.BA 1C000 * START: SYS 

49152 

150 

-j 


1 80 

-.GL CLRSCR - *£544 ; BILDSCHIRM LQESCHEN 

190 

-j 


200 

-.GL ZEILE - 12 


210 

-.QL SPALTE - 10 


220 



230 

-.BL VIDEORAM - 1024 ! BILDSCHIRMSPEICHER 

240 

-.GL ADRESSE - VIDEORAM 

♦ (40* ZEILE) + SPALTE 

250 

-| 


255 

JSR CLRSCR 

1 - PRINT CHR#(147) 

260 

LDX #0 


270 

-SCHLEIFE LDA TEXT,X 

( BILDSCHIRMCODE LESEN 

2B0 

BEQ ENDE 

5 -0, DANN ENDE 

290 

STA ADRESSE, 

1 IN 8ILDSCHIRMSPEICHER 

295 

I NX 


296 

JMP SCHLEIFE 

S NAECHBTES ZEICHEN 

-300 

-ENDE RTS 


305 

“! 


310 

-TEXT .BY 4,1,19," 

",9,19,20," " 

311 

-.BY 4,5,10," ",20,5,24 

20,"•" 

320 

-.BY 0 i ENDMARKIERUNQ DES TEXTES 

Listing 

4. Die schnellste Lösung, einen Text auszugeben 


den Bildschirm. 

In den Zeilen 310 - 320 steht der Bildschirmcode des 
Textes. 

Zurück zur Routine STROUT: Diese Routine arbeitet, da sie 
sich auf die BASOUT-Routine stützt, auch mit Peripheriegerä¬ 
ten wie Floppy und Drucker, wenn diese über dem CMD- 
Befehl als Ausgabegeräte definiert wurden. In »Assembler ist 
keine Alchimie« wurde gezeigt, wie man mit der BASOUT- 
Routine die Drucker-Ausgabe betreibt. Dort wurden alle wich¬ 
tigen Routinen bis ins Detail beschrieben. 

Listing 5 gibt einen Text zuerst auf dem Drucker und dann 
auf dem Bildschirm aus. Daran soll außer dem Druckerbetrieb 
auch gezeigt werden, wie man die Parameterübergabe an 
STROUT als Makro (Zeilen 230 - 270) definiert und sich 
somit einen bequemen Ausgabe-Befehl schafft. 

4. Unterprogramme 


Ohne die Unterprogramm-Befehle JSR und RTS kommt fast 
kein Maschinenprogramm aus. Es ist allerdings ziemlich 
unbekannt, daß beide Befehle das Programm stark verlangsa¬ 
men. Grund genug für uns, JSR und RTS näher zu betrachten: 

Trifft der Prozessor auf JSR, schiebt er den aktuellen Pro¬ 
grammzähler plus 2 (= Rücksprungadresse - 1) auf den 
Stack und springt dann zu der Adresse, die hinter JSR steht. 
Trifft er auf RTS, holt er die Adresse vom Stapel zurück, erhöht 
sie um 1 und verwendet sie wieder als Programmzähler. 

Bemerkenswert ist, daß die Zugriffe auf den Stapel sich in 
keiner Weise von den Zugriffen über die Befehle PHA und 
PLA unterscheiden. Daher muß jedesmal der Stapelzeiger 
neu errechnet werden. Diese vielen Operationen sind schuld 
daran, daß JSR und RTS so langsam sind. 

Da wir das Problem erkannt haben, können wir damit begin¬ 
nen, unser Wissen anzuwenden, 
a) Unterprogrammverschachtelung 

Stellen wir uns folgendes Beispiel vor: ein Hauptprogramm 
ruft das Unterprogramm 1 auf. Dieses ruft an seinem Ende 
das Unterprogramm 2 auf, um dann mit RTS ins Hauptpro¬ 
gramm zurückzukehren. 

Alles ziemlich schwierig, oder? 

Deshalb gehen wir mit Hilfe einer Grafik vor: In Bild 1 sehen 
Sie ein Flußdiagramm nach obigem Aufbau. In der Beschrif¬ 
tung soll »Code« nicht »Kennwort« bedeuten, sondern heißt 
einfach »Befehlsnummer«. 

Wie an den Pfeilen zu erkennen ist, werden zwei RTS- 
Befehle hintereinander abgearbeitet (von Unterprogramm 2 
nach Unterprogramm 1 und von dort zum Hauptprogramm). 


100 

-.LI 1,3,0 


1 10 

”1 


120 

-5 DRUCKER-AUSGABE MIT 

130 

—, DER STROUT-ROÜTINE 


140 

“1 


150 

-.GL STROUT - *ABIE 


160 

-.GL SETNAM = *FFBD ; 

DIE BEDEUTUNG 

170 

-.GL SETLFS = *FFBA ; 

DIESER ROUTINEN 

180 

-.GL OPEN = $FFC0 ; 

ENTNEHMEN SIE 

190 

-.GL CHKOUT - SFFC9 ; 

BITTE DEM KURS 

200 

-.GL CLRCHN = *FFCC ; 

"ASSEMBLER IST 

210 

-.GL CLOSE - SFFC3 ; 

KEINE ALCHIMIE" 

220 

—• 


230 

-.MA PRINT (ADRESSE) 


240 

LDA #<(ADRESSE) 

250 

LDY (ADRESSE) 

260 

JSR STROUT 


270 

- - RT 


280 

Na» 


290 

-.BA *C000 ; START: SYS 49152 

300 

“5 


310 

LDA #0 

; KEINEN 

320 

JSR SETNAM 

; FILENAMEN 

330 

“I 


340 

LDA *»4 

; LOG. FILENUMMER =4 

350 

TAX 

j GERAETEADRESSE 4 

360 

LDY M0 

; SEKUNDAERADRESSE 0 

370 

- JSR SETLFS 

; PARAMETER SETZEN 

380 

“1 


390 

JSR OPEN 

; FILE OEFFNEN 

400 



410 

LDX #4 

I FILENUMMER 4 

420 

JSR CHKOUT 

; AUSGABE AUF DRUCKER LENKEN 

430 

“1 


440 

-...PRINT (TEXT) | TEXT AUSGEBEN 

450 

- j 


460 

JSR CLRCHN 

i WIEDER BILDSCHIRMAUSGABE 

470 

-1 


480 

--PRINT (TEXT) i JET7T AUF BILDSCHIRM 

490 



500 

LDA »4 

t LOG. FILENUMMER 4 

510 

JMP CLOSE 

t FILE SCHL IESSEN 

520 

-| t, PROGRAMM BEENDEN 


530 

-J 


540 

-TEXT .TX "DIESER TEXT WIRD AUF" 

550 

TX » DEN DRUCKER AUSGEGEBEN !" 

560 

-.BY 13,13,13,0 | 3 * 

CAR.RETURN 

Listing 5. So gibt man Text auf dem Drucker aus 


^ Hauptprogramm ) 

( Unterprogramm 1) 

( Unterprogramm 2 

1 

j 

1 

zu 

Code des Haupt- 

/ 

Code von Unter- 


Code von Unter- 

Programms 

/ 

Programm 1 


Programm 2 


Unter¬ 
programm 1 


Unter¬ 
programm 2 


Rest des Haupt¬ 
programms 


RTS 



RTS 




^Programmende ^ 


Bild 1. Der Algorithmus zur Ver¬ 
schachtelung von Unterprogrammen 
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Dies ist immer ein Indiz dafür, daß das Programm noch opti¬ 
miert werden kann. 

Eine »Übersetzung« von Bild 1 in Assembler ist Listing 6: 
Wenn Sie dieses über »SYS 49152« starten, ist aus den aus¬ 
gegebenen Texten ersichtlich, welcher Programmteil wann 
abgearbeitet wird. 

Sobald Sie die Struktur von Bild 1 beziehungsweise Listing 
6 verstanden haben, können wir uns mit der optimierten Form 
befassen, die in Bild 2 beziehungsweise Listing 7 zu finden 
ist. 

Hier wird das ehemalige Unterprogramm 2 ans Ende von 
Unterprogramm 1 gehängt (wobei es ebenfalls über JMP 
UP2 angesprungen werden könnte). Auf diese Weise muß es 
nicht über JSR aufgerufen werden, was auch einen RTS- 
Befehl überflüssig macht. 

Trotz dieser Änderung kann das Unterprogramm 2 auch 
weiterhin als Unterprogramm aufgerufen werden, da bei JSR 
UP2 die CPU auf einen RTS-Befehl trifft (Bild 2). 

In Listing 7 muß noch der JMP-Befehl in Zeile 480 erläutert 
werden: 

Dort muß nicht JSR STROUTRTS stehen, weil am Ende der 
STROUT-Routine im ROM ohnehin ein RTS steht. Deshalb 
benötigt unser Programm keinen eigenen RTS-Befehl zur 
Rückkehr ins Hauptprogramm. 

Die folgende Regel gilt für Aufrufe von Betriebssystem¬ 
routinen: 



Voraussetzung ist, daß im Unterprogramm ab $XXXX keine 
Stapelmanipulation erfolgt, wie sie gleich beschrieben wird. 
Das geschilderte Verfahren zur Unterprogrammverschachte- 


100 -.LI 1,3,0 


100 -.LI 1,3,0 

110 -.BO »C000 s START: SYS 49152 


110 -.BA *C000 ? START: SYS 49152 

120 


120 

130 UNTERPROGRAMMVERSCHACHTELUNG 


130 -; UNTERPROGRAMMVERSCHACHTELUNG IN ASSEMBLER 

140 (OPTIMIERTE ASSEMBLERVERSION) 


140 

150 -; 


150 -.GL STROUT = *AB1E 

160 -.GL STROUT = *AB1E 


160 -; 

170 

DT 

170 .MA PRINT (ADRESSE) 

100 -.MA PRINT (ADRESSE) 


1B0 - LDA #< (ADRESSE) 

190 - LDA #<(ADRESSE) 


190 - LDY #>(ADRESSE) 

200 - LDY #>(ADRESSE) 


200 - JSR STROUT 

210 - JSR STROUT 


210 -.RT 

220 RT 


220 

230 


230 -j-HOUPTPROGRAMM 

240 -HAUPTPROGRAMM 


240 -; 

250 


250 -...PRINT (TEXT1) 

260 -...PRINT (TEXT1> 


260 

270 


270 - JSR UPI 

200 - JSR UPI 


280 -; T AUFRUF VON UNTERPROGRAMM 1 

290 t AUFRUF VON UNTERPROGRAMM 1 


290 

300 -; 


300 -...PRINT (TEXT2) 

310 -...PRINT (TEXT2) 


310 -; 

320 


320 - JMP *A474 i WARMSTART 

330 - JMP *0474 i WARMSTART 


330 —; 

340 -| 


340 

350 


350 -l-UNTERPROGRAMM 1 

360 -1 -UNTERPROGRAMM 1 


360 -s 

370 -| 


365 -UPI NOP : BELIEBIGER CODE 

3Ö0 -UPI NUP j BELIEBIGER CODE 


370 -...PRINT (TEXT3) 

390 -...PRINT (TEXT3) 


300 

400 


390 - JSR UP2 

410 -; 


400 -( 1 AUFRUF VON UNTERPROGRAMM 2 

420 


410 

430 -] -CODE VON UNTERPROGRAMM 2 


420 - RTS | UPI VERLASSEN 

440 -j 


430 -; 

450 -UP2 NOP j BELIEBIGER CODE 


440 -j 

460 - LDA (TEXT4) i LOW-BYTE 


450 -| -UNTERPROGRAMM 2 

470 - LDY HXTEXT4) i HIGH-BYTE 


460 -J 

4B0 - JMP STROUT ; TEXTOUSGOBE 


465 -UP2 NOP | BELIEBIGER CODE 

490 -i UND RUECKSPRUNG VOM UNTERPROGRAMM, 


470 -...PRINT (TEXT4) 

500 -| WEIL OM ENDE DER STROUT-ROUTINE 


480 -5 

510 -i EIN RTS-BEFEHL STEHT. 


490 - RTS i UP2 VERLA3SEN 

10000 -J 


500 -» 

1 MM 10 -1 


10000 -j 

10030-( 


1 \aY) 1 W-1 ---- TEXTE 

10020 -j 

10040-TEXT 1 .TX "HIER IST DOS HAUPTPROGRAMM." 


10030-TEXT1 .TX "HIER IST DAS HAUPTPROGRAMM." 

10050-.BY 13,13 i 1 LEERZEILE 

, 

10040-,BY 13,13 1 1 LEERZEILE 

10060-.BV 0 j ENDMARKIERUNG 


10050-.BY 0 ; ENDMARKIERUNG 

10070-; 


10060-; 

10080-TEXT2 .TX "HIER IST WIEDER DAS HOUPTPROGROMM." 


10070-TEXT2 .TX "HIER IST WIEDER DAS HAUPTPROGRAMM." 

10090-.BY 13,13,0 


100B0-.BY 13,13,0 

10100 -: 


10090-; 

10110-TEXT3 .TX "HIER IST DOS UNTERPROGRAMM 1.« 


10100—TEXT3 .TX "HIER IST DAS UNTERPROGRAMM 1." 

10120-.BY 13,13,0 


10110-.BY 13,13,0 

10130-; 


10120 -; 

10140-TEXT4 .TX "HIER IST DOS UNTERPROGRAMM 2." 


10130-TEXT4 .TX "HIER IST DAS UNTERPROGRAMM 2." 

101S0-.BY 13,13,0 


I0I40-.BY 13,13,0 

Listing 6. Die umständliche Methode, 


Listing 7. Die optimierte Methode, 

Unterroutinen aufzurufen 


Unterroutinen aufzurufen 
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lung und die entsprechenden Regeln können Sie dann auf 
jede (!) Programmiersprache übertragen. 

b) Stapelmanipulation 

Wenn Sie »Exbasic Level II« kennen, wissen Sie sicher den 
Befehl »DISPOSE RETURN« zu schätzen. Er dient dazu, ein 
Unterprogramm ohne RETURN abzuschließen. Dadurch 
kann dieses zum Beispiel über GOTO verlassen werden. 

In Assembler ist dies auch möglich. Die Befehlseingabe 
PLA 
PLA 

entspricht in der Wirkung »DISPOSE RETURN«. 

Da die Rücksprungadresse auf den Stapel abgelegt wird 
und dort 2 Byte in Anspruch nimmt, kann sie über PLA:PLA 
wieder vom Stapel geholt werden. Ein Unterprogramm ist 
nach PLA:PLA eigentlich kein Unterprogramm mehr, sondern 
Bestandteil des aufrufenden Programms. PLA:PLA findet vor 
allem in der Fehlerbehandlung Anwendung. An einem späte¬ 
ren Listing werden wir dies noch sehen. Nach PLA:PLA kann 
ein Unterprogramm über JMP verlassen werden. Dies 
machen wir uns zunutze, um den Rücksprung an eine belie¬ 
bige Adresse zu simulieren. Dies ist sonst nicht möglich, da 
bei RTS immer hinter den Befehl gesprungen wird, der das 
Unterprogramm aufgerufen hat. 

Ein RTS an eine beliebige Adresse müßte »RTS XXXX« hei¬ 
ßen, doch diesen Befehl gibt es beim 6510 nicht. So wird er 
aber simuliert: 

PLA - ; holt Rücksprungadresse 

PLA ; vom Stapel und 

JMP $XXXX ; springt nach $XXXX 

So sieht ein Makro dazu aus: 

-MA RTS (RUECKSPRUNGADRESSE) 

PLA 

PLA 

JMP RUECKSPRUNGADRESSE 

-.RT 

Und noch ein Mangel der Unterprogrammbefehle soll 
beseitigt werden: Obwohl es JMP (indirekt) gibt, kennt der 
6510 keinen Befehl wie JSR (indirekt); über Stapelmanipula¬ 
tion ist dies dennoch möglich (siehe dazu auch im 64’er, Aus¬ 
gabe 1/86: Assembler-Bedienung leicht gemacht). 

Nehmen wir an, im Vektor $14/$15 steht die Adresse 
$C000. Nun soll über den $14/$15-Vektor ein Unterpro¬ 
gramm aufgerufen werden (also das ab $C000). Bild 3 zeigt, 
was im einzelnen geschehen muß. 

Die Rücksprungadresse steht zwar in Bild 3 direkt hinter 
dem JMP ($0014)-Befehl, kann aber auch anderswo im Pro¬ 
gramm stehen. 

Folgendes Makro ermöglicht die Simulation von JSR 
(indirekt): 

-. MAJSRIND (VEKTOR, RUECKSPRUNGADRESSE) 
LDA # >(RUECKSPRUNGADRESSE-1) 
PHA 

LDA # < (RUECKSPRUNGADRESSE-1) 
PHA 

JMP (VEKTOR) 

RT 

Diese Simulation von JSR ($XXXX) verwendet auch der 
SYS-Befehl (disassemblieren Sie von SE12A bis SE155 und 
betrachten Sie dazu Bild 3). 

Zuerst holt er die Zahl nach SYS in die Adressen $14/$ 15, 
dann legt er die Rücksprungadresse ($E147) -1 auf dem 
Stack ab. Nun holt er die Register P, A, X, Y aus den Adressen 
$030F, $030C, $030D, $030E. Es folgt ein indirekter 
Sprung über $0014/$0015. 

Nach dem Rücksprung werden die Register wieder im 
Speicher dort abgelegt, woher sie genommen wurden und 
ein Sprung ins Basic wird durchgeführt. 

Später werden wir noch eine weitere Möglichkeit für JSR 



verzweigt dorthin 

Bild 3. Der Algorithmus, um einen JSR (indirekt)- 
Befehl zu simulieren 


(ind) kennenlernen, die aber nicht auf Stapelmanipulation 
beruht. 

c) Vergleich zwischen Unterprogramm und Makro 
bezüglich Geschwindigkeit 

Wenn Sie den Hypra-Ass (oder einen anderen Makro- 
Assembler) besitzen, haben Sie die Möglichkeit, Befehlsfol¬ 
gen als Makros zu definieren. Makros sind deswegen so 
beliebt, weil sie den größten Vorteil von Unterprogrammen 
bieten, nämlich Übersichtlichkeit. Da Makros aber wie »nor¬ 
male« Befehle im Speicher stehen, entfällt der Aufruf über 
JSR und RTS. Dies ist der Grund, weshalb Makros etwas 
schneller (wenige Taktzyklen) als Unterprogramme sind. Das 
Problem, wann Makros und wann Unterprogramme vorteilhaft 
sind, wird später noch aufgegriffen. 

5. Tabellen 


Im allgemeinen Sprachgebrauch werden Tabellen als »geord¬ 
nete Zusammenstellungen von Daten« verstanden. Diese 
Funktion haben sie auch in Computerprogrammen, wo man 
sie daran erkennt, daß Tabellen keinen Befehlscharakter 
haben. 

SMON-Benutzer können mit »FT« ein Programm nach Tabel¬ 
len durchsuchen lassen; dann sucht SMON im Programm 
nach Bytes, die nicht zu Maschinensprachebefehlen ge¬ 
hören. 

Wozu werden nun Tabellen verwendet? 

In der Regel dienen Tabellen einem Computerprogramm als 
»elektronischer Rechenschieber«. So wie das Kopfrechnen 
durch einen Rechenschieber ersetzt werden kann, weil man 
nur in einer geordneten Zusammenstellung von Ergebnissen 
das richtige suchen muß, kann ein Programm aus seinen 
Tabellen denselben Nutzen ziehen: die Berechnungen entfal¬ 
len, die Programmierung wird einfacher. 
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Aus den weniger erforderlichen Berechnungen entsteht 
ein deutlicher Geschwindigkeitszuwachs, der Hauptvorteil 
von Tabellen. Wie man Tabellen einsetzt, erfahren Sie im 
folgenden. 

a) Tabellen aus Rechenergebnissen 

Noch einmal zum Rechenschieber. Es geht beim Kopfrech¬ 
nen viel schneller, 4x10 auszurechnen als 4x7. Bei einem 
Rechenschieber besteht kaum ein Unterschied in der 
»Rechenzeit«. 

Dementsprechend existiert fast kein Algorithmus, dessen 
Ausführungszeit bei unterschiedlichen Parametern immer 
gleich bliebe. Wer den Artikel »Dem Klang auf der Spur (5)« 
(64’er, Ausgabe 5/85, Seite 152 ff.) gelesen hat, weiß, welch 
grobe Differenzen bei Multiplikationen auftreten können. 

Ersetzt (beziehungsweise unterstützt) man einen Algorith¬ 
mus durch eine Multiplikationstabelle, fällt eine einheitlichere 
(und kürzere) Ausführungszeit an. 

Für das Rechnen mit einzelnen Bits in einem Byte werden 
oft die Zweierpotenzen benötigt; es empfiehlt sich, diese als 
Tabelle anzulegen: 

1000 Zweierpotenzen als Tabellle 

1010 im DOS der Floppy 1541 ab $EFE9 

1020 zu finden 

1030 ZWEIPOT .BY 210, 211, 212, 213, 214, 

215, 216, 217 

Folgende Unterroutine legt im Akkumulator den Wert 2tA 
ab, wobei mit A der Inhalt des Akkumulators bei Aufruf der 
Routine gemeint ist: 

10000 

Subroutine zur Berechnung von 
21A (Ergebnis kommt in den Akku) 


10010 

10020 

10030 

10040 

10050 

10060 


TAX ; Akku in Indexregister 
LDA ZWEIPOT,X; aus Tabelle einiesen 
RTS ; Das war’s schon! Wer ein 
schnelleres und zugleich so einfaches 
Verfahren kennt, möge sich melden... 
10070 - ZWEIPOT 

.BY 2 t 0,2 t 1,2 t 2,2 t3,2 t 4,2 t 5,2 t 6,2 t 7 
Wenn A größer als 7 ist, liefert das Programm falsche Werte. 
Sie können es noch erweitern, wenn Sie es für nötig halten. 


100 -.LI 1,3,0 

110 -.BA »C000 ; START: SYS 49152 
120 

130 RECHNUNG MIT FLIESSKOMMAWERTEN 
140 

IS« —- QL MEMFAC - SBBA? 

160 -.GL FACOUT - *AABC 

170 -.GL SQRFAC - *BF71 

180 -.BL LQGNAT - *B9EA 

190 -| 

200 -.MA HOLE (ADRESSE) * MAKRO-DEF. 

210 - LDA #<(ADRESSE)j HOLT MFLPT-ZAHL 

220 - LDY #>(ADRESSE); VON ADRESSE IN 

230 - JSR MEMFAC ,• DEN FAC 

240 -.RT 

250 -| 

260 -| 

270 -...HOLE (BSP Z AHL) 

280 -j 


290 

- 


JSR FACOUT 

1 AUSDRUCKEN 

300 

-1 




310 


.HOLE 

(BSPZAHL) 


320 

“8 




330 

- 


JSR SQRFAC 

? QUADRATWURZEL 

340 

—■ 




350 

- 


JSR FACOUT 

j AUSDRUCKEN 

360 

“I 




370 


.HOLE 

(BSPZAHL) 


380 





390 

- 


JSR LOGNAT 

; LOGARITHMUS NATURALIS 

400 





410 



JMP FACOUT 

S AUSDRUCKEN 

500 

“8 





510 -; BEISPIELZAHL 1.23456 

520 -; IM MFLPT-FORMAT 

530 -; 

540 -BSPZAHL .BY *81,* IE,«06,*0F,*E5 
550 -; 

Listing 8. Fließkommazahlen in Assembler verarbeiten 


b) Tabellen aus Fließkommawerten 

Zu den zeitraubendsten Operationen gehört die Rechnung 
mit Fließkommazahlen. Daß diese selbst in Maschinenpro¬ 
grammen lähmend wirkt, sehen Sie am HiRes-3-Befehl 
»FUNKT« (64'er, Ausgabe 3/85, Grafikkurs-Anwendung). 
Daher sollte man nur dann auf die Fließkommaroutinen zugrei¬ 
fen, wenn es unvermeidbar ist. Berechnen Sie soviele Werte 
wie möglich voraus, hierfür eignet sich der Direktmodus des 
Basic-Interpreters besonders gut! Wie Sie einen auf diese 
Weise berechneten Wert ins MFLPT-(Floating Point)Förmat 
umwandeln können, zeigt Ihnen der folgende Kasten. 


Verfahren zur Umwandlung einer Zahl ins 
MFLPT-Format 

1. SMON (oder anderen Monitor) laden 

2. RESET auslösen oder NEW eingeben 

3. »XX = Fließkommazahl« eingeben, zum Beispiel 
»XX = 1.23456« 

4. Monitor starten (SYS 49152) 

5. »M 0805 0809« eingeben 

Sie sehen nun in den Adressen $0805 - $0809 die 
MFLPT-Darstellung der Zahl, mit der Sie die Variable XX 
belegt haben. 


Damit wir uns unter Zuhilfenahme präziser Fachausdrücke 
und Abkürzungen verständigen können, sollten Sie den 
Abschnitt in »Assembler ist keine Alchimie« aufmerksam 
lesen, der sich mit Fließkommazahlen befaßt. Nach dem Stu¬ 
dium dieses Abschnitts sollten Ihnen Begriffe wie »MFLPT«, 
»FAC« oder »ARG« geläufig sein. 

Im Falle der Zahl 1.23456 erhalten wir als Ergebnis: 

.0305 81 1E06 0FE5... 

Diese Werte legen wir folgendermaßen als Tabelle ab: 

540 -BSPZAHL .BY $81, $1E, $06, $0F, $E5 
Wie wir nun diese Zahl verarbeiten, zeigt Ihnen Listing 8. 
Das Makro (200 - 240) stützt sich auf die Interpreter-Routine 
MEMFAC, die eine Zahl (Adresse wird in Akku/Y-Register 
übergeben) vom Speicherformat MFLPT in den FAC als FLPT- 
Zahl schreibt und dabei die erforderliche MFLPT- —FLPT- 
Umwandlung durchführt. 

In der Tabelle in Zeile 540 können Sie beliebige Fließkom¬ 
mawerte (sofern Sie diese wie angegeben berechnet haben) 
einsetzen, das Programm rechnet dann mit der jeweiligen 
Fließkommazahl, die ab BSPZAHL im MFLPT-Format steht. 

Diese Zahl wird zunächst nur in den FAC geladen und der 
FAC wird dann ausgedruckt (270 - 290), dann wird die Zahl 
wieder geholt, die Wurzel berechnet und ausgegeben (310 - 
350). Schließlich wird die Zahl wieder in den FAC geholt, der 
natürliche Logarithmus errechnet und auch ausgegeben 
(370-410). 

Zur Routine FACOUT sind, außer daß sie den Inhalt des FAC 
ausgibt, noch zwei Bemerkungen zu machen: 

1. Nach der Zahl wird noch ein CARRIAGE RETURN aus¬ 
gegeben. 

2. Nach dem Aufruf von FACOUT hat sich der Inhalt des FAC 
aufgrund mehrerer Divisionen durch Zehnerpotenzen 
verändert. 

Auf das Thema »Fließkommaarithmetik« geht Texteinschub 
1 noch näher ein. Dort werden auch weitere Interpreter- 
Routinen vorgestellt. 

c) Sprungtabelle 

Beim Thema »Unterprogramme« wurde Ihnen eine 
Methode vorgestellt, um JSR (ind) zu simulieren. Diese 

erweist sich in Verbindung mit einer Tabelle, in der die Sprung¬ 
adressen gespeichert sind, als sehr nützlich. So kann bei¬ 
spielsweise eine Parallele zum Basic-Befehl ON...GOSUB 
ZIEL1,ZIEL2.... geschaffen werden. 
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Ein Beispiel: Wenn der Basic-Interpreter auf einen Basic- 
Befehl trifft, holt er aus der Tabelle $AOOC - $A09D die 
Adresse der zugehörigen Routine. Diese springt er dann 
durch Stapelmanipulation an. 

Der SMON arbeitet genauso: Seine Sprungtabelle liegt im 
Bereich $C02B - $C06B. 

Die Anwendung von Sprungtabellen werden wir noch aus¬ 
führlich im folgenden Abschnitt d) sowie bei der Besprechung 
von Listing 11 behandeln. 

d) Vergleichstabellen 

Weder der SMON noch der Basic-Interpreter benutzen 
zum Suchen der zum jeweiligen Befehl gehörenden Routine 
eine Reihe von CMP-Abfragen mit BRANCH-Befehlen. Auch 
für die Vergleichswerte (in diesem Fall die Befehlswörter) gibt 
es eine Tabelle: Beim SMON liegt sie im Bereich $COOB - 
$C02A, beim Basic-Interpreter SA09E - $A327. 

Sprung- und Vergleichstabellen sind in gleicher Befehls¬ 
folge angeordnet; wird der Befehl an einer bestimmten Stelle 
in der Vergleichstabelle gefunden, erfolgt ein Sprung an die 
Adresse, die an gleicher Stelle in der Sprungtabelle steht. 

So sehen die Befehls- und Vergleichstabellen im SMON aus: 


C30A DEX 

C308 BNE $C305 

C30D BEQ $C2D1 

C30FJSR$0315 

C312 JMP$C2D6 


Spalte Nr. 

1 

2 

3 

4 


Befehl 

/ 

# 

$ 

% 


Sprungadr. $ 

CADB 

0920 

0908 

C91C 



0315TXA 


Die Sprungadressen sind wegen der Stapelmanipulation in 
der Tabelle ab $002 B um 1 dekrementiert gespeichert; in der 
Darstellung sehen Sie aber das tatsächliche Sprungziel. 

Wir werden jetzt anhand des SMON die Verwendung einer 
Vergleichs-Sprungtabelle in Assembler erläutern. 

Wenn wir die zum Befehl »#« gehörende Sprungadresse 
finden wollen, gehen wir folgendermaßen vor: 

1. Wir suchen in Reihe 2 das # -Zeichen. 

2. Wir gehen (in derselben Spalte) eine Reihe nach unten und 
finden dort die Sprungadresse ($C92C). 

Der Computer hat nicht die Möglichkeit, direkt eine Reihe 
weiter unten die Suche fortzusetzen. Er muß einen Umweg 
wählen und sich die Spalte merken. Ein Beispiel: 

1. Der SMON sucht unter den Elementen aus Reihe 2 das 
»#«. In einem Zähler merkt er sich die Spalte, in der der 
Befehl gefunden wurde. 

2. Nun sucht er in Reihe 3 in der Spalte, die im Zähler steht, 
die zugehörige Sprungadresse. 

Wie ähnlich beide Suchvorgänge sind, erkennen Sie daran, 
daß jedesmal die Hauptschritte 1. und 2. Vorkommen. 

Nach so viel Theorie sehen wir uns nun umso ausführlicher 
die Routine im SMON an, die für die Steuerung der 
Vergleichs-Befehlstabelle verantwortlich ist. Dazu können 
Sie »D 0303 0323« eingeben. 

Bei Adresse $0303 steht im Akku der ASCII-Code des 
Kommandos, das der SMON ausführen soll (zum Beispiel 
$40, wenn ein M-Befehl eingegeben wurde). 


0316 ASL 
0317 laX 


0318 INX 

C319LDA $0029, X 


C31CPHA 

C31DDEX 


C303LDX#$20 32-1 Befehle müssen durchsucht 

werden. Weshalb »-1« erforderlich 
ist, liegt an der Schleifenstruktur und 
ist unbedeutend. 


0305 CMP $COOA,X Akku (enthält Befehl) mit X-tem Ele¬ 
ment der Befehlstabelle verglei¬ 
chen; $COOA = Befehlstabelle -1, 
weil Adresse $COOA nie zum Ver¬ 
gleich herangezogen wird. 

0308 BEQ $C30F Vergleich positiv; im X-Register steht 

jetzt die Spalte. 


C31ELDA $0029,X 

0321 PHA 
0322 RTS 


Zähler wird dekrementiert; es han¬ 
delt sich hier um eine »Dekremen- 
tierschleife« (dieses Thema wird 
noch behandelt). 

Wenn der Zähler noch nicht gleich 0 
ist, folgt ein Sprung zum Schleifen¬ 
beginn. 

Wenn X=0, dann wurde die ganze 
Tabelle durchsucht, und der Befehl 
nicht gefunden! Deshalb wird in 
die SMON-Fehlerbehandlung ge¬ 
sprungen. 

Diese Stelle wird von $0308 aus 
angesprungen; hier wiederum steht 
ein Aufruf des Unterprogramms ab 
$0315, das etwas weiter unten 
besprochen wird. 

Nachdem nun der Befehl durch die 
Subroutine $0315 abgearbeitet 
wurde, folgt ein Sprung zur Eingabe 
des nächsten Befehls. 


Das ist sie, die Subroutine! Weil im 
X-Register die Nummer des Befehls 
(= Spalte in Tabelle) steht, kommt 
das X-Register ins Hauptrechen¬ 
register. 

Die Befehlsnummer wird mit 2 multi¬ 
pliziert.. . 

und kommt wieder ins X-Register. 
Die Multiplikation mit 2 ist erforder¬ 
lich, weil in der Sprungtabelle ein 
Element doppelt so lang ist, wie in 
der Vergleichstabelle, nämlich 
2 Byte. Die Sprungadressen be¬ 
legen deshalb 2 Byte, weil sie aus 
Low- und High-Bytes bestehen. 

Das X-Register wird um 1 erhöht, da 
das High-Byte eine Position hinter 
dem Low-Byte steht. 

High-Byte wird gelesen. Die Sprung¬ 
tabelle beginnt zwar 2 Byte nach 
$0029, aber weil es keine Spalte 0 
gibt, muß der Speicherbedarf einer 
Sprungadresse ( = 2) abgezogen 
werden. 

Das High-Byte der Adresse wird auf 
den Stapel gelegt. 

-1, weil Low-Byte eine Adresse vor 
High-Byte steht. 

Nun wird auch das Low-Byte der 
Adresse 

auf den Stapel geschoben. 

Der Befehl RTS wird hier zur Simula¬ 
tion von JMP (ind) verwendet. Auf 
dieses (unpraktische) Verfahren soll 
nicht weiter eingegangen werden, 
weil der 6510 den Befehl JMP (ind) 
kennt. Wichtig ist für uns nur, daß 
jede SMON-Routine mit einem RTS 
abgeschlossen wird, dann erfolgt 
ein Rücksprung zur Adresse $0312. 
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Damit haben wir SMONs Schleife zum Suchen eines 
Befehls und dessen Routine durchleuchtet. Sofern Sie ein 
ROM-Listing zur Verfügung haben, können Sie sich zusätz¬ 
lich die entsprechenden Stellen im Basic-Interpreter anse- 
hen. Dieser aber benötigt wegen seiner unterschiedlich lan¬ 
gen Befehle einen etwas komplizierteren Suchalgorithmus, 
was wiederum zu erheblich höherer Ausführungszeit bei¬ 
trägt. 

6. Vergleiche von Prüfsummen 


Nun lernen wir ein besonders raffiniertes Vergleichsverfahren 
kennen: 

Wie gesagt, benötigen Vergleiche mit Wörtern, die aus 
unterschiedlich vielen Zeichen bestehen, mehr Taktzyklen. 
Dies wäre nicht so, wenn wir alle Zeichen auf eine einheitliche 
Länge bringen würden. Genau dies tut der Basic-Interpreter: 
Bei Eingabe einer Zeile wandelt er alle Basic-Befehlswörter in 
Token um. Jedes Token vertritt einen Befehl und kann, da es 
nur ein Byte benötigt, schneller erkannt werden, als es bei 
mehreren Bytes möglich wäre. 

Ein Nachteil ist jedoch der Speicherplatzaufwand; für die 
Umwandlung müssen die Befehle irgendwo im Speicher in 
Langform vorhanden sein. 

Es gibt aber noch ein anderes Verfahren, einer Zeichen¬ 
kette einen Wert zuzuweisen: Die Prüfsummenberechnung. 
Diese führen zum Beispiel die Eingabehilfen »Checksummer« 
und »MSE« durch: Aus 8 Byte Programmcode und 2 Byte 
Adresse errechnet der MSE eine 1 Byte Prüfsumme. 

In Bild 4 sehen Sie einen sehr zuverlässigen Algorithmus 
zur Berechnung von Prüfsummen (insofern zuverlässig, als er 
sehr unterschiedliche Prüfsummen ermittelt). Listing 9 stellt 
ein Hilfsprogramm dar, das zu einer Eingabe die Prüfsumme 
nach dem Algorithmus aus Bild 4 errechnet. 

In Listing 9 ist Ihnen eventuell die Routine NUMOUT nicht 
bekannt. Daher eine Kurzbeschreibung: NUMOUT gibt eine 
positive Integerzahl, die im Akkumulator (High-Byte) und im X- 
Register (Low-Byte) übergeben wird, aus. NUMOUT wird 
zum Beispiel von der LIST-Routine bei der Ausgabe einer 
Zeilennummer aufgerufen. 

Die Routine BASIN soll ebenfalls erklärt werden, da sie in 
allen folgenden Programmen verwendet werden wird. Wenn 
die Routine BASIN zum ersten Mal aufgerufen wird, erwartet 
das Betriebssystem eine Eingabe (normalerweise von Tasta¬ 
tur), die der Eingabe einer Basic-Zeile entspricht. Nach der 
Eingabe wird das erste eingegebene Byte in den Akku gela¬ 
den, jeder weitere Aufruf von BASIN holt das nächste Zeichen 
in den Akku. Wurden alle Bytes eingelesen, wird im Akku der 
Wert 13 ($0D, RETURN) übergeben. Danach führt ein weite¬ 
rer Aufruf von BASIN zu erneuter Eingabe von Tastatur. 

Ein großer Vorteil von Prüfsummen ist, daß die Vergleiche 
mit nur einem Byte, nämlich der Prüfsumme, durchgeführt 
werden müssen. 

Wie man in den Genuß dieses Vorteils kommt, zeigt Listing 
10. Wenn Sie den Namen eines Computers (C 64, VC 20, PC 
128 oder AMIGA) eingeben, nennt das Programm den in die¬ 
sem Computer installierten Mikroprozessor. Bei der Eingabe 
der Computernamen kann man aufgrund der Zeilen 230 und 
248 beliebig viele Leerzeichen eingeben. Bei der Errech¬ 
nung der Prüfsummen mit Listing 9 dürfen allerdings keine 
eingegeben werden, da Listing 9 diese nicht überliest und 
somit ein falsches Ergebnis liefern würde. 

Der Programmteil, der die Prüfsumme der Eingabe berech¬ 
net, ist mit Ausnahmen der Zeilen 230/240 aus Listing 9 
übernommen worden. Nach Zeile 450 wird die ermittelte 
Prüfsumme mit der Tabelle »PRÜFSUMMEN« (Zeile 2060) 
verglichen. 

Bei »WEITER2« (Zeile 620) steht im X-Register die Spalte, 


100 

-.LI 1,3,0 



110 

-.BA 4C000 

; START: SYS 

49152 

120 

-j 



130 

—.GL BASIN 

- »FFCF 


140 

-.QL NUMOUT - »BDCD 


150 

-.GL STROUT * *AB1E 


160 




170 

-ANFANG 

l-DA #< (TEXTl ) 


1 B0 

- 

LDY #> (TEXTl ) 


190 

- 

JSR STROUT 


200 

"I 



210 


LDX «0 


220 

-SCHLEIFEI 

JSR BASIN 


230 

- 

CUP #13 

l 13 * RETURN 

240 

- 

BEO WEITER 


250 

- 

STA STORE.X 


260 

- 

INX 


270 

- 

JMP SCHLEI FEI 


280 

-1 



290 

-WEITER 

STX LAENGE 


300 

- 

LDA #< (TEXT2) 


310 

- 

LDY #> (TEXT2) 


320 

- 

JSR STROUT 


330 

- 

LDA «0 


340 

-10- AlJSGANGSWERT DER 

PRUEFSUMME 

350 

- 

TAX 

5 ZAEHLER - 0 

360 

-SCHLEIFE2 

ROL 

* PRUEFSUMME # 2 

370 

- 

EOR STORE,X 

300 

- 

INX 

j ZAEHLER ERHOEHEN 

390 

- 

CPX LAENGE 


400 

— 

BNE SCHLEIFE2 


410 

- 

CLC 


420 

- 

ADC LAENGE 

; LAENGE ADDIEREN 

430 

— 

TAX 

; PRUEFSUMME 

440 

- 

LDA #0 

; AUSGEBEN 

450 

- 

JSR NUMOUT 


460 

- 

JMP ANFANG 

; NOCH EINMAL 

1000 

“1 



1010 

-? TEXTE 



1020 

-i 



1030 

-TEXTl 

.BY 13 










1050 

-,TX "EINGABE ? " 


1060 

-.BY 0 



1070 




1080 

-TEXT2 

.BY 13 


1090 

-.TX "PRUEFSUMME " 


1100 

-.BY 0 



2000 




2010 

-s ZWISCHENSPEICHER 


■ ' fl 

-LAENGE 

.BY 0 

; ZWISCHENSPEICHER 

2040 

-STORE 

.BY 0 


2050 

f AB STORE WIRD DIE EINGABE ABGELEGT 

Listing 9. Die Berechnung von Prüfsummen 



Bild 4. Das Flußdiagramm zur Prüfsummenberechnung 
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in der die Prüfsumme gefunden wurde. Listing 10 numeriert, 
im Gegensatz zum SMON die Spalten mit 0 (statt mit 1) begin¬ 
nend. Außerdem wurde die Adressentabelle in »LOWTAB« 
(Tabelle der Low-Bytes) und »HIGHTAB« (High-Bytes) zerlegt, 
was die Programmierung stark erleichtert. 

Wir würden zwar Spalten von 1 an numerieren, für den 
Computer ist es aber besser, mit Spalte 8 zu beginnen. Wenn 
im X-Register die Spalte (0: VC 20,1: C 64, 2: PC 128, 
3: AMIGA) steht, lesen die Zeilen 620/630 aus einer Tabelle 
die Adresse, ab der die ASCII-Darstellung des Prozessors zu 
finden ist. Weil jede der Tabellen »LOWTAB« und »HIGHTAB« 
gleich viele Elemente wie die Tabelle »PRUEFSUMMEN« hat, 
muß keine komplizierte Umwandlung über Multiplikation mit 
2 oder ähnliches erfolgen wie beispielsweise beim SMON. 

Auf eine akute Gefahr bei der Verwendung von Prüfsum¬ 
men soll jetzt hingewiesen werden: die »Überschneidung von 
Prüfsummen«: 

So wie unterschiedliche Basic-Zeilen beim Checksummer 
eine gleiche Prüfsumme haben können, sind Prüfsummen nie 
eindeutig. 

Wenn Sie bei Listing 10 etwas herumprobieren, werden Sie 
sicher feststellen, daß auch eigentlich nicht vorgesehene 
Eingaben Wirkung zeigen. Dies liegt daran, daß diese Einga¬ 
ben die gleiche Prüfsumme wie die Taste »VC 20«. »C 64«, 
»PC 128« oder »AMIGA« haben. Daher sollte man immer dar¬ 
auf achten, daß sich die vorgesehenen Eingaben nicht in 
ihren Prüfsummen überschneiden (das heißt, die gleichen 
Prüfsummen haben). Wenn man dies aber beachtet, so ist 
das Arbeiten mit Prüfsummen, vor allem bei kleineren Daten¬ 
mengen, eine angenehme Sache, 
e) Beispielprogramm für Tabellen 

Wenden wir uns jetzt einem etwas größeren (aber keines¬ 
wegs komplizierteren) Programm zu. Es heißt schlicht und 
einfach »TABELLEN-BEISPIEL«, womit schon einiges über 
die Funktion ausgesagt ist: ein reines Beispielprogramm, das 
nicht den Anspruch erhebt, etwa als Anwendersoftware nütz¬ 
lich zu sein. In Listing 11 finden Sie den kommentierten Quell¬ 
text. 

Zuerst soll die Bedienung des Programms erläutert wer¬ 
den. Gestartet wird »TABELLEN-BEISPIEL« durch SYS 
49152, worauf man sich in folgendem Menü befindet: 

ZAHL IN ZAHLWORT WANDELN (0) 

BILDSCHIRMFARBE (1) 

RESET AUSLOESEN (2) 

PROGRAMMENDE UEBER RTS (3) 

BITTE AUSWAEHLEN! 

Die Zahlen in Klammern sehen Sie nicht, diese zeigen nur die 
interne Numerierung der Menüpunkte an. 

Der jeweils angewählte Menüpunkt (unmittelbar nach dem 
Start: 0) wird im Gegensatz zu den anderen revers hervor¬ 
gehoben. 

Der angewählte Menüpunkt kommt durch Drücken von 
Fl,RETURN,»—« - oder »=«-Taste zur Ausführung. 

Wollen Sie einen anderen Menüpunkt anwählen, drücken 
Sie einfach CRSR DOWN,»D«,F5 oder»+«, um den invertier¬ 
ten Bereich nach unten zu bewegen. Weiter nach oben gelan¬ 
gen Sie über CRSR UP,»U«,F3 oder»-«. 

Wenn Sie von »3« aus nach unten wollen, geht es wieder bei 
»0« los; von »0« nach oben führt auf Punkt »3«. 

Auf Punkt »0« (Ausgangseinstellung) kommen Sie über 
HOME,»0« oder Klammeraffe. 

Sicher würden Sie Ihre Programme auch gerne mit einem 
solch komfortablen Menü aufwerten. Wenn Sie die Beschrei¬ 
bung des Quelltextes gut durchlesen, wird dies keine 
Schwierigkeiten bereiten. 

Nun zu den einzelnen Menüpunkten. 

»2« (Reset auslösen) springt in die RESET-Routine ab 
$FCE2. »3« (Programmende über RTS) bewirkt einen Rück¬ 
sprung ins Basic. Wenn Sie aber »TABELLEN-BEISPIEL« vom 


100 

-.LI 1,3,0 


110 

-.BA *C000 

i START: SYS 49152 

120 

-j 


130 

-.GL BASIN 

- *FFCF 

140 

-.GL NUMCHJT = *BDCD 

150 

-.GL STRGUT - 4AB1E 

160 



170 

-ANFANG 

LDA «<(TEXTl) 

100 

— 

LDY #>(TEXTl) 

190 

- 

JSR STROUT 

200 



210 

- 

LDX f»0 

220 

-SCHI-EIFEl 

JSR BASIN 

230 

- 

CMP " ; SPACE? 

240 


BEO SCHLEIFEI i DANN UEBERLESEN 

250 

- 

CMP «13 j 13 = RETURN 

260 

- 

BEO WEITER1 

270 

- 

STA STORE,X 

2Q0 

- 

INX 

290 

- 

JMP SCHLEIFEI 

300 

“1 


310 

-WEITER1 

STX LAENGE 

320 

- 

LDA #<(TEXT2) 

330 

— 

LDY #>(TEXT2) 

340 

- 

JSR STROUT 

350 

- 

LDA «0 

360 

-I 0 - AUSGANGSWERT DER PRUEFSUMME 

370 

- 

TAX ; ZAEHLER - 0 

300 

-SCHLEIFE2 

ROL | PRUEFSUMME • 2 

390 


EOR STORE,X 

400 

- 

INX | ZAEHLER ERHOEHEN 

410 

~ 

CPX LAENGE 

420 

— 

BNE SCHLEIFE2 

430 

~ 

CLC 

440 


ADC LAENGE ! LAENGE ADDIEREN 

450 

-S HIER STEHT DIE PRUEFSUMME IM AKKU 

460 

“5 


470 


LDX *»0 

480 

-SCHLEIFE3 

CMP PRUEFSUMMEN,X 

490 

— 

BEQ WEITER2 

500 

— 

INX 

510 

- 

CPX #4 

520 

- 

BNE SCHLEIFE3 

530 

-S PRUEFSUMME NICHT GEFUNDEN 

540 



550 

- 

PLA 

560 

- 

PLA 

570 

- 

LDA #<(TEXT3) 

580 

— 

LDY #>(TEXT3) 

590 

- 

JSR STROUT 

600 

— 

JSR ANFANG ; VON VORNE 

SS 

-WEITER2 

LDA LOWTAB,X ; LOW-BYTE 

630 

- 

LDY HIGHTAB,X : HIGH-BYTE 

640 

- 

JSR STROUT 

650 

— 

JMP ANFANG : NOCH EINMAL' 

660 

”1 


1000 



1010 

TEXTE 


1020 



1030 

1040 

1050 

—TEXTl 

.BY 13 

-.TX "COMPUTER : " 

1060 

-.BY 0 


1070 



1080 

-TEXT2 

.BY 13 

1090 

-.TX "PROZESSOR: " 

1100 

-.BY 0 


1110 



1120 

-TEXT3 

.TX "WEISS ICH NICHT!" 

1130 

-.BY 0 


1140 

-1 


1 150 

“1 


1 160 

—T6502 

.TX "MOS 6502" 

1170 

-.BY 0 


1180 



1190 

-T6510 

.TX "MÜS 6510" 

1200 

-.BY 0 


1210 

-| 


1220 

-T8502 

.TX "MOS B502 fc ZB0" 

1230 

-.BY 0 


1240 

-| 


1250 

-T68000 

.TX "MOTOROLA 6B000” 

1260 

-.BY 0 


1270 

- j 


2000 

-i 


2010 

-s NUMERISCHE TABELLEN 

2020 

-| 


2030 

-LOWTAB 

.BY <(T6502),<(T6510),<(TB502),<(T60000) 

2040 

-HIGHTAB 

• BY XT6S02) , XT6510) , XTB502) .XT6B000) 

2050 

-1 


2060 

-PRUEFSUMMEN .BY 228,B3,149,136 

2070 

-! REIHENFOLGE: VC20,C64,PC12B,AMIGA 

3000 

-I 


3010 

-* ZWISCHENSPEICHER 

3020 

“1 


3030 

-LAENGE 

-BY 0 j ZWISCHENSPEICHER 

3040 

-STORE 

.BY 0 

3050 

-f T AB STORE WIRD DIE EINGABE ABGELEGT 

Listing 10. Eine Anwendung 
der Prüfsummenberechnung 
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Hypra-Ass aus gestartet haben, finden Sie sich im »AUTO- 
NUMBEFU-Modus wieder. Dies ist weder ein Fehler von 
»TABELLEN-BEISPIEL« noch von Hypra-Ass, sondern liegt 
daran, daß beide Programme eine bestimmte Adresse ver¬ 
wenden, die Hypra-Ass dann als Aufforderung zur automati¬ 
schen Zeilennumerierung wertet. Am besten starten Sie 
»TABELLEN-BEISPIEL« nur vom normalen Basic aus. 

Punkt »0« bittet Sie um Eingabe einer Zahl von 0 bis 9 und 
gibt zur eingegebenen Zahl das Zahlwort aus. Beispiel: Ein¬ 
gabe »0«, Ausgabe »NULL«. 

Danach müssen Sie eine Taste drücken, um ins Hauptmenü 
zu kommen. 

Punkt »1« schließlich bietet die Möglichkeit, die Hinter¬ 
grundfarbe besonders elegant einzustellen: Sie geben ein¬ 
fach die Farbe als Wort ein, zum Beispiel SCHWARZ. 

Folgende Eingaben sind vorgesehen: 

SCHWARZ,WEISS,ROT,TUERKIS,VIOLETT,GRUEN,BLAU, 
GELB,ORANGE,BRAUN,HELLROT,GRAU 1.GRAU 2, 
HELLGRUEN,HELLBLAU,GRAU 3 

Aufgrund der Überschneidung von Prüfsummen zeigen 
jedoch auch andere Eingaben Wirkung, zum Beispiel: 

SCH,HYPRA ASS,PRINT,COMPUTER-GRAPHIK, 
TAGESSCHAU 

Nun wollen wir uns mit dem Quelltext befassen. 

Ab Zeile 10000 finden Sie die Tabellen. Und weil unser Pro¬ 
gramm ein Beispiel für die Verwendung von Tabellen sein soll, 
sind es derer recht viele. Die wichtigsten davon sind jedoch 
analog der internen Numerierung der Menüpunkte aufge¬ 
baut, da sie Daten für die Menüsteuerung beinhalten. Diese 
Tabellen sind auch mit 0 - 3 numeriert und grafisch in Bild 6 
dargestellt. 

Sehen wir uns wieder den Quelltext, beginnend mit der 
ersten Zeile, an. 

Auf die Symboldefinitionen (210 - 260) folgt die Initialisie¬ 
rung der Hauptschleife (280 - 310). Diese Initialisierung 
löscht Bildschirm (280) und Tastaturpuffer (290 - 300). 
Außerdem wird der aktuelle (= derzeit invers dargestellte) 
Menüpunkt (immer in der Adresse »MPT« enthalten) auf 0 
gesetzt (310). Zeile 310 ist also dafür verantwortlich, daß 
nach dem Start über SYS 49152 das Inversfeld ganz oben 
steht (auf Punkt 0). 

Die Texte, die der Beschreibung der Menüpunkte dienen, 
werden in der Hauptschleife »HSCHLEIFE« (350 - 550) aus¬ 
gegeben. Mit dieser wollen wir uns nun eingehend auseinan¬ 
dersetzen. 

Zunächst wird die Tabelle »RVSTAB« gelöscht (350 - 400). 
Diese Tabelle enthält die Information, ob der erläuternde Text 
zu einem Menüpunkt invers ausgegeben wird. Wenn nein, so 
enthält das entsprechende Byte eine »0«, andernfalls eine 
»18« (= REVERS-ON-Code für Betriebssystem). Das ent¬ 
sprechende Byte aus »RVSTAB« braucht nur vor dem 
Menüpunkt-Textausgegeben werden (470-480). Die Zeilen 
410 - 430 sorgen dafür, daß das Byte in »RVSTAB«, welches 
sich auf den aktuellen Menüpunkt bezieht, den RVS-ON- 
Code erhält. 

In der Hauptschleife muß das X-Register in »XSAVE« gesi¬ 
chert werden, weil die Routine »STROUT« den Inhalt des 
X-Registers ändert. 

Mit »TASTE« (610) beginnt dann die Tastaturabfrage im 
Menü. Die Routine »GET« holt ein Zeichen von der Tastatur als 
ASCII-Code in den Akku. Wurde keine Taste gedrückt, erhält 
der Akku den Code 0. In diesem Fall wartet 620 auf eine neue 
Eingabe. Beachten Sie bitte, daß der Akku nach der Zeile 620 
NIE den Wert 0 haben kann (dies wird sich bald als nützlich 
erweisen)! 

Wurde nun eine Taste gedrückt, sucht »SCHLEIFE« (630 - 
680) in der Tabelle »TASTEN«, die im Quelltext ab Zeile 10210 
steht, nach dem eingegebenen Zeichen (wird es nicht gefun¬ 
den, erfolgt in 690 der Sprung zur neuen Eingabe). 


100 

110 

120 

130 

140 

150 

160 

170 

100 

190 

200 

210 

220 

230 

240 

250 

260 

270 

200 

290 

300 

310 

320 

330 

340 

350 

360 

370 

300 

390 

400 

410 

420 

430 

440 

450 

460 

470 

400 

490 

500 

510 

520 

530 

540 

550 

560 

570 

500 

590 

1'*'* 


-.BA *C000 ; START: SYS 49152 
"5 

*»»*#»»»#»«****»#»#***»ii» 
-J * * 

* TABELLEN - BEISPIEL * 


-? * 

-* * BY FLORIAN MUELLER 
—; » 


-.GL STROUT - *AB1E 

-.GL CURSORHONE - $E566 

-.GL GET - *FFE4 

-.GL BASIN - *FFCF 

-.GL BASOUT - *FFD2 

-.GL RESET - *FCE2 p SOFTWARE-RESET 


- PRINT CHR*(147) 

TASTATURPUFFER 

LOESCHEN 


-START JSR *E544 

LDA «»0 
STA 198 
STA MPT 

-| f SETZT AKTUELLEN MENUEPUNKT AUF 0 
-HSCHLEIFE JSR CURSORHOME 
-; T HSCHLEIFE - HAUPTSCHLEIFE 
LDA #0 
TAX 

SCHLEIFEI STA RVSTAB,X 
INX 

CPX #4 

BNE SCHLEIFEI 
LDX MPT 
LDA #18 
STA RVSTAB,X 
LDX t*0 

SCHLEIFENZAEHLER INITIALISIEREN 


X 18 - REVERS EIN 


-I 1 

-SCHLEIFE2 STX XSAVE 

LDA RVSTAB,X 
JSR BASOUT 
LDA TEXTLO,X 
LDY TEXTHI,X 
JSR STROUT 
LDX XSAVE 
INX 

7 CPX #4 

BNE SCHLEIFE2 

“5 

-! 


t X RETTEN 


ERKLAERUNG 
ZUM MENUEPUNKT 
AUSGEBEN 
X WIEDER HOLEN 


HIER IST DAS MENUE BEREITS AUF 
DEN BILDSCHIRM AUSGEGEBEN WORDEN. 



-TASTE 

JSR 

GET 

1 

TASTATURABFRAGE 

620 

— 

BEQ 

TASTE 

; 

WARTEN AUF TASTENDRUCK 

630 

- 

LDX 

«0 



640 

-SCHLEIFE3 

CMP 

TASTEN,X 



650 

- 

BEQ 

WEITER1 



660 

- 

INX 




670 

- 

CPX 

#16 



680 

- 

BNE 

SCHLEIFE3 



690 

- 

JMP 

TASTE 



700 

-WEITER1 

TXA 




710 

- 

LSR 


; 

DIVIDIERT AKKU¬ 

720 

- 

LSR 


; 

MULATOR DURCH 4 

730 

- 

TAX 




740 

- 

LDA 

SPILO,X 



750 

- 

STA 

SPRUNG 



760 

- 

LDA 

SP1HI,X 



770 

- 

STA 

SPRUNG*1 



700 

“5 





790 

-.EQ RUECK5PRUNG - HSCHLEIFE 

:-i 


000 

Qia 


-| !• 


LEGT RUECKSPRUNGADRESSE DES 

UNTEHPROßflAMMa TCOT. 


820 





030 

- 

LDA #>(RUECKSPRUNG) 

040 

— 

PHA 



050 

- 

LDft »<(RUECKSPRUNG) 

060 

- 

PHA 



870 

- 

JMP (SPRUNG) 



800 





890 





900 

-HOME 

LDX #0 



910 

- 

STX MPT 



920 

-ENDE 

RTS 

I 

ENDE DES UNTERPRG 

930 

-p 




940 

-DOWN 

LDX MPT 

X 

MENUEPUNKT 

950 

- 

INX 


UM 1 ERHOEHEN 

960 

— 

CPX #4 

I 

GROESSER ALS 3? 

970 

— 

BEQ HOME 

1 

DANN -0 

900 

- 

STX MPT 

1 

SONST UEBERNEHMEN 

990 

— 

RTS 

2 

ZUR HAUPTSCHLEIFE 

1000 





1010 

-UP 

LDX MPT 

l 

MENUEPUNKT 

1020 

- 

DEX 


DEKREMENTIEREN 

1030 

— 

BPL ENDUP 

3 

> 0? 

1040 

- 

LDX #3 

1 

NEIN, DANN =3 

1050 

-ENDUP 

STX MPT 

1 

UND UEBERNEHMEN 

1060 

— 

RTS 

; 

ZUR HAUPTSCHLEIFE 

1070 

"1 




1000 





1090 

-EXEC 

PLA 

; 

STAPELMANIPULATION 

1100 

— 

PLA 



1110 

- 

LDX MPT 




Listing 11. »Tabellen-Beispiel«, ein Beispiel zur 
Verwendung von Tabellen 
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1120 

- 

LDA 

SP2L0,X 



10280-.TX "ZAHL (0-9) ? " 

1130 

- 

STA 

SPRUNG 



10290-.BY 0 


1140 

- 

LDA 

SP2HI,X 



10300-; 


1150 

- 

STA 

SPRUNG+1 



10310—TWORT 

TX " IN WORTEN l 11 

1160 

- 

JMP 

(SPRUNG) 



10320-.BY 0 


1170 

“1 





10330-; 


1180 






10340 -5 


1190 






10350-s ZAHLWOERTER (0-9) 

1200 

-ZAHLWORT 

LDA 

#<(TZAHL) 

; 

AUFFORDERUNG 

10360-; 


1210 

- 

LDY 

HXTZAHL) 

* 

ZUR EINGABE 

10370-; 


1220 

- 

JSR 

STROUT 

; 

AUSGEBEN 

10380-NULL 

TX "NULL" 

1230 

- 

JSR 

BAS IN 

? 

HOLT ZEICHEN 

10390-,BY 0 


1240 

— 

SEC 


? 

IN BINAERZAHL 

10400-; 


1250 

- 

SBC 

#" 0 " 


UMWANDELN 

10410-EINS 

TX "EINS" 

1260 

- 

TAX 


* 

INS X-REGISTER 

10420-.BY 0 


1270 

— i 





10430-; 


1280 

-| JETZT STEHT 

IM X-REGISTER 

10440-ZWEI 

TX "ZWEI" 

1290 

-I DIE EINGEGEBENE ZAHL 



10450-.BY 0 


1300 

-| 





10460-; 


1310 

- 

CMP 

#10 


> 107 

10470-DREI 

TX "DREI" 

1320 

- 

BCC 

ZAHLWORT 1 

* 

NEIN-> WEITER 

10480-.BY 0 


1330 

- 

JMP 

ZAHLWORT 


NEUEINGABE 

10490-; 


1340 

-| 





10500-VIER 

TX "VIER" 

1350 

-ZAHLWORT1 

STX 

XSAVE 

; 

X RETTEN 

10510-.BY 0 


1360 

- 

LDA 

#<(TWORT) 


AUFFORDERUNG 

10520-; 


1370 

- 

LDY 

#>(TWORT) 

* 

ZUR EINGABE 

10530-FUENF 

TX "FUENF" 

1380 

- 

JSR 

STROUT 


AUSGEBEN 

10540-.BY 0 


1390 

- 

LDX 

XSAVE 


X WIEDER HOLEN 

10550-; 


1400 

- 

LDA 

ZWLO,X 

* 

ADRESSE DES 

10560-SECHS 

TX "SECHS" 

1410 

- 

LDY 

ZWHI,X 

; 

ZAHLWORTES HOLEN 

10570-.BY 0 


1420 

— 

JSR 

STROUT 

! 

UND Z.WORT DRUCKEN 

10580-; 


1430 






10590-SIEBEN 

TX "SIEBEN" 

1440 

-WA IT 

JSR 

GET 

* 

WARTET AUF 

10600-.BY 0 


1450 

- 

BEQ 

WAIT 


TASTENDRUCK 

10610-; 


1460 

- 

JMP 

START 

s 

ZUM HAUPTMENUE 

10620-ACHT 

TX "ACHT" 

1470 






10630-.BY 0 


1480 

“5 





10640-; 


1490 






10650—NEUN 

TX "NEUN" 

1500 

-FARBE 

LDA 

#< (TFARBE) 



10660-.BY 0 


1510 

— 

LDY 

#XTFARBE) 



10670-; 


1520 

- 

JSR 

STROUT 



106B0-; 


1530 

- 

LDX 

*0 



10690-TFARBE 

BY 147 ; CLEAR HOME 

1540 

-FARBE1 

JSR 

BAS IN 

; 

HOLT EINGABE 

10700-.TX "WELCHE FARBE ? " 

1550 

- 

CMP 

#" “ 


SPACE ? 

10710-.BY 0 


1560 

- 

BEO 

FARBE1 

; 

J A= >UEBERLESEN 

10720-; 


1570 

- 

CMP 

#13 

; 

ENDE DER EINGABE? 

10730-; 


1580 

- 

BEO 

FARBE2 

; 

JA, DANN WEITER 

10740-RVSTAB 

BY 0,0,0,0 ; 4 BYTES RESERVIEREN 

1590 

— 

STA 

FARBWORT,X 

« 

EINGABE SPEICHERN 

10750-; 


1600 

- 

INX 


5 

ZAEHLER ERHOEHEN 

10760-; 


1610 

- 

JMP 

FARBE1 

; 

ZUR SCHLEIFE 

10770-; ZAHLEN: 


1620 

-FARBE2 

STX 

2 

; 

LAENGE MERKEN 

10780—; 


1630 

— • 

LDX 

#0 



10790—; ADRESSEN 

DER TEXTE, DIE DIE 

1640 

- 

TXA 



on 

IQqm'i -. MENUEPUNKTE BESCHREIBEN 

1650 

-FARBE3 

ROL 




10810-; 


1660 

- 

EOR 

FARBWORT,X 



10820-TEXTLO 

BY <(PUNKT0),<(PUNKT1) 

1670 

- 

INX 




10830—.BY < (PUNKT2),<(PUNKT3) 

1680 

— 

CPX 

2 

; 

SCHON FERTIG? 

10B40-; 


1690 

- 

BNE 

FARBE3 

; 

NEIN,ZUR SCHLEIFE 

10850-TEXTHI 

BY >(PUNKT0 ) ,> ( PUNKT1 ) 

1700 

— 

CLC 


5 

LAENGE 

10860-.BY XPUNKT2) a > (PUNKTS) 

1710 

— 

ADC 

2 

; 

ADDIEREN 

10870-5 


1720 






10880-; 


1730 

HIER STEHT IM AKKU DIE 

PRUEFSUMME 

10890-; ADRESSEN 

DER ZAHLWOERTER 

1740 






10900-5 


1750 

~ 

LDX 

#0 



10910-ZWLQ 

BY < (NULL) ,< (EINS) ,< (ZWEI) ,< (DREI) 

1760 

-FARBE4 

CMP 

PRUEFSUMMEN, 

X 

10920-.BY < (VIER 

,< (FUENF) ,< (SECHS) ,< (SIEBEN) 

1770 

— 

BEQ 

FARBE5 

; 

GEFUNDEN 

10930-.BY < (ACHT 

,< (NEUN) 

1780 


INX 




10940-; 


1790 

~ 

CPX 

#16 



10950-ZWHI 

BY > (NULL) , > (EINS) ,XZWEI) ,XDREI) 

1800 

~ 

BNE 

FARBE4 


V 

10960-.BY > (VIER 

, > (FUENF), > (SECHS) ,> (SIEBEN) 

1810 

— 

JMP 

FARBE 

i 

NEUE EINGABE 

10970-.BY > < ACHT 

,>(NEUN) 

1820 

-FARBE5 

STX 

53280 

i 

BILDSCHIRM- 

10980-; 


1830 

- 

STX 

53201 

; 

FARBE SETZEN 

10990-; 


1 EMO) 

- 

JMP 

START 

I 

ZUM MENUE 

11000-; ADRESSEN 

DER UNTERROUTINEN 

1850 

-» 





11010-; FUER DIE 

MENUESTEUERUNG 


10010-5 TABELLEN 
10020-j ——— 

10030-; 

10040 ; TEXTES 

10050-s 

10060-PUNKT0 .TX "ZAHL IN ZAHLWORT UMWANDELN" 

10070-.BY 13,13,0 

100B0-; 

10090-PUNKT1 .TX "BILDSCHIRMFARBE" 

10100-.BY 13,13,0 

101 10-5 

1012B-PUNKT2 .TX "RESET AUSLOESEN" 

10130-.BY 13,13,0 
10140-i 

10150-PUNKT3 .TX "PROBRAMMENDE UEBER RTS" 

10160-.BY 13,13,13 

10170-. TX "BITTE AUSWAEHLEN !" 

10180-.BY 0 
10190-; 

10200 -; 

10210-TASTEN 


.BY 133,13,"«-", 


10220-. BY 19, "0" , ,0 ; 19«=H0ME ,0 B DUMMY 


133-F1,13=RETURN 


10230-.BY 17,"D",135,"+' 
10240-.BY 145,"U",134,"-' 
10250-; 

10260-; 

10270-TZAHL .BY 147 


; 17=CRSR DOWN,135*F5 
; 145=CRSR UP,134=F3 


j CLEAR HOME 


11020-; 

11030-SP1LO 
11040-; 

11050-SP1HI 
11060-; 

11070-; 

110B0—; 

11090-; 

11100-5 
11110 
11120 
11130 
11140 
11150 

11160-; PRUEFSUMMEN DER FARB-WOERTER 
11170-; 


.BY < (EXEC) ,< (HOME) ,< (DOWN) ,< (UP) 
.BY > (EXEC) , > (HOME) ,XDOWN) ,XUP) 


ADRESSEN DER EINZELNEN 
MENUEPUNKTE 

SP2L0 .BY <(ZAHLWORT),<(FARBE) 

.BY <(RESET),<(ENDE) ; BEI ENDE STEHT 
SP2HI .BY XZAHLWORT) v >(FARBE) 

.BY XRESET),XENDE) ; EIN RTS-BEFEHL 


11100- 
11190- 
11200- 
11210 - 
11220- 
11230- 
11240- 
11250- 
11260- 
11270- 
U2B0- 
11290- 

READY. 


PRUEFSUMMEN .BY 41,158,137,212,159,101 
.BY 3,2,33,69,201,116,113,121,127,114 
1 
I 

; ZWISCHENSPEICHER 

» 

MPT .BY 0 ; 1 BYTE RESERVIEREN 

XSAVE .BY 0 

SPRUNG -WO 0 ; 2 BYTES FREIHALTEN 

FARBWORT .BY 0 

; T AB 'FARBWORT* WIRD DIE EINGABE 
; DER FARB-BEZEICHNUNG ABGELEGT. 
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Spalte 

TEXTLO 

TEXTHI 


zeigen als 
Vektoren auf: 


RVSTAB 

SP2LO 

SP2HI 


zeigen als 
Vektoren auf: 





Adressen der Text-Tabellen, die 
die Menüpunkte beschreiben 


/Text-Tabellen 


) enthält Information, ob Text zu 
/ Menüpunkt invertiert werden soll 


enthält die Adressen der 
Routinen zu den Menüpunkten 


Bild 5. So verwendet man Tabellen zur Realisierung eines Menüs 


Diese Tabelle »TASTEN« enthält alle vorgesehenen Tasten¬ 
drücke zur Menüsteuerung, die in 4er-Blockweise angeord¬ 
net sind (Bild 5). Nach der Suchschleife steht im X-Register 
die Position der gedrückten Taste innerhalb der Tabelle 
»TASTEN« (zum Beispiel 0 = Fl gedrückt, 4 = HOME 
gedrückt). Diese Position wird - ohne Berücksichtigung des 
Divisions-Restes - durch 4 dividiert (700 - 730), um festzu¬ 
halten, von welchem Tastenblock eine Taste gedrückt wurde. 

Dadurch ist eindeutig bestimmt, welche Befehlsgruppe 
aufgerufen werden muß. 

Steht nach 730 im X-Register 0, wurde eine der ersten vier 
in »TASTEN« enthaltenen Tasten gedrückt, die die Ausführung 
des aktuellen Menüpunktes veranlassen (Zeile 10210 und 
Bild 5). Ist X=1, so wurde eine Taste aus Zeile 10220 


gedrückt. In 10220 steht als letztes Byte eine 0. Diese dient, 
da für die Funktion »Inversfeld in HOME-Position« nur drei 
Tastendrücke vorgesehen wurden, zum Auffüllen auf vier 
Tasten. 0 kann hier bedenkenlos als Dummy (Füllbyte ohne 
wirkliche Bedeutung) stehen, da der Akku aufgrund von 620 
nie den Wert 0 annehmen wird. 

Beinhaltet X nach der Division durch 4 den Wert 2, wird das 
Inversfeld nach unten bewegt, istX=3, dann nach oben. Dies 
können Sie sich an Bild 6 veranschaulichen. 

An den Zeilen 740-870 sehen wir nun die Verwendung ei¬ 
ner Sprungtabelle. Unsere Sprungtabelle ist »SP1LO/SP1 Hl«. 
»SP1LO« beinhaltet die Low-, »SP1HI« die High-Bytes der 
anzuspringenden Routinen. In den Vektor »SPRUNG« wird 
einfach die Zieladresse geschrieben (740 - 770). 






X = 


0 










2 




r 


TASTEN 

Fl 

RE¬ 

TURN 


= 


HOME 

0 

@ 

0- 

Byte 


CRSR 

V 

D 

F5 

+ 

■■ 

A 

CRSR 

U 

F3 

— 


'-y-' ^-*-' ^ 


in Zeile 

10210 

1 

10220 

1 

10230 

| 

10240 

| 

dazugehörige 

Routine: 

\ 

EXEC 

t 

HOME 

t 

DOWN 

♦ 

UP 



Wirkung: 

angewählter 

aktueller 


Menüpunkt 

Menüpunkt 


wird ausgeführt 

wird auf 


(Sprung in 1160) 

0 gesetzt 


/IW 


MPT 

= 0 

1 

2 

3 


ZAHLWORT 

FARBE 

RESET 

ENDE 


Inversfeld 
wird nach 
unten bewegt 


Inversfeld 
wird nach 
oben bewegt 


Bild 6. Die Tastaturabfrage aus Listing 11 
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Die Zuweisungszeile 790 errechnet die Rücksprung¬ 
adresse des aufzurufenden Unterprogramms. Bei einem RTS 
soll nämlich zur »HSCHLEIFE« gesprungen werden. 

Diese Rücksprungadresse »RUECKSPRUNG« wird auf 
den Stapel gelegt (830 - 860), zuletzt erfolgt der indirekte 
Sprung (870). Die über die soeben beschriebene Simulation 
von JSR (ind) angesprungenen Routinen finden Sie ab Zeile 
900. Es wird einfach der aktuelle Menüpunkt »MPT« entspre¬ 
chend dem Tastendruck geändert, dann wird zur 
»HSCHLEIFE« gesprungen, die auch die Tabelle »RVSTAB« 
entsprechend anpaßt. 

»EXEC« (1090) holt die Rücksprungadresse vom Stapel 
(1090 - 1100), da diese Routine nicht als Unterprogramm 
behandelt werden soll. 

Die Zeile 1110 holt den angeforderten Menüpunkt ins X- 
Register. Dann wird aus »SP2LO/SP2HI« die Adresse der 
zum Menüpunkt gehörenden Routine geholt und diese über 
einen gewöhnlichen indirekten Sprung aufgerufen (1160). 

Als Routine zu »2« wird einfach die RESET-Routine des 
Betriebssystems angesprungen, für »3« eignet sich jeder 
RTS-Befehl, also auch der bei »ENDE« (920). 

»ZAHLWORT«, die Routine zu 0, holt eine Zahl als ASCII- 
Code (1230) und wandelt sie in einen numerischen Wert um 
(1240- 1250), indem der ASCII-Code von Oabgezogen wird. 
Das Ergebnis landet im X-Register (1260). Ob auch eine Zahl 
eingegeben wurde, prüfen die Zeilen 1310 - 1330. Bei 
»ZAHLWORT« (1350) wird das Resultat der Subtraktion in 
»XSAVE« gesichert, der Text »IN WORTEN« ausgegeben und 
das X-Register wieder geholt. 

Die Tabelle »ZWLO/ZWHI« enthält die Adressen, ab denen 
die Texte der Zahlwörter als ASCII-Code stehen. Aus 
»ZWLO/ZWHI« wird dann diese Adresse geholt (1400 - 
1410) und der dort stehende Text ausgegeben (1420). 
Danach erwartet das Programm noch einen Tastendruck 
(1440-1450), bevor ins Hauptmenü verzweigt wird (1460). 

Als letzte Routine wird »FARBE« besprochen (1500-1850): 
Hierzu ist jedoch aufgrund der Ähnlichkeit zu Listing 10 nicht 
viel zu erläutern. Bei 1820 steht im X-Register der Code der 
eingegebenen Farbe (= Position der Prüfsumme innerhalb 
der Tabelle »PRUEFSUMMEN«), Dieser muß nur noch in die 
entsprechenden VIC-Register geschrieben werden 
(1820-1830). Ab Zeile 10000 stehen dann die Tabellen. 
Wenn Sie die Tabellen angesehen haben, sollten Sie durch¬ 
aus noch einmal den Quelltext bis 10 000 betrachten und die 
hier endende Beschreibung des Programms lesen. Denn 
wenn Sie das Programm »TABELLEN-BEISPIEL« ganz ver¬ 
standen haben, sind Sie einen großen Schritt in der Assem¬ 
blerprogrammierung weitergekommen! 

Ich könnte mir übrigens vorstellen, daß Sie in Ihren eigenen 
Programmen jetzt auch eine Menüsteuerung wie die in 
»TABELLEN-BEISPIEL« einbauen; wie das geht, können Sie 
dem Programm »TABELLEN-BEISPIEL« entnehmen. 

Eine Anmerkung ist wichtig: »TABELLEN-BEISPIEL« kann 
noch weiter verbessert werden. Sie werden sehen, daß viele 
Stellen noch optimiert werden können. Insbesondere der 
Speicherplatzbedarf kann verringert werden, 
f) Weitere Anregungen zur Anwendung von Tabellen 
Auch die bisherigen Erläuterungen und das Beispielpro¬ 
gramm können die Kreativität des Programmierers nicht 
ersetzen, sondern nur die Programmierung erleichtern. Aus 
diesem Grund möchte ich Ihnen noch einige Beispiele nen¬ 
nen, wie sich Tabellen sinnvoll verwerten lassen. 

- Ein Anwenderprogramm, das aus Menüs und Untermenüs 
besteht, sollte in einer Tabelle die Adressen der 
Menüs/Untermenüs speichern. 

- Spiele müssen oft viele Spritebewegungen, die immer 
gleich sind, durchführen. Es empfiehlt sich, die Spritebe¬ 
wegungen als Koordinaten in einer Tabelle abzulegen. 

- Bei Software-Interfaces müssen viele Umrechnungen 


erfolgen. Durch eine Umwandlungstabelle können diese 
stark beschleunigt werden. 

- Naturwissenschaftlich orientierte Programme müssen ver¬ 
schiedene Maße umrechnen. Die Umrechnungswerte 
können in einer Tabelle untergebracht werden. 

Dies soll nur eine Anregung sein. Ich wüßte aber kein komple¬ 
xes Programm, das sich nicht durch den gezielten Einsatz von 
Tabellen vereinfachen und beschleunigen ließe. 


Texteinschub #1: Fließkommazahlen 

Im Text wurde ein Verfahren vorgestellt, um eine Zahl ins 
MFLPT-Format (MELPT= Memory floating point) umzu¬ 
wandeln. Das 5 Byte lange Ergebnis dieser Umwandlung 
kann man dann als KONSTANTE handhaben. Konstanten 
sind feste, vorausberechnete Werte, die man mit Hilfe der 
Routine »MEMFAC« in den FAC (Flieskomma-AKKU) 
kopieren kann. Für viele Werte ist es jedoch überflüssig, 
die Umwandlung durchzuführen und eine entsprechende 
Tabelle anzulegen, da sie schon im ROM vorhanden sind. 
Im Kurs »Assembler ist keine Alchimie« wurden solche 
Konstanten mitsamt ihrer Adressen schon in einer Tabelle 
vorgestellt. 

Um mit Konstanten (für die Rechenroutinen macht es 
keinen Unterschied, ob diese im RAM oder im ROM ste¬ 
hen) zu rechnen, kann man diese wie gesagt, in den FAC 
kopieren und alle weiteren Operationen auf diesen bezie¬ 
hen. Dies war in Listing 8 bei den Funktionen SQR und 
LOGNAT ausreichend. 

Oft möchte man aber den Inhalt des FAC nicht mit einer 
Funktion wie SQR behandeln, sondern mit anderen Kon¬ 
stanten addieren, multiplizieren und so weiter. 

Dafür möchte ich Ihnen im folgenden weitere 
Intei p; iter-Routinen vorstellen, die das Rechnen mit Kon¬ 
stanten ermöglichen. Da fast immer in den Akku das Low-, 
ins Y-Register das High-Byte der Adresse, ab der die Kon¬ 
stante abgelegt ist, geladen werden muß, definieren wir 
noch vorher folgende Makro: 

-MA LDAY (ADRESSE) 

LDA #< (ADRESSE) 

LDY #> (ADRESSE) 

-.RT 

Nun zu den Routinen, bei deren Parameterübergabe wir 
uns auf das Makro LDAY stützen wollen: 


ADDMEM 

FAC-(-Konstante — FAC 

...LDAY (KONSTANTE) 
JSR $B867 

ADD0.5 

FAC+0.5 - FAC 

JSRSB849 

SUBMEM 

Konstante-FAC - FAC 

...LDAY (KONSTANTE) 
JSRSB850 

MULMEM 

Konstante* FAC - FAC 

... LDAY (KONSTANTE) 
JSR $BA28 

MULT10 

FAC* 10- FAC 

JSR $BAE2 

DIVMEM 

Konstante/FAC - FAC 

... LDAY (KONSTANTE) 
JSR $BB0F 

DIVS10 

FAC/10 - FAC 

JSR $BAFE 

CMPMEM 

vergleicht Konstante mit FAC 
FAC< Konstante: Akku=$FF 
FAC=Konstante: Akku=$00 
FAC > Konstante: Akku=$01 

... LDAY (KONSTANTE) 
JSR $BC5B 

POTMEM 

Konstante IFAC - FAC 

... LDAY (KONSTANTE) 
JSR $BF78 

POTE 

et FAC - FAC 

JSR $BFED 

MEMFAC 

holt Konstante in FAC 

...LDAY (KONSTANTE) 
JSR SBBA2 

FACMEM 

FAC ab Konstante als 
MFLPT-Zahl ablegen 

LDX # < (KONSTANTE) 
LDY # > (KONSTANTE) 
JSRSBBD7 

FACOUT 

gibt FAC aus 

JSR $AABC 
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7. Die Initialisierung 


»Initialisierung« nennt man eine Routine, die vor einem Pro¬ 
grammteil (meist einer Schleife) steht und diese vorbereitet. 
Die Initialisierung wird nur einmal, eine Schleife aber mehr¬ 
fach durchlaufen. Deshalb bringt es einen Geschwindigkeits¬ 
zuwachs, wenn die Initialisierung der Schleife Arbeit 
abnimmt. 

Ein Beispiel: Wenn ein Basic-Programm mit »RUN« gestar¬ 
tet wird, werden alle Variablen gelöscht, Files geschlossen 
und die Adressen, ab denen die Variablen abgelegt werden 
dürfen, errechnet. Dies ist die Initialisierung der Interpreter¬ 
schleife. Dann wird Byte für Byte des Basic-Programms ein¬ 
gelesen und bearbeitet. 

Muß im gerade übersetzten Befehl ein Sprung (GOTO 500 
oder ähnliches) durchgeführt werden, kostet dies bekannt¬ 
lich viel Zeit, wenn das Sprungziel am Ende eines langen Pro¬ 
gramms steht. Dies ist darauf zurückzuführen, daß der Inter¬ 
preter, beginnend mit der ersten Zeile, das ganze Programm 
nach der Sprungzeile durchsucht, bis er sie gefunden hat. 

Diese Berechnung der Adressen wird bei jedem »GOTO« 
oder »GOSUB« neu durchgeführt. 

Viel besser und schneller wäre folgende Vorgehensweise: 
Bei »RUN« wird zunächst eine Tabelle angelegt, in der die 
Adressen aller Zeilen enthalten sind. Diese Tabelle könnte 
zum Beispiel als Array definiert werden. Folgt nun ein Sprung, 
kann aus der Tabelle die Adresse der Zeile im Speicher geholt 
werden. 

Damit haben wir noch ein wesentliches Merkmal der Initiali¬ 
sierungsroutinen gefunden: Die Initialisierung kann Tabellen 
anlegen, die dann von der Hauptschleife verarbeitet werden. 

Aber nicht nur Tabellen können generiert werden, auch die 
Berechnung von Flags ist sinnvoll. So merkt sich die 
»LOAD/VERIFY«-Routine ($FFD5), ob ein Verifizieren oder 
Laden gewünscht wird. Die Ladeschleife liest dann ein Zei¬ 
chen von der Floppy oder der Datasette ein und entscheidet 
erst anschließend, ob das Byte im Speicher abgelegt oder mit 
dem Speicher verglichen werden soll. 

Halten wir also fest, daß Initialisierungsroutinen Schleifen 
entlasten können. Näher werden wir uns damit beim Thema 
»Schleifen« beschäftigen. 

8. Die Nutzung der Zeropage 


ln jedem Assembler-Lehrbuch werden die Vorteile der 
Zeropage-Adressierung gepriesen. Speicherplatzersparnis 
und hohe Verarbeitungsgeschwindigkeit sind nicht die einzi¬ 
gen Vorzüge; die indirekt-indizierte Adressierung kann nur 
auf Zeropage-Adressen zugreifen, nicht auf absolute 16-Bit- 
Adressen. Damit wird der Leser aber schon alleine gelassen. 
Er erfährt nicht, welche Adressen in der Zeropage für die 
Praxis geeignet sind. Das wird nun nachgeholt. 

Fast die ganze Zeropage wird durch Basic-Interpreter und 
Betriebssystem belegt. Deshalb führen bestimmte Werte in 
Zeropage-Adressen oft zum Absturz oder sonstigem Fehl¬ 
verhalten des Computers. 

Wie dies im einzelnen aussieht, erfahren Sie in der Serie 
»Memory Map mit Wandervorschlägen«, die im 64’er Stamm¬ 
heft erscheint. Nicht nur in Zweifelsfällen stellt diese Serie 
das optimale Nachschlagewerk dar. 

Ich möchte Ihnen nun zeigen, welche Adressen Sie als 
(Zwischen-)Speicher ohne Schwierigkeiten verwenden 
können, beziehungsweise was Sie bei Verwendung von 
Zeropage-Adressen beachten müssen, 
a) Adressen, die problemlos verwendet werden können 

Auf die Adressen $02 und SFB - $FE wird weder vom 


, 6000 

A2 

00 

LDX 

#00 

,6002 

B5 

02 

LDA 

02,X 

,6004 

9D 

00 6F 

STA 

6F00,X 

,6007 

E8 


INX 


,6008 

E0 

FE 

CPX 

#FE 

, 600A 

D0 

F6 

BNE 

6002 
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, 6000 

A2 

FE 

LDX 

#FE 

,6002 

B5 

01 

LDA 

#01 

,6004 

9D 

FF 6E 

STA 

6EFF,X 

,6007 

CA 


DEX 


, 6008 

D0 

F8 

BNE 

6002 
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, 6000 

A2 

FE 

LDX 

#FE 

,6002 

BD 

FF 6E 

LDA 

6EFF,X 

,6005 

95 

01 

STA 

#01 

,6007 

CA 


DEX 


,6008 

D0 

F8 

BNE 

6002 
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,6000 

A2 

34 

LDX 

#34 

,6002 

B5 

16 

LDA 

16,X 

,6004 

9D 

00 6F 

STA 

6F00,X 

,6007 

CA 


DEX 


,6008 

10 

FB 

BPL 

6002 

• sting 15 






,6000 

A2 

34 

LDX 

#34 

,6002 

BD 

00 6F 

LDA 

6F00,X 

,6005 

95 

16 

STA 

16,X 

,6007 

CA 


DEX 


,6008 

10 

F8 

BPL 

6002 
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,6000 

A2 

FF 


LDX 

#FF 

,6002 

BD 

00 

01 

LDA 

0100,X 

,6005 

9D 

00 

6F 

STA 

6F00,X 

,6008 

CA 



DEX 

- 

,6009 

D0 

F7 


BNE 

6002 

, 600B 

AD 

00 

01 

LDA 

0100 

, 600E 

8D 

00 

6F 

STA 

6F00 

,6011 

BA 



TSX 


,6012 

8E 

00 

70 

STX 

7000 
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,6000 

A2 

FF 


LDX 

#FF 

,6002 

BD 

00 

6F 

LDA 

6F00,X 

,6005 

9D 

00 

01 

STA 

0100,X 

,6008 

CA 



DEX 


,6009 

D0 

F7 


BNE 

6002 

, 600B 

AD 

00 

6F 

LDA 

6F00 

,600E 

8D 

00 

01 

STA 

0100 

,6011 

AE 

00 

70 

LDX 

7000 

,6014 

9A 



TXS 
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Basic-Interpreter noch vom Betriebssystem zugegriffen. 
Lediglich bei Initialisierung der Arbeitsspeicher (RESET) 
werden Sie auf 0 gesetzt. 

Für die Praxis heißt das, daß Ihnen die genannten Adressen 
völlig zur Verfügung stehen. 

b) Adressen, die in keiner Weise verwendet werden 
sollten 

Von anderen Adressen hingegen müssen wir unsere Fin¬ 
ger lassen. Diese haben entweder elementare Funktionen für 
Betriebssystem oder CPU, oder werden von beiden dauernd 
geändert, so daß die Datensicherheit in Frage gestellt ist. 
Genauer soll hier nicht unterschieden werden. 

Belassen Sie die Adressen $00 und $01 unverändert, da 
sie (siehe Memory Map) für die CPU wichtige Informationen 
beinhalten und außerdem einige Bits nur durch externe Vor¬ 
gänge geändert werden. 

Das Betriebssystem und der Basic-Interpreter beanspru¬ 
chen alle bislang ungenannten Adressen. 

Von Bildschirmeditor und Tastaturabfrage werden die 
Adressen $C6 - $F6 beeinflußt. Die Adressen $90 - $C2 
dienen der Ein-/Ausgabe-Steuerung mit Peripheriegeräten 
und der Verwaltung offener Files. Einzige Ausnahme: $A0 - 
$A2 (interne Uhr). Wenn ein Maschinenprogrammm in ein 
Basic-Programm eingebaut ist, sind die Adressen $03 - $56 
sowie $73 - $8B tabu. 

c) Bedingt einsetzbar 

Der Vektor $C3/$C4 wird durch RUN/STOP-Restore, 
RESET oder LOAD beeinflußt. Ansonsten kann mit $C3/$C4 
frei verfahren werden. 

Ganz Vorsichtige können diesen Vektor auf seinen Aus¬ 
gangswert $FD30 setzen, sobald das Programm die Adres¬ 
sen $C3/$C4 nicht mehr für eigene Zwecke benötigt. 

d) Adressen, die unter Verzicht auf Kassettenbetrieb ver¬ 
wendet werden können 

Die folgenden Adressen können verwendet werden, wenn 
nicht auf RS232 oder Datasette zugegriffen wird. 

$9E/$9F, $A5-$A7, $A9-$AB, $B0-$B6, $F7-$FA 

Bei anderen Adressen, die sich auf den RS232- oder Kas¬ 
settenbetrieb beziehen, ist Vorsicht angebracht. 

e) Geeignete Zwischenspeicher 

Die Adressen $22-$2A und $57-$60 sind sogenannte 
»verschieden genutzte Arbeitsbereiche«. Sie werden vom 
Basic-Interpreter vor allem bei arithmetischen Operationen 
als Zwischenspeicher verwendet. Als solche Zwischenspei¬ 
cher können wir sie auch verwenden. Sobald allerdings 
bestimmte Interpreterroutinen aufgerufen werden, können 
die Inhalte dieser Adressen verlorengehen. Eine länger¬ 
fristige Aufbewahrung von Daten in diesen Adressen ist zwar 
nicht möglich, andererseits können wir aber durch Schreib¬ 
zugriffe auf diese Adressen das Betriebssystem oder den 
Basic-Interpreter nicht stören. 

Zu sagen wäre noch, daß die Adressen $57 - $60 den 
wichtigen Routinen BLTUC und UMULT (siehe »Assembler ist 
keine Alchimie«) als Zwischenspeicher dienen. 

f) Zeropage kopieren 

Zum Abschluß dieses Abschnittes über die Nutzung der 
Zeropage möchte ich Ihnen noch einen kleinen Trick verra¬ 
ten, der von einigen professionellen Programmen angewandt 
wird. 

Wir sichern die Zeropage-Inhalte in einem anderen 
Bereich, zum Beispiel von $6F00 an. 

Dann können wir viele Adressen in der Zeropage nutzen, 
sofern wir keine Interpreter- oder Betriebssystemroutine auf- 
rufen. Danach schreiben wir die Zeropage wieder von der 
Kopie, zum Beispiel von $6F00, zurück und können wie 
gewöhnlich fortfahren. 

Die Adressen 0 und 1 kopieren wir nicht, weil diese nach 
wie vor für solche Zwecke nutzlos sind. Ebenso könnten wir 


,6000 

A9 

D2 

LDA 

#D2 

,6002 

85 

14 

STA 

14 

,6004 

A9 

3F 

LDA 

#3F 

,6006 

85 

15 

STA 

15 

, 600B 

A0 

00 

LDY 

#00 

, 600A 

Bl 

14 

LDA 

(14) 

, 600C 

49 

FF 

EGR 

LL 

LL 

, 600E 

91 

14 

STA 

(14) 

,6010 

E6 

14 

INC 

14 

,6012 

D0 

02 

BNE 

6016 

,6014 

E6 

15 

INC 

15 

,6016 

A5 

14 

LDA 

14 

,6018 

C9 

60 

CMR 

#60 

, 601A 

A5 

15 

LDA 

15 

,60 IC 

E9 

47 

SBC 

#47 

,601E 

90 

EA 

BCC 

600A 
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,6000 

A9 

5F 

LDA 

#5F 


,6002 

85 

14 

STA 

14 


,6004 

A9 

47 

LDA 

#47 


,6006 

85 

15 

STA 

15 


,6008 

A0 

00 

LDY 

#00 


, 600A 

Bl 

14 

LDA 

(14) 

,Y 

, 600C 

49 

FF 

EOR 

#FF 


500E 

91 

14 

STA 

(14) 

,Y 

,6010 

A5 

14 

LDA 

14 


,6012 

D0 

02 

BNE 

6016 


,6014 

C6 

15 

DEC 

15 


,6016 

C6 

14 

DEC 

14 


,6018 

A5 

14 

LDA 

14 


, 601A 

C9 

D2 

CMP 

#D2 


, 60 IC 

A5 

15 

LDA 

15 


, 601E 

E9 

3F 

SBC 

#3F 


,6020 

B0 

E8 

BCS 

600A 
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,6000 

A9 

00 

LDA 

#00 


,6002 

85 

14 

STA 

14 


,6004 

A9 

20 

LDA 

#20 


,6006 

85 

15 

STA 

15 


,6008 

A0 

00 

LDY 

#00 


, 600A 

Bl 

14 

LDA 

(14) 

i Y 

, 600C 

49 

FF 

EGR 

#FF 


, 600E 

91 

14 

STA 

(14) 

i Y 

,6010 

C8 


INY 



,6011 

D0 

F7 

BNE 

600A 


,6013 

E6 

15 

INC 

15 


,6015 

A5 

15 

LDA 

15 


,6017 

C9 

40 

CMP 

#40 


,6019 

D0 

EF 

BNE 

600A 
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,6000 

A9 

00 

LDA 

#00 

,6002 

B5 

14 

STA 

14 

,6004 

AB 


TAY 


,6005 

A9 

20 

LDA 

#20 

,6007 

85 

15 

STA 

15 

,6009 

AA 


TAX 


, 600A 

Bl 

14 

LDA 

(14),Y 

, 600C 

49 

FF 

EOR 

#FF 

, 600E 

91 

14 

STA 

(14),Y 

,6010 

C8 


INY 


,6011 

D0 

F7 

BNE 

600A 

,6013 

E6 

15 

INC 

15 

,6015 

CA 


DEX 


,6016 

D0 

N 

U. 

BNE 

600A 
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nur einzelne Bereiche kopieren (zum Beispiel die Zeiger für 
Basic-Programme $16 - $4A). Dann dürfen wir aber auch nur 
diesen Bereich verändern. 

Wenn wir nun den Bereich $02 - $FF kopieren, stehen uns 
folgende Adressen zur Verfügung: 

$03-$06, $14-$86, $71-$8A, $C3/$C4, $FB-$FF 

Diese Adressen können Sie nur so lange verwenden, bis 
eine Routine des Betriebssystems oder Basic-Interpreters 
aufgerufen wird. Davor muß die alte Zeropage zurückge¬ 
schrieben werden. 

Da Sie auf diese Weise viel Speicherplatz in der Zeropage 
gewonnen haben, ist es sogar möglich, eine Tabelle aus 
Geschwindigkeitsgründen in die Zeropage zu verlegen. 
Damit steigt auch der Wert der indiziert-indirekten Adressie¬ 
rung erheblich. 

Dennoch ist der Speicherplatz in der Zeropage begrenzt. 
Überlegen Sie sich also, auf welche Werte besonders schnell 
zugegriffen werden muß und schreiben Sie vorzugsweise 
diese in die Zeropage. 


70 

-. 8 « »C000 
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_ 



LDA 

tt< < ANF ANGSADRESSE) 

60 

-.LI 1,3,0 

720 

- 



STA 

ZAEHLER 

90 

-5 

730 

- 



LDA 

#>(ANFANGSADRESSE) 

100 

******************************* 

740 

- 



STA 

ZAEHLER+1 

110 

—5 * QUELLTEXTE (HYPRA-ASS) * 

750 

- 



LDY 

MB 

120 


760 

-SCHLEIFE4 

LDA 

(ZAEHLER),Y 

130 

* * 

770 

- 



EOR 

#*FF 

140 

* FUER VERSCHIEDENE SCHLEIFEN * 

780 

- 



STA 

(ZAEHLER),Y 

150 

* * 

7965 

- 



INC 

ZAEHLER 

160 

-» * 28.08.B5 BY FLORIAN MUELLER * 

800 

- 



BNE 

WEITER 

170 

—; * * 

B 10 

- 



INC 

ZAEHLER+1 

180 

-; ******************************* 

820 

-WEITER 

LDA 

ZAEHLER 

190 

-5 

830 




CMP 

P< (END ADRESSE* 1) 

200 

”5 

840 

~ 



LDA 

ZAEHLER+1 

210 

-5 QUELLTEXT ZU LISTING 1 

850 

- 



SBC 

#>(ENDADRESSE+1) 

220 

===================== 1 = 

860 

- 



BCC 

SCHLEIFE4 

230 

“5 

870 






240 

--EQ ANFANGSADRESSE = »02 

880 

-s 





250 

-.EQ ENDADRESSE = »FF 

890 - ■ 

QUELLTEXT ZU LISTING 10 

260 

-.EQ ZIELBEREICH = »6F00 

900 

» 

= = = = === = 

===== 

=========== 
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910 
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LDX #0 

920 


EQ 

ANFANGSADRESSE = *2000 

290 

-SCHLEIFEI LDA ANFANGSADRESSE,X 

930 


EQ 

ENDADRESSE = $3FFF 

300 

STA ZIELBEREICH,X 

940 


EQ 

ZAEHLER = 

*14 

310 

INX 

950 

“5 





320 

CPX # (ENDADRESSE+1 — ANFANGSADRESSE ) 

960 




LDA 

tt< (ANFANGSADRESSE) 

330 

BNE SCHLEIFEI 

970 

- 



STA 

ZAEHLER 

340 

~5 

980 

- 



LDA 

#>(ANFANGSADRESSE) 

350 

-J 

990 

- 



STA 

ZAEHLER+1 

360 

-; QUELLTEXT ZU LISTING 2 

1000 

- 



LDY 

«0 

370 

-J ====================== 

1010 

-SCHLEIFE5 

LDA 

(ZAEHLER),Y 

380 


1020 




EOR 

tt*FF 

390 

-.EQ ANFANGSADRESSE = *02 

1030 

- 



STA 

(ZAEHLER),Y 

400 

-.EQ ENDADRESSE = »FF 

1040 




INY 


410 

-.EQ ZIELBEREICH = »6F00 

1050 

- 



BNE 

SCHLEIFES 

420 


1060 

- 



INC 

ZAEHLER+1 

430 

LDX #(END ADRESSE*1-ANFANGSADRESSE) 

1070 

- 



LDA 

ZAEHLER+1 

440 

-SCHLEIFE2 LDA ANFANGSADRESSE-1,X 

1080 

- 



CMP 

«>(ENDADRESSE+1) 

450 

STA ZIELBEREICH—1,X 

1090 




BNE 

SCHLEIFE5 
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DEX 1 DEKREMENT IERBEFEHL 

1100 

-» 





470 

BNE SCHLEIFE2 
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”1 
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QUELLTEXT ZU EINER SCHLEIFE, 
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-J 
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-» 

DIE DEN 
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-t QUELLTEXT ZU LISTING 4 
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KOMPLEMENTIERT 
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1150 






520 


1 160 


EQ 

ANFANGSADRESSE = »3FD2 

530 

-.EQ ANFANGSADRESSE = »16 

1 170 


EQ 

ENDADRESSE - »47D1 

540 

-.EQ ENDADRESSE - *4A 

1 180 


EQ 

ZAEHLER - 

»14 

550 

-.EQ ZIELBEREICH = »6F00 

1190 
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560 

“8 

1200 

- 



LDA 

#<(ANFANGSADRESSE) 

570 

LDX (t (ENDADRESSE-ANFANGSADRESSE) 

1210 

- 



STA 

ZAEHLER 

580 

-SCHLEIFE3 LDA ANFANGSADRESSE,X 

1220 

- 



LDA 

#>(ANFANGSADRESSE) 

590 

STA ZIELBEREICH,X 

1230 

- 



STA 

ZAEHLER+1 

600 

DEX 

1240 

- 



LDX 

* > (END ADRESSE* 1 - ANF ANGSADRESSE) 

610 

BPL SCHLEIFE3 ; PRUEFT N-FLAG 

1250 

- 



LDY 

»0 

620 

“5 

1260 

-SCHLEIFE 6 

LDA 

(ZAEHLER),Y 

630 

-» 

1270 

- 



EOR 

#*FF 

640 

-J QUELLTEXT ZU LISTING 8 

1290 

- 



STA 

(ZAEHLER) ,Y 

650 

—; ====================== 

1290 

— 



INY 


660 

-J 

1300 

- 



BNE 

SCHLEIFE 6 

670 

-.EQ ANFANGSADRESSE = »3FD2 

1310 

- 



INC 

ZAEHLER+1 

690 

-.EQ ENDADRESSE = »475F 

1320 

- 



DEX 


690 

-.EQ ZAEHLER = *14 

1330 

- 



BNE 

SCHLEIFE 6 

700 

“ f 

1340 






Listing 23 

1350 

-1 

ENDE VON LISTING 12 
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9. Schleifenprogrammierung 


Zunächst befassen wir uns mit Schleifen, die maximal 
256mal durchlaufen werden. 

Typ a: Schleifen mit maximal 256 Durchläufen 

Da 256 verschiedene Zahlen mit einem 8-Bit-Prozessor 
dargestellt werden können, verwendet man hier das X- (oder 
Y-) Register als Schleifenzähler. In Listing 12 sehen Sie 
die einfachste Form einer Schleife, die die Zeropage-Adres¬ 
sen $02 - $FF nach $6F00 kopiert. 

Da der Schleifenzähler X in Listing 12 INKREMENTIERT 
wird, haben wir es mit einer INKREMENTIERSCHLEIFE zu 
tun. Nach dem Inkrementieren (»6007 INX«) wird durch 
»6008 CPX # FE« überprüft, ob die Schleife beendet werden 
kann. Eine eingehendere Beschreibung des Programm¬ 
ablaufs erübrigt sich. 

Für Schleifen des Typs a (maximal 256 Durchläufe) ist es 
aber meist vorteilhaft, eine DEKREMENTIERSCHLEIFE zu 
verwenden. Wie eine solche Schleife programmiert wird, 
sehen wir an Listing 13. 

Listing 13 unterscheidet sich in der Wirkung nicht von 
Listing 12, obwohl man dies nicht unbedingt auf den ersten 
Blick erkennt. Deshalb soll dieses Listing näher besprochen 
werden. In Zeile 6000 erhält das X-Register den Inhalt $FE. 
Durch »6002 LDA 01,X« wird damit das letzte Byte der Zero¬ 
page, nämlich $FF, zuerst gelesen und nach $70FE 
geschrieben. Dann wird X dekrementiert. Ist X noch nicht 0, 
so wird die Schleife erneut durchlaufen. 

Der niedrigste X-Wert innerhalb der Schleife ist folglich 1; 
aufgrund von »6002 LDA 01,X« ist $02 die niedrigste 
Zeropage-Adresse, die kopiert wird. In Listing 12 ist 0 der 
niedrigste X-Wert. Die niedrigste Adresse aufgrund von 
»6002 LDA 02,X« ist also auch $02 (stimmt auffällig). Warum 
$FF die höchste kopierte Zeropage-Adresse ist, können Sie 
nun selbst den Listings 12 und 13 entnehmen. 

Listing 14 ist eine Dekrementierschleife, die die Kopie der 
Zeropage wieder von $6F00 nach $02 zurückholt. 

Der Vorteil von Dekrementierschleifen beim Typ a ist, daß 
zum Erkennen der Abbruchbedingung (X=0) kein Ver¬ 
gleichsbefehl erforderlich ist, weil nach dem DEX-Befehl 
automatisch das Z-Flag gesetzt wird, wenn X Null wird. 

Das Entfallen des Vergleichsbefehls »CPX #« bringt eine 
Ersparnis von 2 Byte Speicherplatz sowie insgesamt 508 
Taktzyklen Rechenzeit. Da jedoch bei 6004 eine Seitenüber¬ 
schreitung (eine Seite entspricht 256 Byte) vorliegt, 
schrumpft der Zeitgewinn auf 254 Taktzyklen (dies ließe sich 
aber vermeiden, indem wir die Zeropage nach $6F01 kopie¬ 
ren, womit durch »6004 STA $6F00,X« keine Seitenüber¬ 
schreitung auftreten würde). 

Nun wollen wir noch einen Sonderfall behandeln: 

Dekrementierschleifen vom Typ a, bei denen der Aus¬ 
gangswert für X < 129 ist. 

In Listing 15 sehen Sie eine Schleife, die den Bereich $16 
- $4A nach $6F00 kopiert, Listing 16 schreibt die Werte von 
$6F00 zurück nach $16. Selbstverständlich hätten wir das 
Problem auch so lösen können wie in Listing 13. Wir wollen 
aber noch eine andere Konstruktion von Dekrementierschlei¬ 
fen kennenlernen, die in diesem Sonderfall möglich ist. 
Besprechen wir also Listing 15. 

Bei 6000 wird ins X-Register die Zahl geladen, die man zu 
$16 addieren muß, um $4A zu erhalten. Dadurch wird 
zunächst bei 6002 die Adresse $4A gelesen und nach 
$6F34 geschrieben. Bei 6007 wird dekrementiert. Neu ist 
der Verzweigungsbefehl: es wird das N-Flag überprüft. Ist 
X = $FF, wird das N-Flag gesetzt und »6008 BPL 6002« 
beendet die Schleife. Der niedrigste Wert von X, der inner¬ 
halb der Schleife vorkommt, ist demnach $00. 

Der BPL-Befehl funktioniert nur, wenn der Ausgangswert 

ossa? 


,600(2) 

A0 

00 


LDY 

#00 

,6002 

B9 

00 

20 

LDA 

2000,Y 

,6005 

49 

FF 


EÜR 

#FF 

,6007 

99 

00 

20 

STA 

2000,Y 

,600A 

C8 



INY 


, 600B 

D0 

F5 


BNE 

6002 

, 600D 

EE 

04 

60 

INC 

6004 

,6010 

EE 

09 

60 

INC 

6009 

,6013 

AD 

09 

60 

LDA 

6009 

,6016 

C9 

40 


CMP 

#40 

,6018 

D0 

E8 


BNE 

6002 

Listing 24 







,6000 

A0 

00 


LDY 

#00 

,6002 

B9 

00 

40 

LDA 

4000,Y 

,6005 

49 

FF 


EOR 

#FF 

,6007 

99 

00 

40 

STA 

4000,Y 

, 600A 

CB 



INY 


, 600B 

D0 

F5 


BNE 

6002 

, 600D 

EE 

04 

60 

INC 

6004 

,6010 

EE 

09 

60 

INC 

6009 

,6013 

AD 

09 

60 

LDA 

6009 

,6016 

C9 

40 


CMP 

#40 

,6018 

D0 

ES 


BNE 

6002 
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,6000 

A9 

00 


LDA 

#00 

,6002 

8D 

13 

60 

STA 

6013 

,6005 

8D 

18 

60 

STA 

6018 

,6008 

A9 

20 


LDA 

#20 

,600A 

SD 

14 

60 

STA 

6014 

,600D 

8D 

19 

60 

STA 

6019 

,6010 

A0 

00 


LDY 

#00 

,6012 

B9 

FF 

FF 

LDA 

FFFF,Y 

,6015 

49 

FF 


EOR 

#FF 

,6017 

99 

FF 

FF 

STA 

FFFF,Y 

,601A 

CB 



INY 


,601B 

D0 

F5 


BNE 

6012 

, 601D 

EE 

14 

60 

INC 

6014 

,6020 

EE 

19 

60 

INC 

6019 

,6023 

AD 

19 

60 

LDA 

6019 

,6026 

C9 

40 


CMP 

#40 

,6028 

D0 

E8 


BNE 

6012 
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von X <129 ist. Andernfalls wäre nämlich nach dem Dekre- 
mentieren X>127 und damit das N-Flag gesetzt. Dies aber 
hätte zur Folge, daß die Schleife nur Imal durchlaufen würde. 

Zur soeben behandelten Schleifenkonstruktion sind noch 
zwei Dinge zu sagen; erstens, daß sie nur in diesem Sonder¬ 
fall (X < 129) möglich ist, und zweitens, daß sie nicht effekti¬ 
ver als eine Lösung wie in Listing 13 ist. 

Allgemeine Gültigkeit hat aber folgende Regel für Schleifen 
vom Typ a: 


Bei Schleifen vom Typ a ist Dekrementieren effektiver 
als Inkrementieren, solange die Durchlaufzahl nicht 
255 überschreitet. 

Bei 256 Durchläufen erweist sich Inkrementieren oft 
als besser. 
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An Listing 17 sehen wir ein Beispiel für den letzten Satz der 
Regel. Listing 17 kopiert die letzten 256 Speicherplätze des 
Stapels ($0100 - $01FF) und den Stapelzeiger nach $6F00 
- $7000. Listing 18 schreibt den Stapel wieder zurück. 

Die Dekrementierschleife (6000 - 600A) kopiert nun den 

( Bereich $0101 - $01FF, $0100 wird nicht übertragen. Dies 
geschieht in 600B - 600F. Eine andere Möglichkeit wäre ein 
zeitraubender CPX #FF-Befehl nach »6008 DEX«. 

6011 - 6013 sichert schließlich noch das SP-Register. 
Hier ist in der Tat eine Inkrementierschleife besser. Ändern 
wir Listing 17 also in Listing 17a: 


LDX 

#00 

- LOOP LDA 

0100.X 

STA 

6F00,X 

INX 

;(!!) 

BNE 

LOOP 

TSX 


STX 

7000 


Analog ergibt sich Listing 18a: 


LDX #00 

- LOOP LDA 6F00.X 
STA 0100.X 
INX ;(!!) 

BNE LOOP 
LDX 7000 
TXS 


In den Listings 17a und 18a habe ich diejenigen Befehle, 
die sich in der symbolischen Darstellung nicht von den 
Listings 17 und 18 unterscheiden, mit einem »-« markiert. 
Typ b: Schleifen mit mehr als 256 Durchläufen 
Während Schleifen des Typs a meist so schnell abgearbei¬ 
tet werden, daß man es gar nicht bemerkt, dauern Typ-b- 
Schleifen oft eine oder mehrere Sekunden. 

Deswegen wollen wir hier versuchen, den Zeitbedarf von 
Typ-b-Schleifen zu verringern. 

Unsere erste Typ-b-Schleife (Listing 19) soll den Bereich 
von$3FD2 bis $475F invertieren (= EOR # FF-verknüpfen, 


,6000 

A9 

D2 


LDA 

#D2 

,6002 

8D 

11 

60 

STA 

6011 

,6005 

8D 

16 

60 

STA 

6016 

,6008 

A9 

3F 


LDA 

#3F 

,600A 

8D 

12 

60 

STA 

6012 

, 600D 

8D 

17 

60 

STA 

6017 

,6010 

AD 

00 

00 

LDA 

0000 

,6013 

49 

FF 


EOR 

#FF 

,6015 

8D 

00 

00 

STA 

0000 

,6018 

EE 

11 

60 

INC 

6011 

,601B 

EE 

16 

60 

INC 

6016 

, 60 IE 

D0 

06 


BNE 

6026 

,6020 

EE 

12 

60 

INC 

6012 

,6023 

EE 

17 

60 

INC 

6017 

,6026 

AD 

11 

60 

LDA 

6011 

,6029 

C9 

60 


CMP 

#60 

, 602B 

AD 

12 

60 

LDA 

6012 

,602E 

E-9 

47 


SBC 

#47 

,6030 

90 

DE 


BCC 

6010 
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aus jeder 1 wird eine 0 und umgekehrt). Da hierfür ein 8-Bit- 
Indexregister nicht ausreicht, benötigen wir einen 16-Bit- 
Zähler, nämlich $14/$15. Dieser soll immer die Adresse bein¬ 
halten, die invertiert wird. In diesen Zähler schreibt die Initiali¬ 
sierung der Schleife den Startwert $3FD2 (siehe $6000 - 
$6007). 

Da es beim 6510 keine indirekte Adressierung für LDA/STA 
gibt, sondern nur die indirekt-indizierte oder indiziert¬ 
indirekte, müssen wir auf eine dieser Adressierungen aus- 
weichen und den Index auf 0 setzen (»6008 LDY #00«), 

Bei $600A beginnt die Schleife: der Wert wird eingelesen, 
mit $FF EOR-verknüpft und zurückgeschrieben. Nun wird 
der 16-Bit-Zähler $14/$15 erhöht (6010 - 6015). Dann wird 


,6000 

A2 

00 


LDX 

#00 

,6002 

8E 

11 

60 

STX 

6011 

,6005 

8E 

14 

60 

STX 

6014 

,6008 

A2 

A0 


LDX 

#A0 

, 600A 

8E 

12 

60 

STX 

6012 

, 600D 

8E 

15 

60 

STX 

6015 

,6010 

AE 

00 

00 

LDX 

0000 

,6013 

8E 

00 

00 

STX 

0000 

,6016 

EE 

11 

60 

INC 

6011 

,6019 

EE 

14 

60 

INC 

6014 

, 60 IC 

D0 

F2 


BNE 

6010 

,601E 

EE 

12 

60 

INC 

6012 

,6021 

EE 

15 

60 

INC 

6015 

,6024 

AE 

12 

60 

LDX 

6012 

,6027 

E0 

C0 


CPX 

#C0 

,6029 

D0 

E5 


BNE 

6010 


onunv*»' 
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80 

-.BA *6000 


90 

-.LI 1,3,0 


100 

” 5 


110 

HYPRA-ASS-QUELLTEXT ZU EINER 

120 

SELBSTMODIFIZIERENDEN SCHLEIFE 

130 

-5 (ARBEITET WIE LISTING 5) 

140 

“5 


150 

1985 BY 

FLORIAN MUELLER 

160 



170 



180 

-.GL START 

= *A000 

190 

-.GL ENDE 

= SBFFF 

200 

■”5 


210 

- 

LDX #<(START) 

220 

- 

STX MOD1+1 

230 

- 

STX MÜD2+1 

240 

— 

LDX #>(START) 

250 

- 

STX MOD1+2 

260 

- 

STX M0D2+2 

270 

-MODI 

LDX $FFFF 

2B0 

-M0D2 

STX *FFFF 

290 

- 

INC MOD1+1 

300 

— 

INC MQD2+1 

310 

- 

BNE MODI 

320 

- 

INC MOD1+2 

330 

— 

INC M0D2+2 

340 

- 

LDX MOD1+2 

350 

- 

CPX #>(ENDE+1) 

360 

- 

BNE MODI 

Listing 29 
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100 

-.BA *0801 



1080 - 

JMP READY 


WARMSTART 

110 

-.ÜB "LOADER-MAKER 64,P,W' 


1090 -: 




120 

5 



1100 -.BY "R”,*D5,13 i ”R",SHIFT 

U,RETURN 

130 

-i 



1110 -i 




140 

****************************** 

1120 —, 

HIER ENDET DER PROGRAMMTEIL, 

150 

-i * 


* 

1130 -j 

DER MODIFIZIERT WIRD. 



160 

-; * LOA 

D E R - M A K 

ER* 

1140 -i 

ES FOLGT DIE MODIFIKATIONSROUTINE: 

170 

-1 * 


* 

1150 —, 




180 

*##*#*»*■****###*#***##**##**# 

1160 -MDFIKATOR JSR *E544 

$ 

= PRINT CHR*(147) 

190 

- j * 


* 

1170 -. 

■PRINT (TEXT1) 



200 

» EIN 

PROGRAMMGENERATOR » 

1180 -i 

STARTADRESSE HOLEN 



210 

-1 * 


# 

1190 —, 




220 

* VON 

FLORIAN MUELLER » 

1200 - 

JSR *AEFD 

; 

PRUEFT AUF KOMMA 

230 

-i * 


* 

1210 - 

JSR *AD 8 A 

; 

HOLT PARAMETER 

240 

-S ........ 



1220 - 

JSR *B7F7 


NACH *147*15 

230 

-1 



1230 -; 




260 

“1 



1240 - 

LDX *14 

i 

STARTADRESSE 

270 

-1 



1250 - 

LDA *15 

3 

HOLEN, 

280 

-.BL BASIN 

- »FFCF 


1260 - 

STX START+1 

3 

IM PROGRAMM 

290 

-.QL SETPAR - *FFBA 


1270 - 

STA START+2 

3 

ABLEGEN UND 

300 

-.GL SETNAM - *FFBD 


1280 - 

JSR NUMOUT 


UND AUSGEBEN 

310 

-.GL LGAD 

■ *FFD5 


1290 -| 




320 

-.GL READY 

- *A474 


1300 -» 




330 

-.GL NUMOUT 

- *BDCD 


1310 —, 

NUN WIRD NOCH DER ZU MODIFIZIERENDE 

340 

-.GL TASTPF 

- 631 i TASTATURPUFFER 

1320 -1 

PROGRAMMTEIL IN DEN AUSGANGSZUSTAND 

350 

-.GL ANZAHL = 19B ! ENTHAELT ANZAHL 

1330 -s 

GEBRACHT: 



360 

“1 

DER ZEICHEN IM 

1340 -i 




370 

“i 

TASTATURPUFFER 

1350 - 

LDX #15 

5 

NAMEN MIT NULL-BYTES 

3B0 

-.GL KASSPF 

- B2B ; KASSETTENPUFFER 

1360 - 

LDA #0 

! 

BELEGEN 

390 

-» 



1370 -SCHLEIFE3 STA NAME,X 

3 

DURCH EINE 

400 

-5 



1380 - 

DEX 

3 

DEKREMENTIER- 

410 

-.MA PRINT 

(TEXT) 


1390 - 

BPL SCHLEIFE3 

3 

SCHLEIFE 

420 

- 

LDA #< (TEXT) 

i MAKRO 

1400 -j 




430 

- 

LDY #> (TEXT) 

; FUER 

1410 - 

STA SYSTEM+1 

3 

KEINE SYSTEMMELDUNGEN 

440 

- 

JSR *AB1E 

; TEXTAUSGABE 

1420 -( 




450 

-.RT 



1430 - 

LDA #3 

3 

SPRUNGWEITE = 3 

460 

“5 



1440 - 

STA FEHLER*1 



470 




1450 -; 




480 

~3 



1460 - 

LDA #*A2 

3 

OPCODE FUER "LDX #" 

490 

"5 



1470 - 

STA GERAETENR 



S00 

-.WO LINK+1 

; LINKPÜINTER 


1480 -3 




510 

-.WO 1985 

; ZEILENNUMMER 

1490 -; 




520 

-.BY *9E 

; TGKEN FUER 

SYS" 

1500 

AN DIESER STELLE IST DAS 

"GERUEST” 

530 

“ 

-TX "2061" 


1510 -; 

(DER ZU MODIFIZIERENDE 

TEIL) 

540 

-LINK 

.BY 0,0,0 

; ENDMARKIERUNG 

1520 -; 

IM AUSGANGSZUSTAND 



550 

-; 


DER BASIC-ZE1LE 

1530 -; 




560 




1540 -5 




570 

-SYSTEM 

LDX #0 

; FLAG FUER SYSTEM- 

1550 

EINGABE DES FILENAMEN 



5Q0 

— 

STX *9D 

; MELDUNGEN SETZEN 





590 

— 5 


cnCH y 

.XPo» t 
1570 -; 




600 

“ 

LDX #*49 

; DEKR.-ZAEHLER 

1580 -. 

..PRINT (TEXT2) 



610 

-SCHLEIFEI 

LDA ABLAGE,X 

; LADEROUTINE 

1590 - 

LDX #0 

3 

ZAEHLER AUF 0 

620 

~ 

STA KASSPF,X 

; VQN ABLAGE IN 

1600 — SCHLEIFE4 JSR BASIN 



630 

~ 

DEX 

; DEN BEREICH 

1610 - 

CMP #13 

; 

ENDE DER EINGABE? 

640 


BPL SCHLEIFEI 

; KOPIEREN, IN 

1620 - 

BEQ WEITERI 

3 

JA=>WEITER 

650 

-» 


DEM SIE LAEUFT 

1630 - 

STA NAME,X 

3 

BYTE ABLEGEN 

660 

- 

JMP KASSPF 

■, 8 . STARTEN 

1640 - 

INX 



670 

5 



1650 - 

CPX #16 

3 

16 ZEICHEN MAX. 

680 

“5 



1660 - 

BNE SCHLEIFE4 

3 

NAECHSTES ZEICHEN 

690 

ES FOLGT DIE LADEROUTINE, DIE HIER 

1670 -| 




700 

-I AN FALSCHER STELLE ABGELEGT IST UND 

1680 -; 

WENN DIESE STELLE DURCHLAUFEN WIRD. 

710 

VON DER 

" SCHLEIFE1 " ( 600-640 > IN 

1690 -; 

HAT DAS X-REGISTER DEN 

WERT 16. 

720 

DEN DRIQINALBEREICH BESCHRIEBEN WIRD. 

1700 -; 




730 

-5 



1710 -{ 

BEI "WEITERI" HINGEGEN 

KANN ES AUFGRUND 

740 

-ABLAGE 

LDA «1 

) FILENUMMER #1 

1720 -( 

DES BRANCH-BEFEHLS "BEQ 

WEITERI" 

750 


TAY 

I SEKUNDAERADRESSE #1 

1730 -5 

UNTERSCHIEDLICHE WERTE 

HABEN. 

760 

-QERAETENR 

LDX #0 

i GERAETEADRESSE #? 

1740 




770 


JSR SETPAR 

* PARAMETER SETZEN 

1730 — WEITER 1 STX LAENGE-* 1 



780 




1760 -; 




790 

-LAENGE 

LDA N0 

; LAENGE DES FILENAMEN 

1770 




H00 

“ 

LDX #<(*350 

i ADRESSE DES 

1780 -J 

EINGABE DER GERAETEADRESSE 

810 

— 

LDY #>(*350 

! FILENAMEN: *035C 

1790 -5 




820 

“ 

JSR SETNAM 

! NAMEN SETZEN 

1800 




830 

-1 



1810 

..PRINT (TEXT3) 



840 

“ 

LDA #0 

5 FLAG FUER "LADEN” 

1820 - 

JSR BASIN 

3 

HOLT ZEICHEN 

850 


JSR LOAD 


1830 - 

SEC 

3 

VOR SUBTRAKTION 

860 

“5 



1840 - 

SBC #"0" 

3 

IM AKKU STEHT JETZT 

870 

-FEHLER 

BCS LOADERROR 

; LADEFEHLER7 

1850 -| 



DIE ZAHL 

880 

-START 

JMP 0 

; ZUR STARTADRESSE 

1860 -) 




890 

-LOADERROR 

LDX #*ID 

; "LOAD ERROR" 

1870 - 

STA GERAETENR*I ; 

ABLEGEN 

900 

~ 

JMP (*300) 

5 AUSGEBEN 

1880 - 

BNE WEITER2 


GERAET < >0 : WEITER 

910 

-» 



1890 

DA ALS GERAETENUMMER 0 

EINGEGEBEN 

920 

-NAME 

.BY 0,0,0,0 

; 16 BYTES 

1900 -j 

WURDE, MUSS DER GESAMTE 

BEFEHL 

930 

“ 

•BY 0,0,0,0 

j FUER FILENAMEN 

1910 -i 

"LDX «GERAET" IN “LDX *BA" 

940 

“ 

.BY 0,0,0,0 

| RESERVIEREN 

1920 -i 

UMGEWAENDELT WERDEN, DAMIT DAS 

950 

“ 

.BY 0,0,0,0 


1930 -) 

NACHLADEN VON DEM GERAET 

ERFOLGT, 

960 

-i 



1940 -; 

VON DEM DER LADER EINBELESEN WIRD. 

970 

-BASIC 

STX *2D 

; POINTER FUER 

1950 




9B0 


STY *2E 

i PROGRAMMENDE SETZEN 

1960 - 

LDA #*A 6 

3 

OPCODE FUER "LDX ZP" 

990 

“ 

JSR *E544 

i = PRINT CHR* ( 147) 

1970 - 

STA GERAETENR 



1000 


LDX #3 

; 3 BYTES IN 

1980 - 

LDA tt*BA 


"LDX *BA” 

1010 

— 

STX ANZAHL 

; TASTATURPUFFER 

1990 - 

STA GERAETENR*!: 

GENERIEREN 

1020 

“5 



2000 -J 




1030 

-SCHLEIFE2 

LDA *0383,X 

; AUS DER TABELLE 

2010 




1040 

“ 

STA TASTPF,X 

; IN ZEILE 1100 

2020 -; 

MASCHINENPROGRAMM (J/N)? 


1050 


DEX 

; KOPIEREN 

2030 -; 

-- — _ _ 



1060 


BPL SCHLEIFE2 


2040 -i 




1070 

-i 



2050 -WE1TER2 ... PRINT(TEXT4) 


Listing 30 
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Kurs 


C 64 


2060 

- 

JSR 

JANEIN 


(JA/NEIN)7 

10070- 

.TX 

"STARTADRESSE : " 

2070 

- 

BEQ 

WEITER3 

1 

JA=>WEITER 

100Q0- 

.BY 

0 

2080 

- 

LUA 

tt* 6 C 

8 

SPRUNG AUF *036C 

10090-; 



2090 

- 

LDY 

***03 

8 

VERBIEGEN 

10100-TEXT2 

• BY 

13,13 

2100 

- 

STA 

ST ART +1 

8 

BEI *36C STEHT 

10110 - 

-TX 

"FILENAME : “ 

2110 

- 

STY 

START+2 

i 

EINE ROUTINE, 

10120 - 

■ BY 

0 

2120 

"8 




DIE DEN "RIIN" — 

10130-1 



2130 





BEFEHL SIMULIERT 

10140—TEXT3 

.BY 

13, 13 

2140 

-j 





10150- 

-TX 

"GERAETENR. (1-9:0=UEBERNt 

2150 






10160- 

.BY 

0 

2160 

“8 

SYSTEMMELDUNGEN (J/N)7 



10170-j 



2170 



■■■■UCiraBH 



101B0-TEXT4 

.BY 

13,13 

2180 

-8 





10190- 

.TX 

” M ASCH INENPROGR AMM “ 

2190 

-WEITER3 

PRINT(TEXT5) 


10200 - 

-BY 

0 

2200 

- 

JSR 

JANEIN 

8 

(JA/NEIN)7 

10210 -; 



2210 

- 

BNE 

WEITER4 

8 

NEIN=/WEITER 

10220-TEXT5 

■ BY 

13,13 

2220 

- 

LDA 

4*80 

i 

FLAG FUER 

10230- 

■ TX 

"SYSTEMMELDUNGEN" 

2230 

- 

STA 

SYSTEM+1 

8 

SYSTEMMELDUNGEN 

10240- 

■ BY 

0 

2240 






10250-1 



2250 

-j 





10260-TEXT6 

■ BY 

13,13 

2260 

-J 

LOAD ERROR 

AUSGEBEN <J/N> 

10270- 

■ TX 

"LOAD ERROR AUSGEBEN" 

2270 

— 8 





10280- 

.BY 

0 

2280 






10290-1 



2290 

_ . 





10300-TEXT7 

.BY 

13,13,18 

2300 

-WEITER4 

PRINT(TEXT 6 ) 


10310- 

.TX 

"*** LOADER GENERIERT •*» 

2310 

- 

JSR 

JANEIN 

8 

(JA/NEIN)7 

10320- 

• BY 

13,13 

2320 

- 

BEQ 

WEITERS 


NEIN»/WEITER 

10330- 

.TX 

"MIT SAVE' SPEICHERN," 

2330 

- 

LDA 

»0 

8 

FEHLERMELDUNGEN 

10340- 

.TX 

" MIT RUN' STARTEN" 

2340 

— 

STA 

FEHLER*1 


UNTERDRUECKEN 

10350- 

.BY 

0 

2350 






10360—5 



2360 






10370—TEXT8 

.BY 

13,13,18 

2370 

“8 

PROGRAMMENDE 



10380- 

■ TX 

"**» PROGRAMMENDE ! «»»" 

2380 






10390- 

.BY 

13,13,0 

2390 






10400-; 



2400 






10410—TEXT9 

-TX 

" (J/N) 7 " 

2410 

-WEITERS 

PRINT(TEXT7) 


10420- 

.BY 

0 

2420 






10430-; 



2430 


VEKTOR FUER 

BASIC-ENDE 

SETZEN 

10440—, 



2440 

-( 

=========== 

============= 

===== 

20000 -: 




STA *2E 
JMP READY 


2450 
2460 
2470 - 
2480 - 
2490 - 
2500 - 
2510 - 
2520 
2530 -5 
10000 —; 

10010-; ASCII-TABELLEN 

10030-; 

10040-; 

10050-TEXT1 .TX 

10060- .BY 


LDA **<(MDFIKATQR) 

STA *2D ; LOW-BYTE 

LDA #>(MDFIKATQR) 


HIGH-BYTE 
SPRUNG INS BASIC 




"LGADER-MAKER 64" 
13,13 


20010—, UNTERPROGRAMM FUER "J/N?" 
20020 -; ==== 

20030-; 

20040-; 

20050-JANEIN 
20060- 
20070- 
20080— 


. . PRINT(TEXT9) 

JSR BASIN ; 

CMP 

BNE JANEIN1 
PLA 5 

PLA j 

.PRINT(TEXT 8 ) 

JMP READY ; 

CMP #"J" ; 

RTS ; 


EINGABE HOLEN 


20110 -. 

20120 - 

20130-J ANEINI 

20140- 

20150-; 

20160-.EN 


Listing 30 (Schluß) 


SIEHE STAPEL- 
MANIPULATION 

SPRUNG INS BASIC 
VERGLEICH MIT "J" 
RUECKKEHR VOM 
UNTERPROGRAMM 


überprüft, ob die nächste Adresse schon mit der ersten 
Adresse nach der Endadresse ($475F), also $4760, über¬ 
einstimmt (siehe $6016 - $601D). Dieser 16-Bit-Vergleich 
wurde bereits im SMON vorgestellt. Bei $601E wird schließ¬ 
lich die Schleife beendet, falls die Abbruchbedingung (C = 1) 
erfüllt ist. 

Listing 20 ist eine Dekrementierschleife, die sich in der Wir¬ 
kung nicht von Listing 19 unterscheidet. Da das Dekremen- 
tieren einer 16-Bit-Adresse beim 6510 langsamer und spei¬ 
cherplatzaufwendiger ist als das Inkrementieren, ist Listing 
20 weniger effektiv als Listing 19. 

Grundsätzlich können Sie an den Listings 19 und 20 
sehen, wie man eine Typ-b-Schleife programmiert. Diese 
arbeitet jedoch nicht besonders schnell. Der Grund ist, daß 
der Bereich von $3FD2 - $475F nicht restlos in ganze Sei¬ 
ten (256-Byte-Blöcke)aufgeteilt werden kann. Daher sollte 
man sich immer überlegen, ob die Schleifendurchlaufzahl 
nicht auf ganze 256-Byte-Blöcke »aufgerundet« werden 
kann. In unserem Fall würde dies heißen, daß mit einer 
schnelleren Schleife der exakt 8 x 256 Byte lange Bereich 
$3FD2 - $47D1 invertiert wird, anstelle des »ungeraden« 
Bereichs $3FD2 - $475F. An einfacheren Zahlen wollen wir 
nun eine solche Schleife für ganze Seiten programmieren. 
Der 32 x 256 Byte umfassende Bereich von $2000 bis 
$3FFF (einschließlich) soll invertiert werden. Mit einer sol¬ 
cher Routine könnte das gerade sichtbare Bild bei Hi-Eddi 
invertiert werden. 


Die einfachste Form finden Sie in Listing 21. Zuerst wird die 
Anfangsadresse in $14/$15 abgelegt. Ins Y-Register kommt 
der Wert 0. Dann wird der Wert invertiert und das Y-Register, 
der Low-Zähler, erhöht. Ist der Wert noch nicht 0, wird die 
Schleife neu durchlaufen. Andernfalls wurde gerade eine 
Seite abgearbeitet. DerHigh-Zähler($15) wird erhöht. Ist der 
Inhalt des High-Zählers = $40, wird die Schleife abgebro¬ 
chen. Zu bemerken ist, daß während der Schleife die Adresse 
$14 unverändert 0 bleibt. Die Adresse, die invertiert wird, 
ergibt sich folgendermaßen: 

(Y+Inhalt von $14)-F 256 * (Inhalt von $15) 

Da wir auf die Adresse über das Prozessor-Register Y Ein¬ 
fluß nehmen können und die Adresse $14 nicht verändert 
werden muß, ist die Verarbeitungsgeschwindigkeit gegen¬ 
über der »Normalform« (Listing 20) gestiegen. Das High-Byte 
müssen wir aber weiterhin in $15 belassen. Neu führen wir 
den High-Zähler X ein. Im X-Register merken wir uns, wieviele 
Seiten invertiert werden. Diesen Wert verwenden wir als 
Dekrementierzähler. In unserem Fall werden $20 Seiten 
invertiert. Weil $20 zufälligerweise auch das High-Byte der 
Anfangsadresse ($2000) ist, wird dieser Wert in Listing 22 
nur einmal (6005) in den Akku geladen und dann bei 6009 
ins X-Register übertragen. 

Beachten Sie bitte, daß in Listing 22 die Befehle »6004 
TAY« und »6009 TAX« nur bei den Werten dieses Beispiels 
verwendet werden können. In der Regel sind eigene »LDX 
#«- oder »LDY #«-Befehle erforderlich. Wenn wir zum Bei- 
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spiel den Bereich $3FD2 - $47D1 invertieren wollen, muß 
die Initialisierung so aussehen: 

LDA # D2 Low-Byte der ersten Adresse 
STA 14 

LDY # 00 Index-Register 

LDA #3F High-Byte der ersten Adresse 

STA 15 

LDX #08 High-Zähler 
... Schleife wie ab 600C in Listing 22 
Damit hätten wir eine Schleife, die den Bereich #3FD2 - 
$475F (siehe Listings 19 und 20) invertiert und wesentlich 
schneller als die Listings 19 und 20 arbeitet. Da wir aber »auf¬ 
gerundet« haben, wird zusätzlich der Bereich $4760 - 


Programm : loadei—maker OBOl Oa3B 


OBOl 


Ob 

OB 

cl 

07 

9e 

32 

30 

36 

Oa 

0B09 


31 

00 

00 

00 

a 2 

00 

86 

9d 

ba 

OBI 1 


a 2 

49 

bd 

lf 

08 

9d 

3c 

03 

Of 

OB 19 


ca 

10 

+ 7 

4c 

3c 

03 

a9 

01 

f 7 

0B21 


a8 

a 2 

00 

20 

ba 

ff 

a9 

00 

71 

0829 


a 2 

5c 

aO 

03 

20 

bd 

ff 

a9 

c5 

0031 


00 

20 

d5 

ff 

bO 

03 

4c 

00 

Ob 

0039 


00 

a 2 

ld 

6c 

00 

03 

00 

00 

77 

08« 1 


00 

00 

00 

00 

00 

00 

00 

00 

42 

0849 


00 

00 

00 

00 

00 

00 

86 

2d 

be 

0851 


B4 

2b 

20 

44 

e5 

a2 

03 

86 

09 

0859 


c6 

bd 

B3 

03 

9d 

77 

02 

ca 

72 

0861 


10 

+ 7 

4c 

74 

a4 

52 

d5 

Od 

5d 

0869 


20 

44 

b5 

a9 

21 

aO 

09 

20 

d5 

0071 


le 

ab 

20 

fd 

ae 

20 

Ba 

ad 

9e 

0B79 


20 

+ 7 

b7 

a6 

14 

a5 

15 

Be 

37 

0881 


38 

08 

Bd 

39 

08 

20 

cd 

bd 

7c 

0089 


a2 

0+ 

a9 

00 

9d 

3+ 

OB 

ca 

a7 

0891 


10 

f a 

Bd 

Oe 

OB 

a9 

03 

Bd 

38 

0899 


36 

08 

a9 

a2 

Bd 

22 

OB 

a9 

ef 

08 a 1 


42 

aO 

09 

20 

le 

ab 

a 2 

00 

44 

08a9 


20 

cf 

ff 

c9 

Od 

fO 

OB 

9d 

9e 

08b 1 


3+ 

OB 

eB 

eO 

10 

dO 

fl 

Be 

b7 

08b9 


28 

08 

a9 

50 

aO 

09 

20 

le 

69 

08c 1 


ab 

20 

cf 

ff 

3B 

e9 

30 

8d 

lf 

0Bc9 


23 

08 

dO 

Oa 

a9 

a6 

Bd 

22 

bO 

OSd 1 


08 

a9 

ba 

8d 

23 

OB 

a9 

74 

10 

0Bd9 


aO 

09 

20 

le 

ab 

20 

lb 

Oa 

06 

08el 


+0 

Oa 

a9 

6c 

aO 

03 

Bd 

3B 

97 

0Be9 


OB 

8c 

39 

OB 

a9 

8B 

aO 

09 

fa 

08f 1 


20 

le 

ab 

20 

lb 

Oa 

dO 

05 

5f 

OBf 9 


a9 

80 

8d 

Oe 

OB 

a9 

9a 

aO 

81 

0901 


09 

20 

le 

ab 

20 

lb 

Oa 

fO 

fc 

0909 


05 

a9 

00 

Bd 

36 

08 

a9 

bl 

42 

0911 


aO 

09 

20 

le 

ab 

a9 

69 

85 

ba 

0919 


2d 

a9 

08 

85 

2e 

4c 

74 

a4 

2e 

0921 


4c 

4+ 

41 

44 

45 

52 

2d 

4d 

24 

0929 


41 

4b 

45 

52 

20 

36 

34 

Od 

4a 

0931 


Od 

53 

54 

41 

52 

54 

41 

44 

7a 

0939 


52 

45 

53 

53 

45 

20 

3a 

20 

ec 

0941 


00 

Od 

Od 

46 

49 

4c 

45 

4e 

7d 

0949 


41 

4d 

45 

20 

3a 

20 

00 

Od 

45 

0951 


Od 

47 

45 

52 

41 

45 

54 

45 

bS 

0959 


4e 

52 

2e 

20 

2B 

31 

2d 

39 

93 

0961 


3b 

30 

3d 

55 

45 

42 

45 

52 

CB 

0969 


4e 

45 

48 

4d 

45 

4e 

29 

20 

cl 

0971 


3a 

20 

00 

Od 

Od 

4d 

41 

53 

44 

0979 


43 

4B 

49 

4e 

45 

4e 

50 

52 

a9 

09B1 


4+ 

47 

52 

41 

4d 

4d 

00 

Od 

8a 

0909 


Od 

53 

59 

53 

54 

45 

4d 

4d 

40 

0991 


45 

4c 

44 

55 

4e 

47 

45 

4# 

89 

0999 


00 

Od 

Od 

4c 

4f 

41 

44 

20 

3d 

09a 1 


45 

52 

52 

4f 

52 

20 

20 

41 

b7 

09a9 


55 

53 

47 

45 

42 

45 

4e 

00 

aa 

09b 1 


Od 

Od 

12 

2a 

2a 

2a 

20 

4c 

lc 

09b 9 


4+ 

41 

44 

45 

52 

20 

47 

45 

30 

09c 1 


4e 

45 

52 

49 

45 

52 

34 

20 

eB 

09c9 


2a 

2a 

2a 

Od 

Od 

4d 

49 

54 

3e 

09dl 


20 

27 

53 

41 

56 

45 

27 

20 

ee 

09d9 


53 

50 

45 

49 

43 

48 

45 

52 

ff 

09el 


4e 

2c 

20 

4d 

49 

54 

20 

27 

fd 

09e9 


52 

55 

4e 

27 

20 

53 

54 

41 

cf 

09+ 1 


52 

54 

45 

4e 

00 

Od 

Od 

12 

49 

09+ 9 


2a 

2a 

2 a 

20 

50 

52 

4f 

47 

2a 

OaOl 


52 

41 

4d 

4d 

45 

4e 

44 

45 

53 

0a09 


20 

21 

20 

2a 

2a 

2a 

Od 

Od 

49 

Oall 


00 

20 

2B 

4a 

2f 

4e 

29 

3f 

f d 

0al9 


20 

00 

a9 

12 

aO 

Oa 

20 

le 

fd 

0a2 1 


ab 

20 

cf 

ff 

c9 

5+ 

dO 

Oc 

c3 

0a29 


6B 

68 

a9 

f 6 

aO 

09 

20 

le 

le 

0a31 


ab 

4c 

74 

a4 

c9 

4a 

60 

5c 

dd 


Listing 31 


$47D1 invertiert, obwohl wir das gar nicht wollen. Esgibtnun 
mehrere Möglichkeiten, dies zu verhindern: 

1. Wir verwenden die Schleife aus Listing 19, müssen aber 
eine deutlich höhere Arbeitsdauer hinnehmen. 

2. Wir verwenden die Schleife aus Listing 22 mit obiger 
Initialisierung. Dann invertiert eine Typ-a-Schleife den Rest¬ 
bereich $4760 - $47D1 ein weiteres Mal. Damit wären - 
eine Besonderheit der EOR # FF-Verknüpfung - im Restbe¬ 
reich die alten Inhalte wiederhergestellt. Diese Lösung eignet 
sich aber (fast) nur bei dieser logischen Verknüpfung und hilft 
bei den meisten anderen Typ-b-Schleifen nicht weiter. 

3. Dies dürfte wohl die beste Lösung sein: Wir schreiben 
eine »gemischte« Schleife, die aus einer Typ-a-Schleife und 
einer Typ-b-Schleife besteht. Dieses Verfahren ist immer (!) 
möglich und wird von der BLTUC-Routine ($A3BF) des 
Basic-Interpreters angewandt. Diese Verschiebe-Routine 
zerlegt den Bereich, der verschoben werden soll, in einen 
Bereich der aus 256-Byte-Blöcken besteht und in einen 
Restbereich. Beide Bereiche werden dann getrennt verscho¬ 
ben. 

Folgendermaßen sieht die optimale Invertierroutine für den 
Bereich $3FD2 - $475F aus: 

a) Der exakt 7 Seiten umfassende Bereich 3FD2 - $46D1 
wird mit einer Typ-b-Schleife wie in Listing 22 komplemen¬ 
tiert. 

b) Der Restbereich $46D2 - $475F wird mit einer Typ-a- 
Schleife wie in Listing 13 komplementiert. 

Wir haben nun viele verschiedene Schleifenkonstruktio¬ 
nen in Theorie und Praxis behandelt. Was uns noch fehlt, sind 
Formeln, nach denen Sie die einzelnen Parameter (zum Bei¬ 
spiel den Startwert für X in einer Dekrementier-Schleife vom 
Typ a) errechnen können. Als Zusammenfassung finden Sie 
in Form von Listing 23 ein Hypra-Ass-Assemblerlisting zu 
mehrere., Schleifenkonstruktionen. An den Queiltext-Aus- 
drücken können Sie sehen, wie einzelne Parameter errech¬ 
net werden können. 

Merke: Sofern es der Programmablauf zuläßt, sollten Sie 
Inkrementierschleifen verwenden. 

Bei Verschiebeschleifen ist aber oft eine Dekrementier- 
schleife erforderlich. 

Noch etwas zum Schleifen-Inhalt: Wenn mehrere Schleifen 
einen gleichen Innenteil haben (zum Beispiel einen Invertier¬ 
befehl), definieren Sie diesen unbedingt als Makro und nicht 
als Unterprogramm! JSRs sollten Sie nur beim Aufruf von 
ROM-Routinen verwenden. 

Damit wäre das Thema »Schleifen« erst einmal abgeschlos¬ 
sen. Im nächsten Abschnitt (über Selbstmodifikation) werden 
wir uns aber wieder mit Schleifen auseinandersetzen. 


10. Selbstmodifikation 


Bevor wir uns mit dieser Programmiertechnik beschäftigen, 
die zwar nicht strukturiert, aber sehr trickreich ist, soll der 
Begriff geklärt werden. 

Unter Modifikation versteht man »eine Änderung, Anpas¬ 
sung«. Wenn Sie bei einem Spiel einen der vielen POKE- 
Befehle, die im 64’er schon vorgestellt wurden, eingeben, so 
wird dadurch das Spiel »modifiziert«. Die Änderung ist zum 
Beispiel eine Erhöhung der Spielfigurenanzahl. 

Selbstmodifikation bedeutet, daß ein Programm sich selbst 
programmgesteuert verändert. Dies wäre der Fall, wenn im 
Spielprogramm eine Passage stünde, die den POKE aus¬ 
führt. 

Wenn Sie sich für die Selbstmodifikation von Basic- 
Programmen interessieren, finden Sie in der Zeitschrift 
»Happy-Computer« (Ausgabe 8/85) unter der Überschrift 
»Lernen Sie Ihren Commodore 64 kennen« alles, was Sie wis- 
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sen müssen. Auf simulierten Direktmodus wurde im 64’er 
schon mehrfach eingegangen, unter anderem in der 
»Memory Map mit Wandervorschlägen«. 

Wir werden uns an dieser Stelle ausschließlich mit der 
Selbstmodifikation von Maschinenprogrammen befassen. 
Als erstes Beispiel nehmen wir Listing 24. 

Es handelt sich um eine selbstmodifizierende Schleife, die 
den Bereich $2000 - $3FFF komplementiert. 

TRACEn Sie doch einmal Listing 24 mit dem SMON und 
vergleichen Sie die disassemblierten Befehle mit den 
ursprünglichen Werten, die Sie in Listing 24 finden. Sie wer¬ 
den erkennen, daß die Befehle »6002 LDA 2000,Y« und 
»6007 STA 2000,Y« aufgrund der INC-Befehle immer auf 
andere Adressen zugreifen. Besagte INC-Befehle erhöhen 
jeweils das High-Byte des Operanden. Ist dieses schon $40, 
so wird die Schleife beendet. In Listing 25 sehen Sie, wie 
unsere Schleife aus Listing 24 aussieht, wenn sie fertig 
durchlaufen wurde. Ein weiterer Start bewirkt, daß das Pro¬ 
gramm sich früher oder später selbst invertiert und darum 
abstürzt. 

Was nämlich unserem Listing 24 fehlt, damit es mehr als 
einmal arbeitet, ist eine Initialisierung, die jedesmal den Aus¬ 
gangswert ($2000) in die LDA/STA-Befehle einsetzt. In 
Listing 26 sehen Sie eine solche Initialisierung (6000 - 
600F). Die Adresse $FFFF (bei 6012 und 6017) ist ein 
Dummy-Wert, das heißt er dient nur zum vorläufigen Ausfüllen 
von Adressen und hat keine programmtechnische Bedeu¬ 
tung. Der Dummy-Wert wird ohnehin von der Initialisierung 
überschrieben; wir hätten also statt $FFFF auch $040C 
oder andere verwenden können. Wichtig ist nur, daß »LDA 
DummyY« 3 Byte belegt. 

Ein besonderer Vorteil der Selbstmodifikation ist es, daß 
selbstmodifizierende Schleifen keine Zähler in der Zeropage 
benötigen, weil der Zähler praktisch im Programm selbst 
liegt. In puncto Geschwindigkeit sind selbstmodifizierende 
Schleifen den herkömmlichen aber oft unterlegen. 

Ein weiterer Vorteil von ihnen ist aber, daß man außer mit 
weniger Zeropage-Speicherplätzen auch mit weniger Regi¬ 
stern auskommen kann (sofern man hier Einsparungen vor¬ 
nehmen will). Listing 27 beispielsweise invertiert den 
Bereich $3FD2 - $475F. X- und Y-Register sowie die Zero¬ 
page bleiben unverändert, lediglich der Akkumulator fungiert 
als Arbeitsregister. 

Listing 28 kopiert den Basic-Interpreter ($A000 - $BFFF) 
ins RAM an gleicher Adresse, wobei nur das X-Register ver¬ 
wendet wird (!). 

Nun wollen wir sehen, wie man bei der Entwicklung selbst¬ 
modifizierender Programme unter Zuhilfenahme eines guten 
Assemblers (Hypra-Ass) Vorgehen muß. 

Zunächst einmal müssen diejenigen Stellen, an denen 
Modifikationen vorgenommen werden, mit Label definiert 
werden. Von diesen Label aus können die Stellen im Speicher 
die geändert werden sollen, leicht berechnet werden. 

Befehlscode = LABEL + 0 = LABEL 
Low-Operand = LABEL + 1 

High-Operand = LABEL + 2 

Bei 2-Byte-Befehlen wird der Parameter wie der Low- 
Operand eines 3-Byte-Befehls errechnet. 

Als Beispiel finden Sie in Form von Listing 29 einen Quell¬ 
text (Assembler: Hypra-Ass) für Listing 28. Während in 
Listing 28 der Ausgangswert bei 6010 »LDX 0000« und bei 
6013 »STX 0000« ist, wurde im Quelltext $FFFF verwendet 
(270, 280), um den Assembler zu zwingen, den Dummy- 
Wert als 16-Bit-Adresse abzulegen (und nicht als Zeropage- 
Adresse, wodurch der Befehl' nur 2 statt 3 Byte belegen 
würde). 

Die Stellen, die modifiziert werden, wurden mit »MODI« 
und »MOD2« definiert. MODI ist zugleich der Schleifen¬ 
beginn. 
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Nachdem Sie jetzt den Eingang gefunden haben, möchte 
ich einige Anregungen liefern, wie Sie die Vorteile der Selbst¬ 
modifikation nutzen können. Wir werden hier die Anwendung 
nach den verschiedenen Adressierungsarten unterteilen. 

a) Anwendung auf absolute Adressierung 

Bei der Stapelmanipulation haben wir schon ein Verfahren 
kennengelernt, den Befehl JSR (indirekt), der im normalen 
6510-Befehlssatz nicht existiert, zu simulieren. 

Folgendermaßen kann über Selbstmodifikation ein Unter¬ 
programm ab ADRESSE aufgerufen werden. 

LDA # < ADRESSE 

STA SPRUNGBEFEHL-!-1 ; Low-Operand 

LDA # > ADRESSE 

STA SPRUNGBEFEHL-!-2 ; 

High-Operand 

SPRUNGBEFEHL 

JSR $FFFF ; $FFFF=Dummy 

Genauso kann man mit dem JMP-Befehl verfahren. Sogar 
bei den Schieber-, Dekrementier- und Inkrementierbefehlen, 
die im Gegensatz zu JMP die indirekte Adressierung nicht 
haben, ist auf diese Weise eine Simulation der indirekten 
Adressierung möglich. 

Wird eine Sprungtabelle per Selbstmodifikation verarbei¬ 
tet, müssen die Sprungadressen in der Tabelle nicht (!) 
dekrementiert werden. 

b) Anwendung auf Immediate-Befehle 

Oft müssen Werte, die berechnet werden, auf dem Stapel 
oder im Speicher abgelegt und dann, wenn sie gebraucht 
werden, wieder aufgenommen werden. 

Ein Beispiel hierfür ist der »Basic-Start-Generator« (64’er, 
7/85, Seite 74). Bei Erwähnung dieses Programms taucht 
natürlich die Frage auf, ob es sich hier noch um ein selbst- 
modii L- erendes Programm handelt oder ob der »Basic-Start- 
Generator« nicht eher zu den Programmgeneratoren zählt. 
Diese Frage ist voll berechtigt. Deshalb wollen wir darauf kurz 
eingehen. 

Der »Basic-Start-Generator« ist eindeutig den Programm¬ 
generatoren zuzuordnen, da der generierte Programmteil nie 
angesprüngen wird und somit ein eigenständiges Programm 
darstellt. Das Programm modifiziert also nicht sich selbst, 
sondern vielmehr ein zweites Programm, welches dann vom 
Benutzer gespeichert werden kann. 

Die Programmierung ist aber bei Programmgeneratoren 
nicht anders als bei selbstmodifizierenden Programmen. Auf 
den Unterschied Programmgeneration/Selbstmodifikation 
werden wir an späterer Stelle näher eingehen. 

Zunächst wollen wir aber ein praktisches Beispiel für die 
Anwendung der Modifikation von Immediate-Befehlen 
behandeln. Oft steht man vor dem Problem, ein Register zu 
sichern und später wieder zu holen. Im Falle des Akkumula¬ 
tors sieht das so aus: 

PHA ; Akku sichern 

; weiteres Programm 
PLA ; Akku wieder holen 

Beim X-Register wird’s schon ungünstiger: 

TXA ; X-Register in Akku 

PHA ; Akku sichern 

; weiteres Programm 
PLA ; Akku wieder holen 

TAX ; Akku ins X-Register 

Hier wird also zusätzlich der Akku beeinflußt. Wenn dies 
vermieden werden muß, wird folgender Weg gewählt: 

STX $02 ; $02 = Zwischenspeicher 

; weiteres Programm 
LDX $02 ; X wieder holen 

Für die Sicherung des X-Registers gibt es aber noch eine 
weitere Lösung, die den X-Wert im Programm ablegt und 
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dadurch nicht den Stapel oder einen Zwischenspeicher 
außerhalb des Programms benötigt. 

STX GETX+1 ; X direkt in Immediate-Befehl 
schreiben 

; weiteres Programm 
GETX LDX #$00 ; $00 = Dummy-Wert 

Obiges Beispiel kann sehr leicht auf Akkumulator oder Y- 
Register umgeschrieben werden. 

Folgendermaßen kann das X-Register mit dem Akkumulator 
verglichen werden: 

STX VGL+1 ; in Vergleichsbefehl ablegen 

(. ; evtl, weitere Programme) 

VGL CMP # $00 ; $00 = Dummy 


Als letztes Beispiel für die Anwendung auf Immediate- 
Befehle soll das Y-Register zum Akkumulator addiert werden: 


STY ADD+1 


ADD 


ADC # $FF 


in Arithmetikbefehl ablegen 
evtl, weiteres Programm) 
Carry vor Addition 
$FF = Dummy 


Die Anwendungsmöglichkeiten sind hier unbegrenzt. 


c) Anwendung auf komplette Befehle 

Bisher haben wir nur die Parameter einzelner Befehle modi¬ 
fiziert. Es ist selbstverständlich auch möglich, die Befehlsco¬ 
des oder die kompletten Befehle zu modifizieren. 

Wenn nur der Befehlscode geändert wird (zum Beispiel ein 
ORA #- in einen EOR #-Befehl) bleiben die Parameter er¬ 
halten. Es könnte ferner ein impliziter Befehl (SEI,CLI,CLD, 

DEX.INX.) geändert werden, um beispielsweise zwischen 

In- und Dekrementieren umzuschalten. Außerdem könnte bei 
einem BRANCH-Befehl die Sprungbedingung (CS,CC,VS, 
VC,NE,EQ) geändert werden. Aus BCS könnte also leicht 
BCC werden. 

Weil man hier die Opcodes der Befehle kennen muß, emp¬ 
fehle ich das erste 64’er Extra (Ausgabe 9/85) oder die 
Tabelle am Ende dieser Ausgabe. 

Nun lösen wir noch das häufig auftretende Problem, wie die 
Ausführung eines Unterprogramms verhindert wird. Dazu 
werden wir drei Lösungen (I - III) entwickeln. 


I. Die Adresse FLAG wird auf 0 gesetzt, wenn das Unter¬ 
programm ausgeführt werden soll; auf einen anderen Wert, 
wenn es nicht ausgeführt werden soll. 


LDA # 0 ; Flag für Ausführung 

STA FLAG ; Flag setzen 

(. ; evtl, weiteres Programm) 

LDA FLAG ; Flag testen 

BNE NEIN ; Flag < > O, also nicht ausführen 
JSR UNTER¬ 
PROGRAMM ; Aufruf 

NEIN . weiteres Programm 


Das Flag könnte auch am Beginn des Unterprogramms 
abgefragt und dann (wenn FLAG < > 0) das Unterprogramm 
verlassen werden. 


II. Als ersten Befehl des Unterprogramms verwenden wir 
NOP: 

UP NOP ; Beginn des Unterprogramms 

. ; Fortsetzung des Unterprogramms 

So wird die Ausführung des Unterprogramms gestattet: 
LDA #$EA ; Opcode für NOP 
STA UP ; an Anfang des Unterprogramms 

schreiben 

Und so wird sie verhindert: 

LDA #$60 ; Opcode für RTS 

STA UP ; an Anfang des Unterprogramms 

schreiben 

Wer noch einen NOP-Befehl und damit 1 Byte sparen 
möchte, kann den NOP-Befehl entfallen lassen. Dann muß 
auch der Opcode $EA beim Erlauben des Unterprogramms 
in den Opcode des ersten Byte im Unterprogramm geändert 


werden. Weil dies ziemlich mühselig ist, ziehe ich die 
ursprüngliche Lösung II trotz des um 1 Byte erhöhten Spei¬ 
cherbedarfs vor. 

III. Das beste Verfahren. Wir schalten den JSR-Befehl aus, 
indem wir ihn in einen BIT-Befehl abändern. 

AUFRUF JSR Unterprogramm 
JSR ausschalten: 

LDA # $2C ; Opcode für BIT 

STA AUFRUF 
JSR wieder erlauben: 

LDA #$20 ; Opcode für JSR 

STA AUFRUF 

Der JSR-Opcode kann auch mit $0C überschrieben wer¬ 
den. $0C ist ein illegaler Opcode für ein 3-Byte-NOP und 
arbeitet mit allen mir bekannten Versionen des C 64. Ob er 
ebenfalls auf dem C 128 läuft, konnte ich noch nicht prüfen. 

Im übrigen können mit dem soeben beschriebenen Verfah¬ 
ren auch andere Befehle ausgeschaltet werden, zum Bei¬ 
spiel JMP, LDA, STA und so weiter. Wenn aber der JSR- 
Opcode mit $2C (BIT) überschrieben wird, ist darauf zu ach¬ 
ten, daß bei der Ausführung des BIT-Befehls die Prozessor¬ 
flags gesetzt werden. 

Sicherlich gibt es noch mehr Problemlösungen als I - III, 
aber III dürfte wohl kaum zu übertreffen sein. 

d) Anwendung auf mehrere Befehle 

Selbstverständlich können ganze Befehlsfolgen, also grö¬ 
ßere Programmteile gegeneinander ausgetauscht werden. 
Zu beachten ist nur, daß die Routinen, die gegeneinander 
ausgetauscht werden, auch in dem Bereich, in den sie vom 
Programm aus geschrieben werden, lauffähig sind. Dies ist 
vor allem dann gegeben, wenn nur die relative Adressierung 
verwendet wird und dadurch die Routine im Speicher frei 
verschoben werden kann, 
e) Anv . r.dung auf Tabellen 

Dieser Anwendungsfall würde auch zum Abschnitt über 
»Tabellen« passen. 

Wir bleiben hier bei der Theorie, denn die Umsetzung in ein 
Programm ist nicht mehr schwer. Vielmehr soll Ihre Kreativität 
nicht durch Unmengen von Beispielen gehemmt werden. 

Zunächst wollen wir uns ein wenig mit dem SMON befas¬ 
sen. Wenn Sie den Disk-Monitor einschalten, kopiert das Pro¬ 
gramm einen Floppy-Befehl («Ul ..«) vom Ende des SMON in 
einen Bereich zwischen $02A0 und $02FF. Dieser Lesebe¬ 
fehl wird nach Bedarf modifiziert, zum Beispiel wird beim 
Schreiben der »Ul«- in einen »U2«-Befehl umgewandelt oder 
die Angabe des einzulesenden Blocks wird geändert. Dies 
wäre ein typisches Anwendungsbeispiel für Selbstmodifika¬ 
tion, wenn der Lesebefehl nicht erst in einen Bereich außer¬ 
halb des Programms kopiert würde (worin ich keinen Sinn 
sehe), sondern am Ende des SMON (etwa bei $CFF0) bliebe 
und dort modifiziert würde. 

Im Hi-Eddi liegt eine Tabelle, die die High-Byte der Bit-Map- 
Anfangsadressen beinhaltet. Diese Tabelle wird von Hi-Eddi 
bei jedem Bildwechsel umgerechnet. 

Nach den vorausgegangenen zwei Beispielen an Spitzen¬ 
programmen aus dem 64’er möchte ich noch andere Anwen¬ 
dungsbeispiele nennen. 

Besonders flexible Programme erlauben Eingriffe des 
Anwenders in die Befehls- oder Text-Tabellen. So können 
Bildschirmmasken editiert oder Eingabemasken erstellt wer¬ 
den. 

Ein solches Programm braucht sich nach den Modifikatio¬ 
nen nur selbst abzuspeichern. Weil hier unter Umständen ein 
erheblicher Teil des Programmschutzes verlorengeht, wer¬ 
den dann lediglich die Tabellen gespeichert. 

Ein Adventure-Generator modifiziert in der Regel auch nur 
die Tabellen eines fertigen Adventureprogramms, das eigent¬ 
liche Programm bleibt unverändert. In diesen Tabellen sind 
die einzelnen Spielsituationen enthalten. 
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Bei diesen (theoretischen) Fällen wollen wir es belassen. 
Letztendlich muß ja der Programmierer entscheiden, inwie¬ 
weit er die Selbstmodifikation auf Tabellen anwenden kann, 
f) Das Beispielprogramm »Loader-Maker 64« 

Wie aus dem Namen des Beispielprogramms schon zu ent¬ 
nehmen ist, handelt es sich um einen Programmgenerator. 
Da - wie gesagt - die Programmierung wie bei selbstmodifi¬ 
zierenden Programmen ist, habe ich bewußt einen Pro¬ 
grammgenerator als Beispiel gewählt. 

Als Listing 31 finden Sie ein MSE-Listing, falls Sie »Loader- 
Maker 64« bequem abtippen wollen und an der Anwendung 
des Programms interessiert sind. Deshalb zunächst eine 
Kurzbeschreibung für Anwender. 

»Loader-Maker« ermöglicht es Ihnen, zu einem Programm 
ein (Maschinensprache-) Ladeprogramm zu generieren, wel¬ 
ches normal geladen undmit»RUN« gestartet wird, worauf es 
das nachzuladende Programm nachlädt und startet. 

Nach dem Laden von »Loader-Maker« wird dieses Pro¬ 
gramm durch SYS 2154,START gestartet. START ist eine 
Variable und wird durch die Startadresse des nachzuladen¬ 
den Programms ausgedrückt. Soll ein Basic-Programm nach¬ 
geladen werden, hat diese Adresse keine Bedeutung (ein¬ 
fach SYS2154,0 eingeben). Bei einem Maschinenprogramm 
handelt es sich hier um die Adresse, mit der das Programm 
über »SYS« gestartet wird (49152 beim SMON $C000). 

Das Programm meldet sich mit »Loader-Maker 64« und gibt 
die Startadresse aus. Dazu können Sie den Filenamen einge¬ 
ben. 

Bei allen weiteren Eingaben (Gerätenummer, von der gela¬ 
den werden soll; Maschinenprogramm j/n; Systemmeldun¬ 
gen wie »SEARCHING FOR« ausgeben j/n; LOAD ERROR bei 
Ladefehler ausgeben j/n) können Sie das Programm durch 
Eingabe des Linkspfeils abbrechen. Sind alle Eingaben 
gemacht worden, kommt die Meldung »LOADER GENE¬ 
RIERT« und der Lader kann mit »SAVE« gespeichert werden. 

Wenn das nachzuladende Programm von der Adresse 
geladen werden soll, von der auch das Ladeprogramm selbst 
eingelesen wurde, ist als Gerätenummer nur 0 einzugeben. 

Befassen wir uns nun mit dem Programm, dessen Quelltext 
Sie als Listing 30 finden. 

Die Zeilen bis 990 stellen das Ladeprogramm in unmodifi- 
zierter Form dar und enthalten viele Dummywerte, wie zum 
Beispiel die (unsinnige) Startadresse 0 in Zeile 820. 

Mit 1000 beginnt die Modifikationsroutine. Nach 1120 
wurde die Startadresse eingelesen, die ja per SYS über¬ 
geben wurde, und wird wieder mit dem Titel ausgegeben. 
1100/1110 schreiben die Startadresse hinter den JMP- 
Befehl in Zeile 820. 

1150 - 1350 bringen das (noch unmodifizierte) Gerüst in 
den Ausgangszustand, der dann nach Bedarf geändert wird. 

1400 - 1550 holen den Filenamen, legen ihn bei NAME 
(850) ab, berechnen gleich die Länge des Filenamens und 
legen diese bei LAENGE (750) ab. 

1600 - 1720 holen die Geräteadresse. Da diese im ASCII- 
Format vorliegt, muß der ASCII-Code von 0 abgezogen wer¬ 
den (1640/1650). Wurde 0 eingegeben, wird der LDX 
# DEVICE-Befehl (730) in »LDX $BA« geändert. Die Adresse 
$BA enthält jeweils die Adresse, von der das letzte Programm 
geladen wurde. 

1750- 1850 fragen, ob das nachzuladende Programm mit 
der per SYS übermittelten Startadresse gestartet wird (Ein¬ 
gabe »j«). Wurde »n« eingegeben, muß das Programm über 
den Basic-Befehl RUN eingegeben werden. Auf eine ent¬ 
sprechende Routine (870 - 980) wird die Startadresse 
gestellt (1810 - 1840). 

1900 - 1970 ermöglichen die Einstellung, ob »SEAR¬ 
CHING..«, »LOADING« etc. ausgegeben werden sollen. 

Soll im Falle eines Ladefehlers das Programm nicht gestar¬ 
tet und stattdessen »LOAD ERROR..« ausgegeben werden, 


wird dies bei 2000 - 2090 festgelegt. Wird die Fehleraus¬ 
gabe unterdrückt, muß der BCS-Befehl (810) unschädlich 
gemacht werden. Dies geschieht einfach dadurch, daß die 
Sprungweite auf 0 gesetzt wird (2070/2080). 

Am Programmende wird noch eine Meldung ausgegeben 
(2140 - 2160) und der Vektor für das Ende des Basic- 
Programms neu gesetzt, damit das generierte Ladepro¬ 
gramm mit »SAVE« gespeichert werden kann. 

10000 - 10310 enthalten nur die Text-Tabellen. 

Von 15000 bis zur letzten Zeile (15170) steht ein Unterpro¬ 
gramm, daß bei jeder J/N-Entscheidung über »JSR J,N« auf- 
gerüfen wird'. 

Es gibt den Text »(J/N)?« aus (15030 - 15050) und holt 
eine Eingabe. Ist diese »J«, so ist nach dem Verlassen des 
Unterprogramms (1517) das Zero-Flag gesetzt (andernfalls 
nicht). 

Wurde der Linkspfeil eingegeben, wird das Programm 
abgebrochen und eine entsprechende Meldung ausgege¬ 
ben (15100 - 15150). 

Wie wir nun gesehen haben, handelt'es sich bei »Loader- 
Maker« um einen Programmgenerator. Mit zwei kleinen 
Änderungen wird er jedoch zum selbstmodifizierenden Lade¬ 
programm. Wir müssen nur die beiden »JMP READY.«- 
Befehle (2240/15150) in »JMP SYSTEM« umwandeln, 
wodurch am Programmende der generierte Lader ange¬ 
sprungen würde. Schon hätten wir ein selbstmodifizierendes 
Ladeprogramm. 

Um Ihnen noch die Anwendung des Loader-Maker zu 
erleichtern, hier zwei Eingabebeispiele: 

Startadresse.49152 

Filename.SMON $C000 

Geräteadresse.0 

Maschinenprogramm.j 

Sv.-.temmeldungen.j 

LOAD ERROR ausgeben ,.j 

Startadresse.0 (bedeutungslos) 

Filename.HI-EDDI 

Geräteadresse.8 

Maschinenprogramm.n 

Systemmeldungen.n 

LOAD ERROR ausgeben ..j 

g) Verbesserungen an »Tabellen-Beispiel« 

Zum Abschluß des Themas »Selbstmodifikation« wollen wir 
noch kleine Verbesserungen am Programm »Tabellen- 
Beispiel« erwähnen. Ich werde hier eher Anregungen geben 
als fertige Änderungsvorschläge. 

Zunächst soll die Adresse XSAVE (zum Sichern des X- 
Registers in Schleifen) überflüssig werden. So könnte es nun 
gesichert werden: 

XSV STX GETX 


GETX LDX #$00 0=Dummy; hier wird X wieder 

aufgenommen. 

Auch die Sprungtabelle läßt sich - viel einfacher, finde ich - 
anders handhaben: 

LDA J?LO,X JMLO oder JELO 

STA SPRO+1 

LDA J?HI,X JMHI oder JEHI 

STA SPRG + 2 
SPRG JMP 0000 

In den Tabellen JMLO/JMHI und JELO/JEHI (Low- und 
High-Bytes der Sprungadressen) dürfen die Adressen aber 
nicht dekrementiert werden. 

Wird ein JSR (IND)-Befehl simuliert, muß nach wie vor die 
Rücksprungadresse auf den Stapel gelegt werden. Dies 
würde entfallen, wenn die Rücksprungadresse direkt auf 
»SPRG JMP 0000« folgen und der JMP-Befehl bei SPRG in 
JSR umgewandelt würde. 
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Damit soll das Thema »Selbstmodifikation« abgeschlossen 
sein. Die vorgestellten Programmiertechniken bieten fast 
unbegrenzte Möglichkeiten, hier konnte ich nur einen kleinen 
Überblick geben, welcher aber für fortgeschrittene Program¬ 
mierer ausreicht. 

11. Mehr über relative Adressierung 


So wie wir schon die Tücken der Zeropage-Adressierung 
zumindest teilweise beseitigen konnten, wollen wir uns mit 
der in vergleichbarer Weise leistungsstarken Relativ- 
Adressierung auseinandersetzen. 

a) So vermeidet man JMP 

Oft muß eine Stelle im Programm angesprungen werden, 
ohne daß erst eine Bedingung geprüft wird. Diese Stelle ist 
nicht selten weniger als 128 Byte vom Sprungbefehl entfernt, 
könnte also relativ adressiert werden. 

Dennoch ist es in vielen Fällen möglich, einen Branch- 
Befehl - obwohl diese Befehle eine Bedingung (C=0..) prü¬ 
fen - zu verwenden. 

Beispiel: 

7050 BNE 7040 

7052 JMP 708A 

Kann ersetzt werden durch: 

7050 BNE 7040 

7052 BEQ 708A 

da bei 7052 in jedem Fall das Z-Flag = 0 ist (dafür sorgt der 
Abfang-Befehl BNE) und somit immer verzweigt wird. 

Man könnte den BEQ-Befehl als »Pseudo-Verzweigungs¬ 
befehl« bezeichnen, da die Bedingung gar nicht überprüft 
werden müßte (sie ist sowieso erfüllt). 

Der Branch-Befehl übertrifft den JMP-Befehl deutlich an 
Effektivität, da ein Byte weniger verbraucht wird. 

Im übrigen ist auch bei 
7050 BVS 7040 

7052 CLV 

der CLV-Befehl überflüssig, solange vor 7052 der Befehl von 
7050 verarbeitet wird. 

b) Zugriff auf Befehle in »Umgebung« 

Unter »Umgebung« wollen wir den Bereich um einen Pro¬ 
grammteil verstehen, der über relative Adressierung ange¬ 
sprochen werden kann. Da in diesem oft ähnliche Befehlsfol¬ 
gen stehen wie im anderen Programm, läßt sich hier durch 
gezielten Zugriff auf die »Umgebung« der Speicherplatz¬ 
bedarf senken. 

Beispielsweise stehen an vielen Stellen Im Programm RTS- 
Befehle. Diese werden, wenn ein Unterprogramm verlassen 
werden soll, manchmal durch einen Branch-Befehl ange¬ 
sprungen. 


XI 

RTS 

; Ende eines im Speicher voraus¬ 
gehenden Unterprogramms 

UP 


; Unterprogramm 

TEST 

BEQ X2 

; Unterprogramm verlassen, falls Z=0 
; andernfalls weiteres Programm 

X2 

RTS 

; Ende des Unterprogramms 


Wenn XI von TEST aus relativ adressiert werden kann, kön¬ 
nen wir folgendermaßen ein Byte sparen: 

XI RTS 
UP 

TEST BEQ XI ; nach XI springen, wo auch ein RTS 
steht 


X2 RTS ; wird nicht mehr benötigt 
Noch ein Beispiel aus dem Basic-Interpreter. Bei Adresse 
$AF08 stehen zwei Befehle, die einen SYNTAX ERROR 
erzeugen. 

Nun gibt es im Basic-Interpreter unzählige Stellen, an 
denen ein SYNTAX ERROR aufgerufen werden muß. Deshalb 


steht dort nur »JMP $AF08«. Diese Stellen werden bei 
Bedarf relativ adressiert, so daß nicht an jeder Stelle, an der 
ein SYNTAX ERROR aufgerufen wird, der Befehl »JMP 
$AF08« stehen muß. 

Zur Übung könnten Sie noch versuchen, im Programm 
Tabellen-Beispiel (Listing 11) die Menüroutine (insbesondere 
die Routinen HOME, DOWN, UP, EXEC), in der beispiels¬ 
weise wiederholt STX MPT steht, durch Zugriff auf »Umge¬ 
bung« zu optimieren. Besonders hilfreich dürfte es sein, 
zunächst statt Branch-Befehlen JMPs einzusetzen und dann 
zu überlegen, inwieweit die JMPs durch Branches ersetzt 
werden können, weil zum Beispiel nach »LDX # 0« das Z-Flag 
immer gesetzt ist etc. 

12. Puffer-Technik 


ln der Computerei fällt der Begriff »Puffer« sehr häufig. Beim 
C 64 gehören der Kassetten- und der Tastaturpuffer gemein¬ 
hin zu den bekanntesten Puffern. Statt »Puffer« kann man 
auch Zwischenspeicher sagen. Puffer dienen nämlich immer 
als Zwischenspeicher. 

Zunächst wollen wir klären, was zu einem Puffer gehört. 

a) Was benötigt ein Puffer? 

- Pufferspeicher 

Selbstverständlich muß ein Puffer einen bestimmten Spei¬ 
cherbereich belegen, in dem die Werte zwischengespei¬ 
chert werden. 

Ebenso muß die maximale Puffergröße festgelegt werden, 
damit geprüft werden kann, ob sich der Puffer schon angefüllt 
hat. Beim Kassettenzugriff werden vorerst alle Byte, die auf 
die Kassette sollen, im Puffer (ab S033C) zwischengespei¬ 
chert. Ist dieser Puffer voll, würde er beim nächsten Byte, das 
er aufntJ-men soll, überlaufen (das heißt, die maximale Puf¬ 
fergröße überschreiten). Deshalb wird dann Byte für Byte der 
Puffer entleert, indem die Bytes auf Kassette geschrieben 
werden. Jedes Byte, das auf Kassette geschrieben wurde, 
belegt keinen Speicher mehr im Puffer, so daß der Puffer wie¬ 
der aufnahmefähig ist. 

Damit das Programm, das den Puffer verwaltet, auch weiß, 
aus welcher Adresse im Puffer es sich das nächste Byte 
holen soll beziehungsweise wo im Puffer das nächste Byte 
abgelegt werden soll, gibt es noch einen 

- Pufferzeiger 

Auf englisch heißt er »BUFFER-POINTER«, woher auch die 
Abkürzung »B-P« beim Floppy-Befehl zur Manipulation des 
Pufferzeigers stammt. 

Dieser Pufferzeiger kann mit dem Stapelzeiger verglichen 
werden. Auf keinen Fall ist er mit dem 

- Puffervektor 

zu verwechseln, der die Startadresse des Pufferspeichers 
beinhaltet. Ein Puffervektor ist nicht unbedingt erforderlich, 
erhöht aber die Flexibilität. 

Damit wären die Fachausdrücke im Zusammenhang mit 
Puffern geklärt. 

b) Wann verwendet man Puffer? 

Puffer dienen in der Regel als Zwischenspeicher, wie zum 
Beispiel der Basic-Eingabepuffer (ab $0200). 

Im Fall des Tastatur- oder Diskettenpuffers aber sind die 
Puffer als Verbindungsstelle zwischen zwei parallel arbeiten¬ 
den Programmen beziehungsweise Peripheriegeräten vor¬ 
gesehen (interruptgesteuerte Tastaturabfrage/Hauptpro¬ 
gramm im Computer, DOS/Betriebssystem des Computers). 

Die Puffer sind in diesen Fällen ein Bereich, auf den zwei 
(quasi-) parallel arbeitende Programme zugreifen. 

Bei Computern, die ein wirklich starkes Multitasking bieten 
(wie der Commodore Amiga) finden Puffer weitaus mehr Ver¬ 
wendung als beim C 64, der nur einen quasiparallelen Ablauf 
ermöglicht. 
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Daher werden bei ihm Puffer hauptsächlich im I/O-Bereich 
verwendet, zum Beispiel bei Druckern, Datasette, Floppy, 
Tastatur etc. (I/O = Input/Output = Eingabe/Ausgabe). 


13. Pass-Technik 


a) Begriffserläuterung 

Der Begriff »Pass« wurde schon mehrfach im 64’er erläutert 
(unter anderem Ausgabe 7/85, Seite 51). 

Am einfachsten kann der Begriff als »Schritt beim Pro- 
grammmablauf« verstanden werden. Mit »Schritt« ist hier 
nicht ein einzelner Befehl, sondern ein größerer Block im Pro¬ 
gramm gemeint. 

Wenn ein Programm in 3 Passes (Durchläufen) arbeitet, 
heißt dies, daß 3 Schleifen hintereinander abgearbeitet wer¬ 
den, die alle eine Teilaufgabe erfüllen, die in Verbindung mit 
den anderen Passes erst eine größere Aufgabe (zum Beispiel 
eine Assemblierung) ausfüllen kann. Jeder einzelne Pass 
führt eine bestimmte Tätigkeit aus, die für das Funktionieren 
der darauffolgenden Passes unbedingt erforderlich ist. Pass 
1 wirkt also wie eine Initialisierung von Pass 2 etc. 

Komplexe Programme in Schritte (Passes) zu gliedern, 
gehört zu den Grundregeln des strukturierten Programmie- 
rens. 

b) Beispiele von Anwendungen der Pass-Technik 

Besonders umfangreiche Programme wie Assembler 
(Hypra-Ass), Compiler (Austro-Speed) und Interpreter 
(Comal) sind immer in mehrere Passes eingeteilt. 

So erfolgt bei den meisten Assemblern im ersten Pass ein 
Syntax-Check und das Anlegen der Symbol-Tabelle. Erst im 
zweiten Pass wird der Objektcode generiert, wobei die 
bereits erstellte Symboltabelle benötigt wird. 


14. Diverse Tips zur 
optimalen Speichernutzung 


Hier können wir uns zunutze machen, daß der VIC auch 
ohne Ändern des Prozessor-Ports (Adresse $0001) auf die¬ 
sen RAM-Bereich zugreifen kann. Für Grafikbilder oder einen 
geänderten Zeichensatz ist der $E000-Bereich bestens 
geeignet. 

Oft wird der $E000-Bereich zur Ablage verschiedener 
Daten verwendet, auf die nicht andauernd zugegriffen wer¬ 
den muß. 

Man könnte aber auch das Betriebssystem ins RAM ab 
$E000 kopieren und diejenigen Bereiche, in denen nicht 
benötigte Routinen stehen (zum Beispiel für Kassettenbe¬ 
trieb) einfach überschreiben. Dies ist dann sinnvoll, wenn nur 
ein paar Byte im $E000-Bereich gebraucht werden. Außer¬ 
dem ist eine gute Kenntnis des C 64-ROMs erforderlich. 

Nun wollen wir noch besprechen, wie der Speicherplatz¬ 
bedarf eines Programms niedriggehalten werden kann. Dazu 
wurde im Laufe des Kurses schon einiges gesagt (Unter¬ 
programme statt Makros verwenden etc.). 

Jedes Programm benötigt eine Menge Flags. Meist belegt 
ein Flag genau 1 Byte, für dessen Inhalt es oft nur zwei mögli¬ 
che Werte gibt: einen für »JA« und einen für »NEIN«. 

Für diese primitive Unterscheidungsform genügt aber auch 
1/8 Byte, also ein Bit. 

Wenn Sie sich das 64'er Extra in der Ausgabe 10/85 anse- 
hen, werden Sie feststellen, daß fast jedes VIC-Register 
mehrere Funktionen hat, weil jedem Bit eine eigene Bedeu¬ 
tung zukommt. Würde der VIC hier statt auf Bits auf Bytes 
zugreifen müssen, wäre er 

1 . langsamer und 

2. würde der Speicherplatzaufwand für die Register sich 

vervielfachen. 

Man sollte also bei Flags jedem Bit eine Bedeutung geben 

und nur die Bits prüfen: 

BIT Fl AG 

Darrten .st das N-Flag gesetzt, falls das 7. Bit im FLAG 
gesetzt ist, unddasV-Flag, falls das 6. Bit gesetzt ist. Die übri¬ 
gen Flags erhält man über das Z-Flag im Prozessor-Status- 
Register mit Hilfe des Akkus. Angenommen, man möchte 
testen, ob Bit 0 im Flag gesetzt ist oder nicht, dann macht das 
folgendes Programm: 


Mit übermäßig viel RAM ist der C 64 bestimmt nicht geseg¬ 
net. Bei vielen Anwendungen (zum Beispiel Datenverarbei¬ 
tung) braucht man auch das letzte Byte. 

Sie werden nun mehrere Tips erhalten, wie man den weni¬ 
gen vorhandenen Speicher möglichst sparsam verwenden 
kann. 

Zu den speicherplatzaufwendigsten Einrichtungen gehö¬ 
ren die Puffer. Der Kassettenpuffer beispielsweise belegt 
den RAM-Bereich $033C - $03FB, auf den man somit oft 
verzichten muß. 

Hier wollen wir einfach den Kassettenpuffer in den Bild¬ 
schirmspeicher (ab $0400 in Normaleinstellung) verlegen. 
LDA # <$400 
LDY # > $400 
STA $B2 
STY $B3 

Da der Bildschirm beim Kassettenbetrieb ohnehin abge¬ 
schaltet wird, fällt dies nicht auf. Nach dem Kassettenbetrieb 
sollte man aber den Bildschirm unverzüglich löschen. 

Ebenso kann man andere Puffer, für die es einen Vektor 
gibt, problemlos nach $400 verlegen, sofern sie nicht größer 
als 1000 Byte sind. 

Ein Problem für sich stellt das RAM ab $E000 (also unter 
dem Betriebssystem!) dar. Diesen Speicher kann man nur 
durch Bank-Switching nutzen, wobei man noch auf das 
Betriebssystem verzichten muß, solange der $E000-Be- 
reich auf RAM geschaltet ist. 


LDA #01 
BIT Flag 

BNE ??? ; (Bit gesetzt) 


; (Bit nicht gesetzt) 

Der Bit-Befehl ANDet den Inhalt des Akkus mit dem Inhalt der 
Speicherzelle »Flag«. Möchte man Bit 1 testen, so ist der 
Befehl LDA # 01 zu ersetzen durch LDA # 02 und so weiter. 

Durch Selbstmodifikation können Flags bekanntlich ver¬ 
mieden werden. Aber auch sonst bietet die Selbstmodifika¬ 
tion die Möglichkeit, Speicherplatz zu sparen: die Steuerung 
einer Sprungtabelle belegt mit Selbstmodifikation weniger 
Speicher als ohne. 

Auch die »Wegwerfmethode« ist sehr vorteilhaft. Pro¬ 
grammteile werden einmal abgearbeitet und dann (zum Bei¬ 
spiel durch Nachladen) überschrieben. 

Damit hätten wir unseren Kurs abgeschlossen. Ich hoffe, 
daß er Ihnen etwas Spaß gemacht hat und Sie einige interes¬ 
sante Informationen herausholen konnten. Sie sollten sich 
jedoch darüber im klaren sein, daß einige der hier vorgestell¬ 
ten Methoden die Lesbarkeit eines Assembler-Listings ein¬ 
schränken können. Also, verzichten Sie, wenn nicht unbe¬ 
dingt notwendig, auf allzu trickreiche Programmierung. Falls 
Sie noch Fragen oder Probleme haben (vielleicht erst wegen 
diesem Artikel), dann schreiben Sie doch einfach. 

(Florian Müller/tr) 
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Assembler- 
Programmierung 
auf dem C 64 

Welcher Einsteiger in die 
Welt der Computer hat nicht 
SGhön voller Neid und 
Bewunderung auf die zahl¬ 
reichen Assemblerlistings 
geblickt? 

Die Zeiten sind jetzt vor¬ 
bei. Mit diesem Buch ist es 
den Autoren gelungen, 
jedem Einsteiger den 
Sprung in die Assemblerpro¬ 
grammierung zu ermögli¬ 
chen. Die dazu benötigten 
mathematischen und schal¬ 
tungstechnischen Kennt¬ 
nisse werden im ersten 
Abschnitt des Buches genau 
besprochen. Kenntnisse 
über das Innenleben Ihres 
Computers, die von großer 
Bedeutung für die Program¬ 
mierung in Assembler sind, 
werden in einem eigenen 
Kapitel besprochen. 

Da der Umgang mit dem 
Handwerkszeug des 
Maschinenspracheprogram¬ 
mierers, nämlich dem 
Assembler, Disassembler 
und dem Monitor, den mei¬ 
sten fremd oder ungewohnt 
ist, richten die Autoren ihr 
besonderes Augenmerk auf 
den Umgang mit diesen Pro¬ 
grammen. Nach dem sorgfäl¬ 
tigen Durcharbeiten dürfte 
es jedem gelingen, selbst ein 
kleines Programm zu ent¬ 
wickeln oder eines der zahl¬ 
reichen Beispielprogramme 
zu verbessern. 


Es werden im Verlauf des 
Buches weitere fertige Pro¬ 
blemlösungen vorgestellt, 
die oft in selbsterstellte Pro¬ 
gramme übernommen wer¬ 
den können. Um den Anwen¬ 
der beim selbständigen 
Arbeiten zu unterstützen, 
bietet das Buch einiges an 
Tabellen, insbesondere zum 
Befehlssatz des Prozessors, 
zur Umrechnung von Hex 
nach Dezimal und zur 
Ansteuerung der Interface¬ 
bausteine. Man findet sogar 
eine herausnehmbare Ta¬ 
schentabelle. 

Zusammenfassend bleibt 
festzustellen, daß man für 
den Preis von 29,80 Mark 
ein didaktisch hervorragend 
aufgebautes Buch erhält, 
dessen Gesamteindruck 
noch dadurch verbessert 
wird, daß zum Buch eine Dis¬ 
kette (49 Mark), mit allen 
Programmen sowie einem 
Assembler/Monitor, ange- 
boten wird. 

(Udo Reetz/ev) 

Info: Walter Bachmann, Norbert Kluge: 
Assemblerprogrammierung auf dem C 64, 
Westermann-Verlag, 270 Seiten, 

ISBN 3-14-138813-X, Preis 29,80 Mark. 



Erfolgreicher mit 
dem VC 64 arbeiten 


Mit diesem Buch wird der 
Autor all diejenigen C 64-Be- 
sitzer erreichen, die sich 
gerade überlegen, wie sie 
den Sprung »ins Einge¬ 
machte«, nämlich die Pro¬ 
grammierung in Maschinen¬ 
sprache schaffen sollen. 


Dieses Werk berücksich¬ 
tigt nun die ganze Komplexi¬ 
tät des Themenbereiches 
und widmet sich diesem von 
der Pike auf. 

Der Verfasser, selbst 
Diplomingenieur, beginnt das 
Buch mit der Vermittlung von 
Grundlagen der Digitaltech¬ 
nik, beschreibt die Funktion 
verschiedener Zahlensy¬ 
steme und gibt als Abschluß 
des ersten Teils des Buches 
einen Überblick über das 
grundlegende Funktionsprin¬ 
zip eines Mikrocomputers, 
um dann speziell auf den Pro¬ 
zessor 6502 und seinen 
Befehlssatz einzugehen. 

Der zweite Teil des Buches 
beschäftigt sich dann im 
besonderen mit dem C64 
und seinen Eigenheiten. In 
gesonderten Kapiteln wird 
der Speicheraufbau und die 
Speicherverwaltung dem 
Lese r genauestens darge¬ 
legt, im folgenden Abschnitt 
wird das Augenmerk beson¬ 
ders auf die Interface¬ 
bausteine des C64 gerich¬ 
tet. Es werden die einzelnen 
Register und deren Pro¬ 
grammierung sehr genau 
beschrieben. 

Im dritten Teil werden 
einige kleine, aber nützliche 
Programme besprochen, die 
den Anwender auch zu selb¬ 
ständigen Arbeiten anregen 
sollen. Dieser Teil des 
Buches ist gerade für den 
Einsteiger sehr empfehlens¬ 
wert, hat er hier doch die 
Möglichkeit, seine bereits 
vorhandenen Kenntnisse 
durch Übung zu erweitern. 

Des weiteren findet man 
über das ganze Buch ver¬ 
streut zahllose Tabellen, die 
sowohl eine Hilfe für den 
Anfänger als auch ein Nach¬ 
schlagewerk für den Routi¬ 
nier darstellen. Im Anhang 
gibt es dann noch eine aus¬ 
führliche Liste der ROM- 
Routinen mit hex.- und dezi¬ 
malen Adressen und eine 
Umrechnungstabelle von 
Hexadezimal nach Dezimal 
und umgekehrt. 


Alles in allem kann man 
feststellen: Sowohl für den 
Einsteiger als auch für den 
geübten Basic-Programmie- 
rer ist dieses Buch sehr gut 
geeignet, um sich alle nöti¬ 
gen Grundlagen im Umgang 
mit der Maschinensprache 
anzueignen. 

(Udo Reetz/ev) 

Info: Franz Wunderlich: Erfolgreicher mit dem 
VC 64 arbeiten, Franz«' Verlag. 19Z Sellen, 
ISBN 3-7723-7781-6, Preis 3B Mark. 



Computerspiele 
und Wissenswertes 
- Commodore64 

Vorweg muß gesagt werden: 
Der Titel dieses Buches ist 
irreführend. Der Spielefreak, 
der hier nach einer Bereiche¬ 
rung seiner Listingsammlung 
sucht, muß ebenso ent¬ 
täuscht werden wie der Ein¬ 
steiger auf der Suche nach 
Basisinformationen. Und 
höchstwahrscheinlich wird 
der fortgeschrittene Pro¬ 
grammierer dem Buch 
wegen seines banalen Titels 
wenig Aufmerksamkeit 
schenken. Dabei ist gerade 
für den letzteren dieses 
Werk interessant. Aus dem 
Untertitel »Nützliche Maschi¬ 
nenprogramme zum Eintip¬ 
pen« geht schon eher her¬ 
vor, um welche Art Compu¬ 
terbuch es sich hier handelt: 
Es wird auf 168 Seiten eine 
Sammlung von Standard- 
Maschinenprogrammen 
angeboten, die im Program- 
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mieralltag immer wieder 
gebraucht werden. Vor¬ 
nehmlich soll der fortge¬ 
schrittene Assemblerpro¬ 
grammierer angesprochen 
werden, der bei größeren 
Aufgaben schnell und zuver¬ 
lässig auf Standardlösungen 
zurückgreifen muß und 
dabei nicht jedesmal wieder 
bei Adam und Eva beginnen 
will. 

Diese Publikation ist somit 
als reines Nachschlagewerk 
gedacht. Dementsprechend 
kurz gehalten sind die Erläu¬ 
terungen zu den verschiede¬ 
nen Sequenzen. Profis wer¬ 
den schnell das Wesentliche 
finden, ohne über unnötigen 
Ballast zu stolpern. 

Die Programmbibliothek 
reicht von einfachen Proble¬ 
men wie zum Beispiel der 
Ausgabe von Zahlen und 
Text oder der Behandlung 
des Dateisystems bis hin zu 
speziellen Problemen wie 
Terminalsimulation oder Ver¬ 
bindung zwischen einem 
Atari und einem C 64. 

Alles in allem kann man 
sagen, daß sich die Pro¬ 
gramme problemlos auf 
eigene Bedürfnisse um¬ 
stricken lassen. 

Positiv aufgefallen sind vor 
allem die Routinen zu Pro¬ 
grammierung hochauflösen¬ 
der Grafiken sowie zur 
Anwendung der RS232- 
Schnittstelle. 

Hingegen ist das Kapitel 
über die Erweiterung des 
Basic-Befehlssatzes reich¬ 
lich mager ausgefallen, 
Anwendungsbeispiele und 
Programmvorschläge fehlen 
hier ganz. Es wäre sicher 
noch wünschenswert gewe¬ 
sen, zugunsten der Assemb¬ 
ler-Neulinge das eine oder 
andere Grundlagenkapitel 
anzufügen wie zum Beispiel 
die Nutzung der ROM- 
Routinen oder das Arbeiten 
mit Label etc. 

Fazit: Dieses Buch bietet 
dem eingefleischten Pro¬ 
grammierer ein schnelles 
und zuverlässiges Hand¬ 
werkszeug und ist in Verbin¬ 
dung mit anderen Büchern 
sicher auch für Anfangs¬ 
semester interessant. 

(Matthias Rosin/ev) 

Inlo: Computerspiele 8 Wissenswertes/Com- 
modore 64, Markt STechnlk, 166 Seiten, 
ISBN 3-922120-62-8, Preis 29,80 Mark 



C 64- 

Programmieren in 
Maschinensprache 

Vorweg gesagt: Dieses Buch 
eignet sich nicht dazu, sich 
die Grundbegriffe der 
Maschinensprache anzueig¬ 
nen. Es spricht vielmehr 
jenen Leserkreis an, der sich 
schon gut in Basic eingear¬ 
beitet hat und der jetzt mit 
der fortgeschrittenen Pro¬ 
grammierung in Maschinen¬ 
sprache seine Programme 
optimieren will. Dazu bietet 
das Buch nicht nur C 64-, 
sondern auch den Besitzern 
der CBM 40XX/80XXer- 
Serie zahlreiche, gut ausge¬ 
führte, fertig ausgetestete 
Programme aus allen 
Anwendungsbereichen wie 
zum Beispiel Grafik, Floppy 
und Dateiverwaltung. Der 
Anwender muß die für ihn 
zutreffende Problemlösung 
nur noch von der ebenfalls 
mitgelieferten Diskette laden 
und in sein Programm einbin¬ 
den. Dadurch werden lästige 
Tippfehler und die damit ver¬ 
bundene, oft langwierige 
Fehlersuche vermieden. 

Das Buch ist aber nicht nur 
als fertige Softwarebiblio¬ 
thek zu betrachten, es enthält 
zudem zahllose Beispiele 
und Aufgaben, die den Sinn 
haben, das in den Program¬ 
men vermittelte Wissen wei¬ 
ter auszubauen und zu ver¬ 
tiefen. Ganz hervorragend 
werden die Ein- und Ausga¬ 
beroutinen und sämtliche 
Arithmetikfunktionen erklärt, 
die so in keinem anderen 
Buch zu finden sind. Durch 
die Verwendung der Inter¬ 
preter-Routinen wird der 
Umgang mit Zahlen kinder¬ 
leicht. Weiterhin findet man 


im Anhang eine Tabelle mit 
dem vollständigen Befehls¬ 
satz des 6502; jeder Befehl 
ist mit einem Beispiel verse¬ 
hen, das die Wirkung auf die 
Flags gut darstellt. Genauso 
ausführlich werden die wich¬ 
tigsten Einsprungadressen 
in das Betriebssystem be¬ 
schrieben. Somit erhält 
sowohl der weniger versierte 
als auch der Profi ein immer 
zu gebrauchendes Nach¬ 
schlagewerk. Auch bei häufi¬ 
gem Gebrauch wird das 
Buch seinen Leser nicht 
durch lose Seiten enttäu¬ 
schen, denn das Ganze ist 
von einem stabilen Einband 
umgeben. 

Ein Mangel fällt trotz der 
vielen Pluspunkte dennoch 
ins Auge: Der Leser muß im 
Besitz eines Assemblers/ 
Disassemblers sein, da ein 
solches Programm nicht mit¬ 
geliefert wird. Dieser Minus¬ 
punkt wird aber durch die im 
Preis enthaltene Diskette 
wieder weitestgehend aus¬ 
geglichen. 

Für einen Preis von 52 
Mark erhält man mit dem 
Buch der Diskette ein 
inhaltstarkes Nachschlage¬ 
werk, das seinesgleichen 
sucht. (Udo Reetz/ev) 

Info: W. Kassera, F. Kasaera: C 64 - Program¬ 
mieren In Maschinensprache, MarktSTechnlk, 
328 Seilen, ISBN-3-89080-168-9, Preis 
62 Mark. 



6502- 

Assemblerkurs für 
Beginner 


Dieser Assemblerkurs von 
Andreas Dripke, dem »Vater« 
von Exbasic Level II, ist eine 
Einführung in die Assembler¬ 
sprache des 6502-Mikro- 
prozessors. Auch Besitzer 


eines C 64 sind mit dem 
Buch angesprochen, denn 
der 6510-Mikroprozessor ist 
voll kompatibel zum 6502. 

Schon das Äußere des 
Buches weicht von der Norm 
ab. Es ist kein starres, 
gebundenes Buch, sondern 
es macht mehr einen ring¬ 
buchartigen Eindruck. Auch 
die Seitennumerierung ist 
anders als bei anderen 
Büchern, denn Andreas 
Dripke hat in seinem Buch 
die Seiten kapitelweise 
durchnumeriert. Das hier 
besprochene Buch bezieht 
seine Angaben auf einen 
ganz bestimmten Assembler 
(genannt T.EX. AS = Terminal 
Extended Assembler), wel¬ 
cher ebenfalls aus dem 
Hause Dripke stammt. Paral¬ 
lel zur Anschaffung des 
Buches empfiehlt sich die 
Anschaffung von »T.EX.AS«, 
obwohl der Lehrgang auch 
mit anderen Assemblern 
erfolgreich durchzuarbeiten 
ist. 

Das Buch ist für die Theo¬ 
rie als auch für die Praxis 
geschrieben, so daß man es 
am besten am Computer sit¬ 
zend bearbeitet. Die zu ler¬ 
nenden Assemblerbefehle 
werden in kleinen Program¬ 
men vorgestellt, so daß die 
Wirkung aller Befehle sofort 
ausprobiert werden kann. 

Zwischen diesen mehr 
praktisch orientierten Kapi¬ 
teln sind andere mehr theo¬ 
retischer Art eingestreut, in 
welchen von Bits und Bytes 
erzählt wird, der Speicher¬ 
aufbau erläutert wird oder 
die verschiedenen Adressie¬ 
rungsarten in der Assem¬ 
blersprache besprochen 
werden. Mit theoretischen 
Kapiteln ist allerdings nicht 
gemeint, daß diese Kapitel 
langweilig sind. Auch sie 
sind, wie das ganze Buch, in 
einer lockeren, leicht ver¬ 
ständlichen aber doch kor¬ 
rekten Sprache geschrie¬ 
ben. Und hat man wirklich 
einmal etwas nicht verstan¬ 
den, so kommt am Ende 
eines jeden Kapitels noch 
einmal eine Zusammenfas¬ 
sung, in welcher das Wich¬ 
tigste der letzten Seiten wie¬ 
derholt wird, neu erlernte 
Befehle noch einmal aufgeli¬ 
stet sind. 
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Ein Wort noch zum letzten 
Kapitel des Buches - 
Betriebssystemroutinen. 
Dieses für einen Assembler¬ 
programmiereräußerstwich¬ 
tige Kapitel wurde, bedingt 
durch die Konzeption des 
Buches, für mehrere Com¬ 
puter geeignet zu sein, nur 
recht allgemein abgehan¬ 
delt. Als C 64-Besitzer 
würde man sich hier mehr 
Informationen über seinen 
Computer wünschen, ohne 
gleich noch ein weiteres 
Buch anschaffen zu müssen. 
Ein Wunsch, der vielleicht 
durch einen computerspezi¬ 
fischen Anhang einmal in 
Erfüllung gehen könnte? 

(aw) 

Info: Androas Dripko: 6502-Asseniblerl<urs lür 
Boginnor, Infortaco Ago Verlag. ISBN 
3-88986-000-1. Preis 29,80 Mark 



64 Intern 

Obwohl Data Becker in den 
letzten Jahren den Com¬ 
puter-Literaturmarkt mit 
einer Vielzahl von Werken 
überschwemmt hat, gehört 
eines der ersten zu den 
besten. »64 Intern« war zu 
einer Zeit, als kaum jemand 
den Commodore kannte 
(beziehungsweise kaufte, 
weil er zu teuer war), das ein¬ 
zige Buch, das den mit sei¬ 
nem Handbuch alleine gelas¬ 
senen C 64-Besitzer von 
seinem Informationsdefizit 
befreien konnte. 

Ähnlich einem System¬ 
handbuch aufgebaut, soll 
»64 Intern« durch gute 
Beschreibung der Hardware 
und ihrer Programmierung 
ein ständiger Begleiter beim 
Programmieren sein. Diesen 
Anspruch unterstreicht das 
kommentierte ROM-Listing 
(in hexadezimaler Form) am 
Ende des Buches. Die wich¬ 


tigsten Kapitel dieses 
Buches sind: 

— Hardware (CPU, Spei¬ 
cherbelegungspläne, User- 
Port, Expansion-Port) 

— Tonprogrammierung (Der 
SID, Register, A/D-Wandler, 
Synthy 64) 

— Grafik (Der VIC, Register¬ 
beschreibung, Betriebsar¬ 
ten, Schnittstellen zum 
Prozessor,) 

— Ein/Ausgabebausteine 
(Register-Plan, Ports, Timer, 
die CIAs, Joystickprogram¬ 
mierung) 

— Der Basic-Interpreter 
(Erweiterung des Basic, 
Monitor-Programm, wichtige 
Kernal-Adressen, RS232, 
serieller Bus) 

— Vergleich: VC 20-CBM - 
C 64 

— ROM-Listing 

Ebenso wie das Interface 
Age Systemhandbuch ist 
»64 Intern« für den fortge¬ 
schrittenen Programmierer 
nahezu unverzichtbar. Ob¬ 
wohl sich einige Informa¬ 
tionen beider Bücher über¬ 
schneiden, wird gerade 
durch die unterschiedliche 
Erklärung in beiden Büchern 
mancher Sachverhalt erst 
richtig verständlich. (aw) 

Info: Angershausen, Brückmann. Englisch, 
Gerits: 64 Intern, Data Becker, 4. Auflage 
1984, 360 Seilen, Preia: 69 Mark 


Das Interface Age 
Systemhandbuch 
zum Commodore64 
und VC 20 

Mit diesem Buch haben die 
Profis von Interface Age ein 
Handbuch für den fortge¬ 
schrittenen Programmierer 
geschaffen. Die Autoren 
Ralph Babel, M. Krause und 
A. Dripke haben in dieses 
mehr als 300 Seiten starke 
Buch ihre ganzen Erfahrun¬ 
gen aus der jahrelangen 
Arbeit mit Commodore- 
Computern einfließen las¬ 
sen. Die eindeutige Aussage 
dieses Buches liegt in der 
Einsicht, daß ein so hervor¬ 
ragender Computer wie der 
C 64 erst in Assembler rich¬ 
tig programmiert werden 
kann. Dazu bedarf es aber 
der Kenntnis jedes einzel¬ 
nen Bausteins im C 64. Her¬ 
absteigend bis auf die Chip¬ 


internen Grundvorausset¬ 
zungen werden die Bedin¬ 
gungen der Programmierung 
des C 64 umfassend und 
leicht verständlich beschrie¬ 
ben. In den vielen ausführli¬ 
chen Kapiteln räumen die 
Autoren mit Unklarheiten 
und Halbwahrheiten über 
den C 64 auf. Die folgenden 
Themen werden dabei 
behandelt: 

— Der Basic-Interpreter 
(Interne Codierung, Token- 
Tabelle, Binärarithmetik, Dar¬ 
stellung und Ablage von 
Variablen, USR-Funktion, 
Steuercode-Tabelle 

— Assembler (Assembler¬ 
programm, Befehlsliste, 
Befehlserklärung, Adressie¬ 
rungsarten) 

— Grafik und Farbe 
(Bildschirm- und Farbspei- 
cher, Zeichengenerator, 
HiRes-Grafik, Sprites, Inter¬ 
rupt- und Grafikkontrolle, 
Screen Blanking, Smooth 
Scrolling, Registerübersicht, 
Farben, Sprite-Generator, 
Hardware des VIC) 

— Funktionstasten 

— Tonerzeugung (Tongene¬ 
ratoren Frequenzberech¬ 
nung, ADSR-Funktion, Wel¬ 
lenformen, Tonerzeugung, 
A/D-Wandler, Registerüber¬ 
sicht, Hardware des SID) 

— Ein-/Ausgabe (Serieller 
Bus, RS232, CIA-Chip, Port¬ 
programmierung, Timer, 
Interrupt-Handling, Register¬ 
übersicht, Kontrollports, 
Joystick, Paddies, Lightpen, 
Datenspeicherung auf Kas¬ 
sette/Diskette) 

— Adaption von CBM-Pro- 
grammen 

— Speicheraufteilung (Spei¬ 
cherübersicht, dokumen¬ 
tierte Memory-Map, CPU- 
Speicherverwaltung, Pro¬ 
zessorport, Banking, Pinbe¬ 
legung der CPU) 

— ROM-Listing (ausführlich 
kommentiert) 

Besonders das ausführlich 
kommentierte ROM-Listing 
ist von unschätzbarem Wert, 
denn kaum ein Assembler¬ 
programm, das nicht auf die 
Systemroutinen angewiesen 
ist. Leider sind alle Adressen 
in dezimaler Schreibweise 
aufgeführt. Besser wäre es 
gewesen, die vom Assem¬ 
bler her gewohnte hexadezi¬ 
male Form zu verwenden. 
Auch wer das Betriebs¬ 


system an seine eigenen 
Bedürfnisse anpassen 
möchte, findet hier alle not¬ 
wendigen Informationen. 
Dieses Buch trägt zu Recht 
den Namen »Systemhand¬ 
buch«. Kompromißlos richtet 
sich das Buch an den fortge¬ 
schrittenen Programmierer, 
trotzdem ist es leicht ver¬ 
ständlich. (aw) 

Info: R. Babel, M. Krause, A. Dripke: Das Inter- 
faco Age Syatemhandbuch zum Commodore 
64 und VC 20, Bezug durch den Fachhandel, 
ISBN 3-88986-001-X, Preis 74 Mark 


Das C64 
Profihandbuch 

Schon beim »Diagonallesen« 
dieses Buches, das mit 410 
Seiten zu den umfangreiche¬ 
ren Werken zählt, fällt eines 
sofort auf: Hier handelt es 
sich nicht bloß um »noch ein 
Nachschlagewerk«, sondern 
um ein wirkliches Hilfsmittel 
für den Profi. Die Autoren 
erheben von vornherein 
nicht den Anspruch der Voll¬ 
ständigkeit. Dieses Buch 
setzt hingegen gewisse 
Grundkenntnisse voraus 
und bietet auf weiterführen¬ 
der Ebene eine umfassende 
Informationsfülle. Der Hand¬ 
buchcharakter wird durch 
ein sehr umfangreiches 
Stichwortverzeichnis unter¬ 
stützt, wie es leider sonst bei 
Computerliteratur eher un¬ 
üblich ist. 

Der Inhalt gliedert sich in 
fünf logische Kapitel: 

Der erste Abschnitt behan¬ 
delt eine Auswahl allgemei¬ 
ner Routinen und Algorith¬ 
men, die sich auf jedem 
Computer realisieren lassen. 
Die ausholende Bespre¬ 
chung überrascht denjeni- 
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gen, der die »lexikographi- 
sche Langeweile« erwartet 
hatte, die die meisten Hand¬ 
bücher auszeichnet. Die 
Autoren wählen hier einen 
Lehrbuchstil, der aber durch 
seine allgemeinverständli¬ 
chen Texte, gewürzt mit Gra¬ 
fiken, Zeichnungen und kur¬ 
zen Listings, trotz der 
anspruchsvollen Themen 
überzeugt. Diesem Teil des 
Buches wird der Profi viele 
nützliche Tips entnehmen 
können, denn die Autoren 
rücken einigen Problemen 
mit fast wissenschaftlicher 
Akribie zu Leibe. Positiv fal¬ 
len in diesem Zusammen¬ 
hang auch die Verweise auf 
weiterführende Literatur auf. 
Behandelt werden beispiels¬ 
weise Sortierverfahren, Me¬ 
nütechniken, Mischverfah¬ 
ren, Selektieren und vieles 
mehr. 

Kapitel 2 stellt einige aus¬ 
gewählte Basic-Programme 
und Maschinenroutinen vor, 
die an sich noch keine 
Besonderheit darstellen, die 
aber wieder durch die gelun¬ 
gene Dokumentierung be¬ 
stechen. Im zweiten Teil 
des Kapitels werden einige 
Maschinenroutinen vorge¬ 
stellt, die die Autoren später 
ausführlich zu einer recht 
ansehnlichen Basic-Erwei- 
terung zusammenbasteln. 
Die Grafik- und Tonerzeu¬ 
gung wird in diesem Kapitel 
ebenfalls eingehend demon¬ 
striert. 

Das dritte Kapitel widmet 
sich der Beschreibung der 
I/O-Ports und Kapitel vier 
bietet einige Tips und Tricks, 
die eigentlich schon keine 
mehr sind, weil altbekannt. 
Sei’s drum, der Vollständig¬ 
keit wegen gehören auch 
solche Dinge in ein echtes 
Profi-Buch. 

Kapitel fünf fördert das 
Innenleben des C64 in 
Tabellen und Abbildungen zu 
Tage. Beispielhaft sind auch 
hier wieder die Erläuterun¬ 
gen und die Übersichtlich¬ 
keit. 

Schließlich finden sich im 
Anhang für die Basic-Erwei- 
terung noch ein Basic-Lader 
und ein Hex-Listing sowie 
der aus dem 64'er-Magazin 
übernommene Checksum¬ 
mer als Abtipphilfe für alle 
Listings. 


Fazit: Mit diesem Buch ist 
ein von der Konzeption her 
vorbildliches Werk verfüg¬ 
bar, das dem engagierten 
C64-Anwender nicht nur 
Nachschlagewerk, sondern 
auch Lehrbuch sein wird. 
Wer seinen Computer schon 
für ausgereizt hält, wird hier 
eines Besseren belehrt wer¬ 
den und wieder neue Anre¬ 
gungen finden. 

(Matthias Rosin/ev) 

Info; Hans Loronz Sohnolder, Wernor Eborl: Das 
C64 Profihandbuch, Markt&Technik. 410 Sel¬ 
ten. ISBN 3-89090-110-7. Preis 62 Mark 



C 64 Computer- 
Handbuch 

Auf der Titelseite heißt es: 
»Einführung und Referenz 
für kompetentes Arbeiten«. 
Und das ist es in der Tat. Das 
Buch ist eine deutsche 
Übersetzung und Bearbei¬ 
tung der englischen Original¬ 
ausgabe »Programming the 
Commodore 64« und kann 
getrost als eines der weni¬ 
gen Standardwerke zum 
C 64 gelten. 

Auf über mehr als 600 Sei¬ 
ten findet jeder, der sich 
etwas intensiver mit dem 
C 64 beschäftigen will, eine 
Menge Informationen, Wis¬ 
senswertes, Tips und Tricks, 
Grundlagen und Hinweise 
für Profis. Betrachtet man 
alleine die Kapitel über 
Basic, wird sogar Speziali¬ 
sten in dieser Hinsicht das 
Lesen bestimmt nicht lang¬ 
weilig werden. Man merkt mit 
jeder Seite, daß dieses Buch 
von einem wirklichen Könner 
mit langer praktischer Erfah¬ 
rung geschrieben wurde, 
ohne überflüssigen Ballast, 
konzentriert und doch an 
wichtigen Stellen ausführlich 
genug. Das Buch ist in 17 


Kapitel aufgeteilt, zusätzlich 
kommt ein Anhang mit wich¬ 
tigen Tabellen sowie ein aus¬ 
führliches Stichwortregister. 
Einen guten Eindruck von 
dem Umfang der behandel¬ 
ten Themen vermittelt ein 
Einblick in das Inhaltsver¬ 
zeichnis: 

Kapitel 1 und 2: Dem Vor¬ 
wort folgt eine allgemeine 
Einführung über die Eigen¬ 
schaften des C 64. 

3. C 64/SX 64 Basic zum 
Nachschlagen. Alle Befehle 
des C 64 mit vielen interes¬ 
santen Details. 

4. Effektives Programmieren 
in Basic. Optimierung von 
Basic-Programmen mit vie¬ 
len Beispielen. 

5. Architektur des C 64. Ein¬ 
führung in die Hardware des 
C 64, alles über die Ports. 

6. C 64/SX 64 Basic für Pro¬ 
fessionelle. Besonderheiten 
des Basic und eine Reihe 
von Dienstprogrammen und 
Erweiterungen. 

7. Einführung in die Maschi¬ 
nensprache des 6510. Um¬ 
fassende Beschreibung der 
CPU 6510 mit Beispielen 
und Prct emlösungen. 

8. Typische Methoden der 
C 64 Maschinenprogram¬ 
mierung. Wie man das Ker¬ 
nel, Basic-Routinen und das 
RAM unter dem ROM nutzt 
sowie Ändern von Basic- 
Befehlen etc. 

9. Verbindung von Basic und 
Maschinencode. 

10. Der Befehlssatz der CPU 
6510. 

11. ROM-Führer. Speicher¬ 
belegung und Betriebssy¬ 
stemroutinen. 

12. Grafik 

13. Ton und Musik 

14. Band 

15. Diskette 

16. Die Spiele-Ports. Joy¬ 
sticks, Drehregler, Grafikta¬ 
blett, Maus und Lichtgriffel 
etc. 

17. Drucker, Plotter, Modems 
Dieses Buch kann jedem 
wärmstens empfohlen wer¬ 
den, der sich etwas näher mit 
dem C 64 beschäftigen will, 
sei es nur in Basic oder auch 
in Maschinensprache. Ein 
Handbuch, das garantiert 
nicht im Regal verstaubt. 

(gk) 

Info: Raeto West; C 64 Computer Handbuch, 
TeWI-Verlag, 600 Seiten, ISBN 3-921803-24-1, 
Preis 66 Mark. 


PEEKs und POKEs 
zum 

Commodore 64 

Dieses Buch erweckt sofort 
das Interesse, verspricht 
doch der Titel endlich einmal 
ein Werk, mit dessen Hilfe 
man sich durch den »POKE- 
Wald« des Commodore 64 
kämpfen kann, ohne dabei 
an den Rand des Wahnsinns 
zu gelangen. 

Dieses Buch ist für Anfän¬ 
ger gedacht und beginnt mit 
einer lockeren Einführung in 
die Arbeitsweise des Mikro¬ 
prozessors 6502 und 
schließlich des gesamten 
Computers. Da die Informa¬ 
tionen sehr ausführlich 
nahegebracht werden, wird 
auch der blutigste Einsteiger 
schon innerhalb kurzer Zeit 
das Konzept eines Mikro¬ 
computers verstehen. 

Nach den Grundlagen 
beginnt der Autor die wich¬ 
tigsten Adressen des Spei¬ 
chers zu erläutern und die 
Funktionsweise anhand von 
Beispielen ausführlich dar¬ 
zustellen. Das fängt bei der 
Peripherieverwaltung an, 
geht über die Grafik und den 
Ton, bis hin zur Tastatur und 
schließlich zu Basic und Be¬ 
triebssystem. 

Da praktisch keine Vor¬ 
kenntnisse verlangt werden 
und das Buch zudem sehr 
erfrischend und spannend 
geschrieben ist, wird auch 
der Anfänger bei der Lektüre 
nicht überfordert, und er wird 
schnell mit den Möglichkei¬ 
ten seines C 64 vertraut. 

Etwas negativ erscheint 
nur der »Minikurs« für Ma¬ 
schinensprache am Ende 
des Buches, der eigentlich 
überflüssig ist, da sich die 
Adressaten des Buches, die 
noch ihre Anfangsschwierig¬ 
keiten mit PEEK und POKE 
überwinden müssen, sicher¬ 
lich nicht in der Lage sehen, 
auch schon in Maschinen¬ 
sprache einzusteigen. 

Insgesamt sicher ein emp¬ 
fehlenswertes Buch, bei 
dem auch der wichtige Spei¬ 
cherbelegungsplan zum 
C 64 nicht fehlt. 

(Karsten Schramm/ev) 

Info: Uesert: PEEKs & POKEs zum Commodore 
64, Data Becker 1984, 150 Seiten, 

ISBN 3-89011-032-0, 29 Mark 
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Alles über den 
Commodore 64 

Der Band 1 aus der 
Commodore-Sachbuchreihe 
ist ein Standardwerk zum 
C 64. Wie schön wäre es, 
wenn dieses gute Buch mit 
jedem C 64 anstelle des 
mageren Handbuches aus¬ 
geliefert würde. Erstmals auf 
der Hannover Messe 1984 
angeboten, erfüllt dieses 
Programmierhandbuch nun 
einen lange gehegten 
Wunsch vieler Programmie¬ 
rer: Der englischsprachige 
»Programmers Reverence 
Guide« wurde ins Deutsche 
übersetzt. 

Das fast 500 Seiten starke 
Programmierhandbuch ist im 
wesentlichen in drei Ab¬ 
schnitte gegliedert: die Pro¬ 
grammierung in Basic, in 
Assembler und die Beschrei¬ 
bung der Hardware. In allen 
drei Abschnitten wird auf die 
besonderen Baugruppen 
(Grafik, Musik, Ein-/Aus- 
gabe) des C 64 und deren 
Programmierung eingegan¬ 
gen. Dem Konzept folgend, 
kein Lehrbuch, sondern 
mehr ein Nachschlagewerk 
zu sein, sind die abgedruck¬ 
ten Beispiele relativ kurz 
gehalten. 

Gerade aus der Kürze der 
Darstellung leitet sich aber 
der wichtigste Vorteil dieses 
Buches ab: Es ist sehr leicht, 
Informationen zu den ver¬ 
schiedensten Problemen zu 
finden. Sogar bei Fragen 
zum generellen Konzept des 
C 64 hilft das Programmier¬ 
handbuch, denn am Ende 
des Buches ist ein komplet¬ 
ter Schaltplan des C 64 
eingeheftet. 

Es gibt kaum ein Buch zum 
C 64, das gleichermaßen 


umfassend informiert und 
trotzdem leicht verständlich 
geschrieben ist. Dabei bleibt 
der Wert des Buches auch 
mit steigenden Program¬ 
mierfähigkeiten des Besit¬ 
zers erhalten, denn viele 
Kapitel (Bausteinbeschrei¬ 
bung, Assemblerprogram¬ 
mierung, Z80-Modul) sind 
erst für den fortgeschritte¬ 
nen Programmierer wichtig. 
Das Programmierhandbuch 
»Alles über den Commodore 
64« sollte neben jedem C 64 
liegen, auch wenn derzeit 
noch 59 Mark zusätzlich 
investiert werden müssen. 

(aw) 

Info: »Alles über den Commodore 64«, Commo- 
doro Saohbuchreihe Band 1. Bezug übor Fach¬ 
handel. ISBN3-89133-000-6, Preis 59 Mark 


Grafik 
für Profis 

Gerade komplexere Pro¬ 
gramme im Zusammenhang 
mit Grafik sind in Basic sehr 
langsam. Da bleibt dann oft 
nur noch der Wechsel der 
Programmiersprache, also 
statt Basic »Grafik in Maschi¬ 
nensprache auf dem Com¬ 
modore 64«. 

Zunächst einmal muß man 
das Problem »wo speichere 
ich was« in den Griff bekom¬ 
men. Das Buch gibt dabei in 
seinem zweiten Kapitel eine 
Hilfestellung indem es auf¬ 
zeigt, wie die einzelnen Regi¬ 
ster des Grafikchips pro¬ 
grammiert werden müssen. 
Nach und nach werden nun 
alle Betriebsarten des 
Video-Chips angesprochen 
und anhand von Beispielen 
in Maschinensprache erläu¬ 
tert. Gleichzeitig wurden 
zum besseren Verständnis 
auch die entsprechenden 
Basic-Programme abge¬ 
druckt. 

Nachdem man nun erfah¬ 
ren hat, wo man seine Grafik 
im Speicher unterbringen 
kann, geht es weiter mit der 
Definition von Sonderzei¬ 
chen, sowohl einfarbig als 
auch in Multicolor. Das näch¬ 
ste Kapitel wird von der 
hochauflösenden Grafik 
beherrscht. Eine größere 
Maschinenroutine, die das 
Setzen und Löschen von ein¬ 
zelnen Punkten erlaubt, bil¬ 
det dabei die Grundlage. So 
bereiten auch kompliziertere 


Grafiken keine Schwierigkei¬ 
ten mehr. 

Aufgrund dieses ausführ¬ 
lichen Teils kommen die 
Sprites in diesem Buch 
etwas zu kurz. Der Autor 
beschränkt sich bei seinen 
Ausführungen auf die Be¬ 
schreibung der Register. In¬ 
teressant wird es dann noch 
einmal im 6. Kapitel, wo es 
um die Besonderheiten des 
Video-Chips geht. Dazu 
gehören unter anderem das 
Softscrolling, die Rasterregi¬ 
ster und die Beschreibung 
des Rasterinterrupts. Ein 
kleiner Anhang, der jedoch 
nicht sehr übersichtlich ist, 
bildet den Abschluß. 

Dieses Buch kann man 
allen empfehlen, die von 
Basic auf Maschinenspra¬ 
che umsteigen wollen, denn 
durch die Zweigleisigkeit 
(Maschinenprogramm und 
dazu die analoge Basic- 
Routine) wird das Umdenken 
bei der neuen Form der Pro¬ 
grammierung geübt. 

(Cristoph Sauer/ev) 

Info: Jürgen Hegner, Grafik in Maschinenspra¬ 
che auf dem Commodore 64, IWT-Verlag, 140 
gedtojTjp ffi 3-88322-051-6. Preis 38 Mark 



Ein Leitfaden für 
System- 
Programmierer 

Das Commodore-Buch, 
Band 4«, ein Leitfaden für 
Systemprogrammierer, ist 
Teil der C 64-Buchreihe von 
Markt&Technik. Dem Basic 
entwachsen, strebt so man¬ 
cher Programmierer nach 
Höherem. Dieses Buch wen¬ 
det sich deshalb vor allem an 
den Personenkreis, der 
gerade an der Schwelle der 
Assemblerprogrammierung 
steht. 


Somit widmen sich auch 
die ersten Kapitel der 
Beschreibung des Prozes¬ 
sors und seiner Befehle. 
Sehr übersichtlich werden 
Register, Adressierungs¬ 
arten und Darstellungsfor¬ 
men der Assemblerschreib¬ 
weise erklärt. 

Damit der Programmierer 
die neuen Kenntnisse auch 
sofort in die Tat umsetzen 
kann, haben die Autoren H. 
L. Schneider und W. Eberl in 
ihrem Buch gleich zwei As¬ 
sembler und einen Disas¬ 
sembler mitgeliefert. Die 
erste Assemblerversion ist in 
Basic geschrieben. Die 
zweite Version wurde in 
durch Maschinensprache 
unterstütztem Basic ent¬ 
wickelt. Selbstverständlich 
stehen zu jedem Programm 
ausführliche Beschreibun¬ 
gen und Anleitungen zur Ver¬ 
fügung. Bei sorgfältigem 
Durcharbeiten der Pro¬ 
grammanleitungen lernt der 
Einsteiger in die Maschinen¬ 
sprache-Programmierung 
nicht nur eine ganze Menge 
über die Arbeitsweise eines 
Assemblers, sondern auch 
einiges über die Verknüp¬ 
fung von Basic und Maschi¬ 
nensprache. 

Weitere Kapitel widmen 
sich der Zusammenarbeit 
von Maschinenprogrammen 
mit Basic. Sehr gut gelungen 
ist dabei die Tabelle der 
Basic-ROM-Routinen. Sie 
helfen besonders bei der 
Erstellung eigener Maschi¬ 
nenprogramme, denn durch 

geschicktes Verwenden die¬ 
ser Routinen wird viel Platz 
gespart. Der Leser lernt 
nebenbei rationell zu pro¬ 
grammieren. 

Trotzdem ist der Leitfaden für 
Systemprogrammierer kein 
Assembler-Lehrbuch, son¬ 
dern ein für den Assembler- 
Anfänger lehrreiches und für 
den Profi hilfreiches Buch, 
das in keiner Sammlung feh¬ 
len sollte. 

Der pädagogische Wert die¬ 
ses Buches wird durch die 
für 58 Mark erhältliche Dis¬ 
kette mit allen Programmen 
unterstützt. (aw) 


Info: H. L. Schneider. W. Eberl: Das Commo¬ 
dore 64-Buch, Band 4, Markt & Technik Verlag, 
Haarb. München. ISBN 3-922120-70-9, Preis: 
38 Mark 
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Checksummer 
64 V3 

Der Checksummer 64 V3 überprüft 
jede Basic-Zeile direkt nach der Ein¬ 
gabe, erkennt Fehleingaben und auch 
Vertauschungen von Ziffern und 
erspart eine aufwendige Fehlersuche. 

D er Checksummer 64 V3 ist ein kleines Maschinenpro¬ 
gramm, das Sie sofort unterrichtet, ob Sie die jeweilige 
Programmzeile korrekt eingegeben haben. 

So gehen Sie vor: 

1. Programm abtippen und speichern. 

2. Starten mit RUN 

3. Nach kurzer Zeit sehen Sie am Bildschirm: 
CHECKSUMMER 64, CHECKSUMMER AKTIVIERT, AUS¬ 
SCHALTEN MIT POKE 1,55, ANSCHALTEN MIT POKE 1,53, 
READY. 

4. Anschalten des Checksummer 64 V3 mit POKE 1,53. 

5. Test: Geben Sie in einer freien Zeile ein: »1 REM« und 
drücken die RETURN-Taste. Am Bildschirm oben links sollten 
Sie die Prüfsumme <63> sehen. 

6. Geben Sie ein Listing aus unserem Heft ein. Nach jeder 
Zeile wird die Zahl, die im Listing in Klammern < > steht, in 
den Bildschirm eingeblendet. Stimmen die Zahlen nicht über¬ 
ein, so liegt vermutlich ein Eingabefehler vor. Die Zahl in den 
Klammern, und auch die Klammern selbst, dürfen beim 
Abtippen nicht mit eingegeben werden! 

7. Dieser neue Checksummer 64 V3 bemerkt auch Vertau¬ 
schungen von Zahlen und Buchstaben, aber nicht das Fehlen 
(oder Hinzufügen) von Leerzeichen. 

8. Unsere Basic-Listings enthalten keine Steuerzeichen 
mehr. Diese werden ersetzt durch Klartext und stehen zwi¬ 
schen geschweiften Klammern. Deshalb sind weder die 
Klammern noch was dazwischen steht, abzutippen, sondern 
die in Tabelle 1 aufgeführten Tasten zu drücken. Auf Ihrem 
Bildschirm erhalten Sie dann wieder die entsprechenden 
Grafikzeichen (siehe Bild 1 und 2). 

9. Alle Grafikzeichen werden ebenfalls ersetzt durch unter¬ 
strichene oder überstrichene Großbuchstaben. Unterstri¬ 
chene Buchstaben bedeuten, daß Sie die SHIFTTaste und 
den angegebenen Buchstaben drücken müssen, überstri¬ 
chene jedoch die Commodore-Taste mit dem Buchstaben. 
Auch hier erhalten Sie am Bildschirm das entsprechende Gra¬ 


fikzeichen und nicht etwa das im Listing erkennbare Zeichen 
(siehe Bild 1 und 2). 

Die Leerzeichen zwischen den einzelnen Basic-Befehlen 
können beim Abtippen entfallen (ohne Einfluß auf die Check¬ 
summe zu nehmen). Dies ist besonders bei speicherkriti¬ 
schen Programmen wichtig. Ebenso müssen Zeilen, die mehr 
als 80 Zeichen pro Zeile enthalten, mit den bekannten Abkür¬ 
zungen für die Basic-Befehle (siehe auch das Handbuch zum 
C64, Anhang D, Seite 130) eingegeben werden. 

Sie können die Programme auch weiterhin ohne den Check¬ 
summer eintippen. (F. Lonczewski/gk) 

Hinweis: [13 SPACE] bedeutet 13mal die Leertaste drücken 


9 REM *****•******#■*■»»**«****»*•»*■*»*** 

10 PRINT"{CLR,11SPACE,RVSONJCHECKSUMMER 64 

V3LRVOFFJ" 

11 PRINT"<2D0WN,9SPACE>EINEN MOMENT, BITTE 

12 FOR 1=828 TO 864:READ A:POKE I,A:PS=P5+ 
A+l:NEXT I 

13 IF PSO5802 THEN PR INT" PRUEFSUMMENFEHLE 
R IN ZEILEN 20-22":END 

14 SYS 828:PS=0:FOR 1=58464 TO 58583:READ 
A:POKE I,A:PS=PS+A+1:NEXT I 

15 IF PS<>16267 THEN PRINT"PRUEFSUMMENFEHL 
ER IN ZEILEN 22-30“:END 

16 POKE 1,53:POKE 42289,96:POKE 42290,228 

17 PRINT"I4DQWN,9SPACE JCHECKSUMMER AKTIVIE 
RT. " 

18 PRINT"I2D0WNJAUSSCHALTEN : POKE1,55" 

19 PRINT"tDOWNJANSCHALTENT2SPACE}: F'0KE1,5 
3":NEW 

20 DATA 169,0,133,254,162,1,189,93,3,133,2 
55,160,0,177,254 

21 DATA 145,254,136,208,249,230,255,165,25 
5,221,95,3,208,238,202 

27 'i ATA 16,230,96,160,224,192,0,160,2,169, 
0,170,133,254,177 

23 DATA 95,240,40,201,32,208,3,200,208,245 
,133,255,138,41,7 

24 DATA 170,240,14,72,165,255,24,42,105,0, 

202.208.249.133.255 

25 DATA 104,170,232,165,255,24,101,254,133 
,254,76,111,228,192,4 

26 DATA 48,219,198,214,165,214,72,162,3,16 
9,32,157,1,4,189 

27 DATA 212,228,32,210,255,208,12,0,92,72, 
32,201,255,170,104 

28 DATA 144,1,138,96,202,16,228,166,254,16 
9,0,32,205,189,169 

29 DATA 62,32,210,255,104,133,214,32,108,2 

29.169.141.32.210.255 

30 DATA 76,128,164,9,60,18,19 

© G4'er 

Der Checksummer 64 V3 erkennt auch 
Vertauschungen von Zahlen. 


CTRL steht für Control-Taste, so bedeutet [CTRL-Aj, daß Sie die 

(CYAN] 

Control-Taste 8 4 

Control-Taste und die Taste »A« drücken müssen. Im folgenden steht: 

(PURPLE! 

Control-Taste 8 5 

|DOWN| 

Taste neben rechtem Shift, Cursor unten 

(GREENI 

Control-Taste 8 6 

(UPI 

Shift-Taste 8 Taste neben rechtem Shift; Cursor hoch 

(BLUE! 

Control-Taste 8 7 

ICLR] 

Shift-Taste 8 2. Taste ganz rechts oben 

(YELLOW] 

Control-Taste 8 8 

(INST| 

Shift-Taste 8 Taste ganz rechts oben 

(RVSONI 

Control-Taste 8 9 

IHOME) 

2. Taste von ganz rechts oben 

IRVOFF] 

Control-Taste 8 0 

IDELj 

Taste ganz rechts oben 

(ORANGEI 

Commodore-Taste 8 1 

|RIGHT| 

Taste ganz rechts unten 

(BROWN] 

Commodore-Taste 8 2 

(LEFTI 

Shift-Taste 8 Taste unten rechts 

(LIG.RED) 

Commodore-Taste 8 3 

| SPACE] 

Leertaste 

|GREY 11 

Commodore-Taste 8 4 

(Fl ] bis [F8j 

Funktionstasten 

IGREY2] 

Commodore-Taste 8 5 

(RETURN] 

Shift-Taste 8 Return 

[LIG.GREEN] 

Commodore-Taste & 6 

(BLACK] 

Control-Taste 8 1 

[LIG.BLUE] 

Commodore-Taste 8 7 

(WHITE] 

Control-Taste 8 2 

(GREY 3] 

Commodore-Taste 8 8 

(RED] 

Control-Taste 8 3 

Tabelle 1. Die Steuerbefehle in den Listings 
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C 64 


MSE - Abtippen 
sicher und 
leicht gemacht 

Ähnlich wie der »Checksummer« ist 
auch der MSE ein Hilfsmittel bei der 
Eingabe von Listings, diesmal jedoch 
bei reinen Maschinensprache-Pro¬ 
grammen. 

I m Gegensatz zum »Checksummer« aber ist die Eingabe 
nichtohne den MSE möglich. Der MSE verringert die Tipp¬ 
arbeit um ein Drittel und schließt Fehleingaben vollkom¬ 
men aus. Außerdem können Sie die Werte blind eingeben, 
ohne andauernd auf den Bildschirm schauen zu müssen. Dies 
wird durch akustische Meldungen realisiert. 

MSE ist ein Maschinenspracheditor, mit dem ein Vertippen 
ausgeschlossen ist. Eine abgetippte Zeile wird nur angenom¬ 
men, wenn sie richtig ist. Eine Checksumme am Ende jeder 
Zeile prüft, ob die richtigen Werte in der richtigen Zeile an der 
richtigen Stelle stehen. Wenn nicht, ertönt ein Warnsignal, 
und man beseitigt den Fehler. 

War die Zeile korrekt, erklingt ein Gong, und die nächste 
Zeilennummer wird ausgegeben. Damit ist also auch »blin¬ 
des« Eintippen möglich; Sie können sich voll auf den Te>tf kon¬ 
zentrieren. ii , 

So arbeitet man mit MSE , '' 

Laden und starten Sie MSE. Zuerst wird der Programm¬ 
name und die Start- und Endadresse erfragt. Diese Angaben/ 
entnehmen Sie dem Kopf des jeweiligen abgedruckten 
Listings. MSE meldet sich dann mit der Zeilennummer der 
ersten Zeile. Wenn Sie die Zeile richtig eingegeben haben, 
erscheint die nächste Zeilennummer und so weiter bis zum 
Ende. Zum Schluß wird das fertige Programm mit »CTRL-S« 
auf Diskette oder Kassette abgespeichert. Dazu sind keine 
weiteren Angaben mehr erforderlich. Das Programm kann 
dann ganz normal wieder geladen und gestartet werden. 


Wenn Sie nicht alles auf einmal tippen wollen, können Sie 
jederzeit unterbrechen und den eingetippten Teil mit »CTRL- 
S« abspeichern. Wollen Sie Weiterarbeiten, laden und starten 
Sie MSE wieder. 

Geben Sie auf die Frage nach der Startadresse aber jetzt 
»L« ein, um Ihr Teilprogramm zu laden. Jetzt können Sie mit 
»CTRL-N« die Adresse eingeben, an der Sie weitertippen 
müssen. Wenn Sie sich nicht gemerkt haben, wie weit Sie 
gekommen sind, geben Sie nach dem Laden »CTRL-M« ein. 

Auf die Frage nach der Startadresse antworten Sie mit der 
Anfangsadresse, die links in der Kopfzeile auf dem Bildschirm 
steht. Nun wird Ihr Programm aufgelistet. Mit »SPACE« wird 
das Listen fortgesetzt, mit »STOP« abgebrochen. Das Ende 
Ihres Programmteils erkennen Sie sehr einfach daran, daß nur 
noch der Wert »AA« in der Zeile steht. Die Adresse dieser 
Zeile müssen Sie anschließend mit »CTRL-N« eingeben. Das 
Programm ist nur mit »STOP/RESTORE« zu verlassen. Spei¬ 
chern Sie aber vorher unbedingt immer Ihren Text ab. 
Hinweise zum Abtippen 

Vor dem Abtippen oder späteren Wiederladen des MSE- 
Laders müssen Sie unbedingt folgende Zeile eingeben: 
POKE 43,1: POKE 44,32: POKE 8192,0: NEW 

Den MSE-Lader brauchen Sie nur einmal. Nach erfolgrei¬ 
chem Abtippen und Starten mit RUN geht der Lader verloren 
und es wird das endgültige Programm MSE VI.0 erzeugt. So 
gehen Sie vor: 

Starten Sie das Programm mit RUN. Fehlerhafte Zeilen wer¬ 
den angezeigt und müssen korrigiert werden, bis der Lader 
zum »READY« durchläuft. Jetzt müssen Sie das fertige MSE- 
Programm abspeichern. Dazu brauchen Sie nur »RETURN« 
zu drücken, weil die erforderlichen Angaben schon auf dem 
Bildschirm stehen. (Kassettenbesitzer müssen in Zeile 343 
die letzte Zahl in »1« abändern.) Ab jetzt können Sie »MSE 
VI.0« Ji. ikt, also ohne den DATA-Lader, benutzen. MSE VI.0 
wird ganz normal mit »,8* geladen (keine POKEs notwendig). 

(N. Mann / D. Weineck / gk) 


MSE-Befehle: 

DEL löscht die letzte Eingabe. 

CTRL-S speichert das eingetippte Programm ab. 

CTRL-L lädt ein Programm. Start- und Endadresse werden automa¬ 
tisch ermittelt. 

CTRL-M listet den Speicherinhalt. Abbruch mit STOP-Taste, weiter mit 
Leertaste. 

CTRL-N erlaubt die Eingabe einer neuen Adresse zum Weitertippen. 
CTRL-P gibt ein MSE-Listing auf dem Drucker aus. 


1013 

REM **************************** 

<091 > 


KE 198,3 

<249> 

110 

REM * * 

< 159> 

343 

PRINT"L3D0WN >SAVE"CHR* < 341"MSE V1.0"CH 


120 

REM * MSE LADER * 

< 206 > 


R*<34)",8 

< 171 > 

130 

REM * * 

<179> 

344 

END 

<092> 

220 

REM **************************** 

<210 

1000 

DATA 00,0B, 08,0A , 00,9E , 32,30,36,31 ,00 


230 

REM 

<036> 


, 00,00, A2,08, A9,36,85, A4 , A9 , 1247 

<119> 

240 

DIM H C75): FOR 1=0 TO 9 

< 113> 

1001 

DATA 08,85, A5, A9,00,85, A6, A9, B0, B5, A7 


250 

H(4B+I)=I: H(65+1)=1+10:NEXT 

<041 > 


, A0,00, Bl , A4,91 , A6, C8 , D0 , F9, 2888 

<054> 

260 

FOR 1=2048 TO 3755 : READ A* 

< 198> 

1002 

DATA E6,A5,E6,A7,CA,D0,F2,A9,36,85,01 


270 

H=ASC<LEFT*(A*,1>):L=ASC(RIGHT*<A*,1)) 

< 199> 


, 4C , 00, B0,20, D1 , B1, A9,06,8D , 2787 

< 144> 

280 

D=H(H)*16+H(L):S=S+D:POKE I,D 

<219> 

1003 

DATA 21,D0,A9,03,8D,20,D0,8D,86,02,A0 


290 

A=A+1:1F A<20 THEN NEXT:A=-1 

< 141 > 


, B3, A9,74,20, FF , B1 , A0, B3, A9, 2667 

<237> 

300 

PRINT " ZEILE:";1000+z; 

<011> 

1004 

DATA B9,20,FF,Bl , A0,00,20 ,CF ,FF ,99,01 


310 

READ V :Z=Z+1:IF V=S THEN 330 

<218> 


,02,C8,C9,0D,D0,F5,88,F0,D2, 2912 

<217> 

320 

PRINT"PRUEFSUMMENFEHLER '":STOP 

< 138> 

1005 

DATA C0,0F,90,02,A0,0E,8C,00,02,20,EA 


330 

IF A<0 THEN 341 

<221 > 


,B1,A0,B3,A9,CF,20,FF,B1,20, 2323 

<013> 

340 

S=0:A=0:PRINT:NEXT 

<046> 

1006 

DATA 8E,B4,85,FC,B5,62,20,8E,B4,85,FB 


341 

PRINT"<CLR>Pfi43,1:PS44,8:Pfl45,172:Pfl46 



,85,61,20,A7,B4,D0,20,A0,B3, 2864 

< 199> 


. 14 

<010> 

1007 

DATA A9,E5,20,FF,B1,20,8E,B4,85,60,20 


342 

POKE 631,19:POKE 632,13:P0KE 633,13:P0 



, 8E, B4,85,5F , 20, A7 , B4, D0,0A , 2624 

<091 > 

Der MSE zum bequemen Abtippen von Maschinenprogrammen 
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1008 DATA A5,61,C5,5F,A5,62,E5,60,90,06,20 

,43,B3,4C,3A,B0,A9,AA,A0,00, 2379 <167> 

1009 DATA 91,FB,E6,FB,D0,02,E6,FC,20,3F,B2 

,90,EF,4C,FB,B4,A2,02,86,58, 3118 <152> 

1010 DATA A9,A6,A0,9D,20,F2,B1,20,E4,FF,F0 

,FB,C9,30,90,0C,C9,47,B0,08, 2970 <231> 

1011 DATA C9,3A,90,0B,C9,41,B0,07,C9,14,D0 

,0F,4C,0B,B1 ,20,D2,FF,Aib,58, 2322 <121> 

1012 DATA 95,F7,C6,58,D0,D2,60,AE,8D,02,F0 

,26,C9,0C,D0,03,4C,0B,B6,C9, 2685 <057> 

1013 DATA 13,D0,03,4C,8B,B5,C9,0D,D0,03,4C 

,BA,B4,C9,10,D0,03,4C,6B,B5, 2282 <225> 

1014 DATA C9,0E,D0,06,20,5F,B4,4C,64,B1,4C 

,92,B0,A5,F9,20,02,B1,0A,0A, 2132 <208> 

1015 DATA 0A,0A,85,F9,A5,F8,20,02,B1,05,F9 

,60,C9,3A,90,02,69,08,29,0F, 1950 <092> 

1016 DATA 60,A6,59,E0,0B,90,1F,A6,58,E0,02 

,B0,06,20,D2,FF,4C,8E,B0,C6, 2509 <1B8> 

1017 DATA 59,A0,14,A9,92,20,F2,B1,CA,D0,FA 

,B4,57,6B,68,4C,BB,B1 ,A6,D3, 2891 <197> 

1018 DATA E0,0B,B0,03,4C,92,B0,20,D2,FF,A6 

,58,E0,02,90,09,C6,59,20,D2, 2468 <049> 

1019 DATA FF, C6,58, D0, F9,4C, BE, B0,48,4A, 4A 

,4A,4A,20,59,B1,68,29,0F,C9, 2419 <035> 

1020 DATA 0A,90,02,69,06,69,30,4C,D2,FF,A2 

,FC,9A,20,D1,B1,20,48,B2,20, 2261 <073> 

1021 DATA EA,B1,20,9F,B2,A5,FC,20,4E,B1,A5 

,FB,20,4E,B1,20,ED,Bl,A9,3A, 2860 <14B> 

1022 DATA A0,20,20,F2,B1,A9,00,85,59,20,8E 

,B0,20,ED,B1,A4,59,20,EF,B0, 2530 <233> 

1023 DATA 91,FB,CB,84,59,C0,08,90,EC,20,10 

,B2,A9,12,20,D2,FF,20,8E,B0, 2657 <105> 

1024 DATA 20,EF,B0,C5,FF,F0,0D,20,43,B3,A9 

,14,A0,14,20,F2,Bl,4C,A2,B1, 2665 <034> 

1025 DATA A9,92,20,D2,FF,20,33,B2,20,E0,B2 

,20,3F,B2,90,9F,4C,BB,B5,A9, 2648 <123> 

1026 DATA 93,20,D2,FF,A2,00,A9,03,9D,00,DB 

,9D,00,D9,9D,00,DA,9D,00,DB, 2476 <237> 

1027 DATA E8,D0,EF,60,A9,0D,2C,A9,20,4C,D2 

,FF,20,D2,FF,98,4C,D2,FF,20, 2965 <160> 

1028 DATA E4,FF,F0,FB,60,84,5D,B5,5C,A0,00 

,B1,5C,F0,06,20,D2,FF,CB,D0, 3100 <077> 

1029 DATA F6,60,A5,FB,85,5A,A0,00,84,5B,B1 

,FB,18,65,5A,85,5A,90,02,E6, 2606 <156> 

1030 DATA 5B, 06,5A , 26,5B, C8, C0,08,90 , EC, A5 . 

,5A,65,5B,B5,FF,60,18,A5,FB, 2467 <219> 

1031 DATA 69,08,85, FB, 90,02, E6 , FC , 60, A5, FB 

,C5,5F,A5,FC,E5,60,60,A0,B3, 3106 <1B3> 

1032 DATA A9,FB,20,FF,B1,A0,01,B9,00,02,20 

,D2,FF,CC,00,02,C8,90,F4,A9, 2692 <098> 

1033 DATA 10,ED,00,02,AA,20,ED,Bl,CA,D0,FA 

,A5,62,20,4E,B1,A5,61,20,4E, 2453 <236> 

1034 DATA Bl,20,ED,Bl,A5,60,20,4E,Bl,A5,5F 

,20,4E,B1,A9,9F,20,D2,FF,20, 2575 <03B> 

1035 DATA EA,B1,2 4,5E , 10,01 ,60,A9,12,20, D2 

,FF,A2,28,20,ED,Bl,CA,D0,F A, 2646 <161> 

1036 DATA A9,92,4C , D2 , FF , A5, D6, C9,16, B0,01 

,60,A9,A0,83,A4,A9,78,B3,A6, 2943 <204> 

1037 DATA A9,04,85 , A5,85, A7, A2,13, A0,27 , B1 

,A4,91,A6,88,10,F9,CA,F0,19, 2671 <208> 

1038 DATA 18, A5, A4,69,28,85, A4,90,02, E6, A5 

,18,A5,A6,69,28,85,A6,90,E0, 2503 <251> 

1039 DATA E6,A7,4C,B6,B2,A9,91,4C,D2,FF,A9 

,0F,8D,18,D4,A9,00,8D,05,D4, 2776 <000> 

1040 DATA A9,F7,8D,06,D4,A9,11,8D,04,D4,A9 

,32,8D,01,D4,A9,00,8D,00,D4, 2413 <126> 

1041 DATA A0,80,20,09,B3,A9,10,8D,04,D4,60 

,A2,FF,CA,D0,FD,88,D0,F8,60, 2914 <240> 

1042 DATA A9,0F , 8D, 18, D4, A9,2D, BD , 05, D4, A9 

,A5,8D,06,D4,A9,21,8D,04,D4, 23B5 <119> 

1043 DATA A9,07,80,01,D4,A9,05,80,00,D4,A0 

,FF,20,09,B3,A9,20,BD,04,D4, 2250 <07B> 

1044 DATA A9,00,8D,01,D4,BD,00,04,60,38,20 

,F0,FF,BA,48,98,48,18,A0,06, 2179 <175> 

1045 DATA A2,18,20,F0,FF,A0,B4,A9,0A,20,FF 

,Bl,20,12,B3,20,E4,FF,F0,FB, 2931 <093> 

1046 DATA A2,1D,A9,14,20,D2,FF,CA,D0,FA,6B 

,A8,68,AA,18,4C,F0,FF,0D,0D, 2704 <0B8> 

1047 DATA 0D,20,20,20,20,20,20,20,4D,41,53 

,43,4B,49,4E,45,4E,53,50,52, 1144 <216> 

104B DATA 41,43,48,45,20,2D,20,45,44,49,54 

,4F,52,20,0D,00,20,20,20,20, 1023 <03B> 


1049 DATA 20,20,20,20,56,4F,4E,20,4E,2E,4D 

,41,4E,4E,20,26,20,44,2E,57, 1128 <206> 

1050 DATA 45,49,4E, 45,43,4B, 00,0D, 0D, 0D, 20 

,20,20,50,52,4F,47,52,41,4D, 1102 <117> 

1051 DATA 4D,4E,41,4D,45,20,3A,20,00,0D,0D 

,20,20,20,53,54,41,52,54,41, 1073 <095> 

1052 DATA 44,52,45,53,53,45,20,3A,20,24,00 

,0D,0D,20,20,20,45,4E,44,41, 1014 <129> 

1053 DATA 44,52,45,53,53,45,20,20,20,3A,20 

,24,00,92,05,20,50,52,4F,47, 1171 <217> 

1054 DATA 52,41,4D,4D,20,3A,20,00,12,20,20 

,2A,2A,2A,20,46,41,4C,53,43, 1024 <027> 

1055 DATA 48,45,20,45,49,4E,47,41,42,45,20 

,2A,2A,2A,20,20,92,00,0D,0D, 1058 <098> 

1056 DATA 2A,2A,2A,20,45,4E,44,45,20,2A,2A 

,2A,00,13,05,20,20,12,44,92, 920 <14B> 

1057 DATA 49,53,4B,20,4F,44,45,52,20,12,54 

,92,41,50,45,0D,00,13,20,20, 1151 <035> 

1058 DATA 49,2F, 4F , 20,2D , 20,46,45,48,4C, 45 

,52,00,20,Dl,B1,20,48,B2,A0, 1606 <012> 

1059 DATA B3, A9, CF , 20, FF , B1,20,8E, B4,85, FC 

,20,BE,B4,B5,FB,C5,61,A5,FC, 3207 <251> 

1060 DATA E5,62,90,23,A5,FB,C5,5F,A5,FC,E5 

,60,B0,19,20,A7,B4,D0,14,60, 2860 <112> 

1061 DATA 20,A7,B4,F0,0C,85,F9,20,A7,B4,F0 

,05,85,F8,4C,EF,B0,68,6B,20, 2749 <0B8> 

1062 DATA 43,B3,4C,5F,B4,20,CF,FF,C9,4C,D0 

,09,20,D1,B1,20,4B,B2,4C,0B, 2372 <046> 

1063 DATA B6,C9,0D,60,A9,00,85,5E,20,5F,B4 

,20,EA,B1,20,0D,B5,24,5E,30, 2042 <120> 

1064 DATA 05,20, E4 , FF , F0 , FB, 20, E1 , FF, F0,26 

,20,9F,B2,24,5E,10,09,20,4E, 2435 <198> 

1065 DATA B5,20,0D , B5,20,60, B5,20,33 , B2,20 

,3F,B2,90,D7,A0,B4,A9,28,20, 2190 <207> 

1066 DATA FF,Bl ,20 ,E4 ,FF ,C9,0D, D0 ,F9, A9,00 

,85,5E,A5,61,85,FB,A5,62,85, 3056 <240> 

1067 DATA FC,20, E0,B2,4C,64, Bl , A5 ,FC, 20,4E 

,B1,A5,FB,85,FF,20,4E,B1,A9, 3003 <221> 

1068 DATA 20,A0,3A,20,F2,Bl,A0,00,20,ED,Bl 

,B1,FB,20,4E,B1,C8,C0,08,90, 2566 <070> 

1069 D.-iTA F3,20,ED,Bl ,24,5E,30,03, A9,12,2C 

,AV,20,20,D2,FF,20,10,B2,A5, 2190 <059> 

1070 DATA FF,20,4E,Bl,A9,92,20,D2,FF,4C,EA 

,B1,A9,FF,85,B8,85,B9,A9,04, 3073 <029> 

1071 DATA 85,BA,20,C0,FF,A2,FF,4C,C9,FF,20 

,CC,FF,A9,FF,4C,C3,FF,20,5F, 3315 <1B9> 

1072 DATA B4, A9,80,85,5E, 20,4E , B5,20,48, B2 

,A2,24,A9,2D,20,D2,FF,CA,D0, 2596 <111> 

1073 DATA FA, 20, EA, B1,20, EA, B1,20,60, B5,4C 

,C1,B4,20,BB,B5,A6,5F,A4,60, 2812 <015> 

1074 DATA A9,61,20,D8,FF,B0,0A,20,B7,FF,29 

,BF,D0,03,4C,FB,B4,A9,01,20, 2577 <201> 

1075 DATA C3, FF , 20,68, B6 , A0, B4 , A9,4F , 20 , FF 

,Bl,20,F9,Bl,4C,FB,B4,20,68, 2921 <237> 

1076 DATA B6, A9,37 , A0, B4,20, FF ,B1,20 ,F9, Bl 

,A2,08,C9,44,F0,06,A2,01,C9, 2717 <213> 

1077 DATA 54,D0,F1,A9,01,A8,20,BA,FF,A0,00 

,E0,01,F0,1A,A9,40,SD,20,02, 2403 <101> 

1078 DATA A9,3A,8D,21,02,B9,01 ,02,99,22,02 

,CB,CC,00,02,90,F4,CB,C8,D0, 2182 <127> 

1079 DATA 0C,B9,01,02,99,20,02,C8,CC,00,02 

,D0,F4,98,A2,20,A0,02,4C,BD, 2018 <025> 

1080 DATA FF,20,B8,B5,A5,BA,C9,08,90,33,A6 

,B9,86,57,A9,01,20,C3,FF,A9, 2800 <022> 

1081 DATA 60,85,B9,20,C0,FF,B0,28,A5,BA,20 

,B4,FF,A5,B9,20,96,FF,20,A5, 2911 <053> 

1082 DATA FF , 85,61, A5,90,4A, 4A, B0,13,20, A5 

,FF,85,62,20,AB,FF,A5,57,85, 2663 <214> 

1083 DATA B9, A9,00,20, D5, FF , 90,03,4C, A3, B5 

,86,5F,84,60,A5,BA,C9,01,D0, 2639 <131> 

1084 DATA 0A,AD,3D,03,85,61,AD,3E,03,85,62 

,4C,FB,B4,A9,13,20,D2,FF,A2, 2300 <120> 

1085 DATA IC,20,ED,Bl,CA,D0,FA,60, 1230 <214> 

© 64'er 


MSE (Schluß). Dieses Listing können Sie (müssen aber 
nicht) mit dem neuen Checksummer 64 V3 in diesem 
Heft eingeben. 
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Hypra-Ass - 
Ein Assembler 
der Spitzen¬ 
klasse 

Machen Sie es wie die Profis. Schrei¬ 
ben Sie Programme in Maschinen¬ 
sprache Dieser leistungsstarke Makro- 
Assembler macht es möglich. 

H ypra-Ass ist ein rein in Maschinensprache ge¬ 
schriebener Drei-Pass-Makroassembler mit integrier¬ 
tem Editor für den C 64 mit Floppy 1541. Er wird 
mit LOAD "HYPRA-ASS”,8 geladen und durch RUN gestartet. 
Nach dem Start meldet sich Hypra-Ass mit »break in 0« und 
»ready«. Alle Basic-Befehle sind nach dem Start noch zu ver¬ 
wenden, bis auf die Befehle LET und FOR, die Variable an- 
legen. Der Befehl RUN dient jetzt zum Starten der Assem¬ 
blierung. 

Der Quelltext 

Der Queiltext wird vom Hypra-Ass-Editor in Basic-Pro- 
grammzeilen abgelegt. Soweit wie möglich werden unnötige 
Blanks dabei eleminiert. Für die einzelnen Quelltextzeilen 
gelten die folgenden Vereinbarungen: 

1. Bei der Eingabe einer Zeile wird hinter der Zeilennummer ein 
Minuszeichen eingegeben. 

2. Jede Zeile enthält höchstens einen Assemblerbefehl. 

3. Vor einem Assemblerbefehl darf in derselben Zeile höchstens 
ein Label stehen. 

4. Label beginnen direkt hinter dem Minuszeichen. 

5. Vor jedem Assemblerbefehl steht mindestens ein Blank. 

6. Label und Assemblerbefehl werden durch mindestens ein Blank 
voneinander getrennt. 

7. Ein Label darf nicht allein in einer Zeile stehen. 

8. Kommentar wird durch ein Semikolon vom Rest der Zeile 
getrennt. 

9. Reine Kommentarzeilen müssen als erstes Zeichen hinter dem 
Minuszeichen ein Semikolon haben. 

10. PseUdo-Ops (.ba, .eq...) können direkt hinter dem Minuszeichen 
beginnen. 

Beispiele: 

100 -.ba $C000 
110 -Initialisierung 
120 -; reine Kommentarzeile 

130 - Ida $14; Kommentar hinter einem Befehl 

140 -marke Idx $15; mit Label davor 

Zur bequemeren Eingabe und Bearbeitung des Quelltextes 
stellt Hypra-Ass im Editor insgesamt 2 5 Befehle zur Verfügung 
(Bild 1). 

Rechnungen im Quelltext 

Hypra-Ass erlaubt die vier Grundrechenarten plus Potenzie¬ 
rung, die logischen Operationen NOT, AND und OR, die Ver¬ 
gleiche »gleich«, »kleiner« und »größer« sowie den Einsatz der 
Funktionen <(...) und >(...), die das Low- beziehungsweise 
Highbyte eines Argumentes liefern. Die logischen Operatoren 
und die Vergleiche werden wie folgt abgekürzt: 

In! = not !a! = and !o! = or ! = ! = gleich 
!<! = kleiner als !>! = größer als 


Das Ergebnis eines Vergleiches ist —1, falls wahr, 0, falls 
nicht wahr: (1| = !2)=0 (1! = !1)=—1 

Auch die NOT-Verknüpfung arbeitet wie in Basic: Inll = —2. 
Das Argument in den Low-/Highbyte-Funktionen muß im 
Bereich 0 < Argument <65535 liegen. 

Außer Dezimalzahlen sind Hex-Zahlen erlaubt, die durch ein 
vorangestelltes Dollarzeichen kenntlich gemacht werden: 
$0000 = 49152 $10 = 16 $a = 10... 

Die Hexzahlen können auch in den Basic-Befehlen verwen¬ 
det werden. 

Hypra-Ass-Variable (Label) 

Der Wert einer Hypra-Ass-Variablen kann zwischen 0 und 
$FFFF liegen. Variablennamen können beliebig lang sein, 
wobei das erste Zeichen des Variablennamens ein Buchstabe 
sein muß. Weitere Zeichen können Buchstaben, Ziffern oder 
das Hochkomma sein. Alle Zeichen des Namens sind si¬ 
gnifikant. 

Im Zusammenhang mit der Verwendung von Makros muß 
zwischen globalen und lokalen Variablen unterschieden wer¬ 
den. Jede Variable erhält beim Anlegen eine sogenannte Ord¬ 
nungszahl, die tatsächlich angibt, im wievielten Makroaufruf 
das Anlegen stattfand. Befinde ich mich in gar keinem Makro, 
ist die Ordnungszahl entsprechend Null. 

Variable mit unterschiedlicher Ordnungszahl sind trotz glei¬ 
chen Namens nicht gleich. Man kann also davon sprechen, 
daß Variable gleicher Ordnungszahl lokal sind. 

Die Konstruktion mittels Ordnungszahlen dient dazu, Fehler 
durch doppelte Benutzung von Labein bei mehrmaligem Aufruf 
von Makros zu verhindern, indem Makros bei jedem Aufruf 
sozusagen einen komplett neuen Satz von Labein erhalten. 

Andererseits sind aus einem Makro »herausgesehen« alle 
Variablen mit anderer Ordnungszahl als im Makro selbst 
»unsici iii. ar«. Um aber bequem Makros in Makros aufrufen und 
bequem Label verwenden zu können, die in mehreren Makros 
benutzt werden sollen (etwa Betriebssystemroutinen), gibt es 
die globalen Variablen. 

Globale Variable sind, wie der Name schon verrät, im Gegen¬ 
satz zu den lokalen Variablen unabhängig von der Ordnungs¬ 
zahl überall definiert. 

Alle Makronamen sind per Definition global. 

Alle Variablen sind bei Hypra-Ass redefinierbar gehalten, das 
heißt alle Variablen können durch eine Wertzuweisung jeder¬ 
zeit verändert werden. 

Eine doppelte Benutzung von Labein vor Assemblerbefeh¬ 
len wird jedoch durch einen »Label twice«-Error (Bild 2) geahn¬ 
det, da dies zu einem falschen Ergebnis der Assemblierung 
führen würde. 

Die Makros von Hypra-Ass 

Makros sind meist kürzere Befehlsfolgen, die im Quelltext 
häufiger Vorkommen, und deshalb unter einem Makro zusam¬ 
mengefaßt werden. Zu jedem Makro gehört ein Makroname, 
mit dem es aufgerufen werden kann. An jedes Hypra-Ass- 
Makro können beliebig viele Parameter übergeben werden, 
deren aktueller Wert dann bei der Assemblierung im Makro 
eingesetzt wird. Makros können bei Hypra-Ass an beliebiger 
Stelle im Quelltext definiert werden. Alle Makronamen sind 
global, alle Parameter und makrointernen Label sind lokal. Das 
heißt verschiedene Makros können durchaus Label bezie¬ 
hungsweise Parameter gleichen Namens verwenden. 

Ein Beispiel für ein einfaches Makro: 

Es wird immer wieder die Befehlsfolge benötigt, Akkumula¬ 
tor und X-Register mit dem Inhalt zweier aufeinanderfolgender 
Speicherzellen zu laden. Ein Makro dazu könnte folgenderma¬ 
ßen aussehen: 

100 -.ma Idax (adresse) 

110 - Ida adresse 

120 - ldxadresse +1 

130 -.rt 
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Der .ma-Pseudobefehl wird gefolgt von einem Variablenna¬ 
men, dem Makronamen, und einer Parameterliste in runden 
Klammern, falls Parameter vorhanden sind. Hier ist es ein Para¬ 
meter, die Adresse der Speicherzelle, die in den Akku soll. 
Sind mehrere Parameter vorhanden, werden sie durch Kom¬ 
mata getrennt. In die Parameter setzt der Assembler bei jedem 
Aufruf den aktuellen Wert, der im Aufruf steht. Rufe ich also 
Idax (2) auf, so entsteht bei der Assemblierung des Makros die 
Folge Ida 2, Idx3, entsprechend führt der Aufruf mit Idax (label) 
zu Ida label, Idx label+1. 

Die Parameterliste darf in der Definitionszeile eines Makros 
nur aus einer Folge von Variablennamen bestehen, während 
im Aufruf als aktuelle Parameter beliebige Ausdrücke erlaubt 
sind. Hinter der Definitionszeile mit dem .ma-Pseudo folgt 
dann der eigentliche Makroinhalt, das heißt das, was bei einem 
Aufruf des Makros assembliert werden soll. 

Natürlich sind hier nicht nur einfache Befehle wie im Beispiel 
gestattet. Genausogut können im Makro Verzweigungen und 
Sprünge ausgeführt werden, es kann bedingt assembliert wer¬ 
den und weitere Makros können aufgerufen werden. Für die 
Schachtelung von Makros besteht keine Grenze außer der 
Fassungskapazität des Prozessorstacks. 

Als Beispiel — wird ein Makro mit zehn internen Labein 100 
mal aufgerufen, ergibt sich schon für die dadurch erzeugten 
lokalen Label ein Platzbedarf von genau 7 000 Byte. 

Sollte irgendwann der Fall eintreten, daß Label und Quelltext 
zusammen nicht mehr ins RAM passen, erhalten Sie den »too 
many labels«-Error (Bild 2). Dies ist allerdings mehr ein theore¬ 
tischer Fall, denn auch bei der Assemblierung von Hypra-Ass 
selbst wurden trotz extensiver Benutzung von Labels nicht 
einmal 500 gebraucht. Sie können aber davon ausgehen, daß 
Ihnen immer mindestens Platz für 1 170 Label zur Verfügung 
steht — in den allermeisten Fällen sogar erheblich mehr. 

Selbstaufrufe von Makros sind auch nicht verboten. Inwie¬ 
weit eine solche Konstruktion überhaupt sinnvoll sein kann, 
bleibt jedem selbst zu prüfen. 

Zurück zur Makrodefinition: Jede Makrodefinition muß 
unbedingt mit dem Pseudo .rt (return) abgeschlossen sein. 
Trifft der Assembler bei der Abarbeitung eines Makros auf .rt, 
so heißt das für ihn, die Assemblierung hinter dem Aufruf fort¬ 
zusetzen. 

Vor der .ma und .rt-Anweisung dürfen in derselben Zeile 
keine Label stehen. Die Makrodefinition selbst wird in Pass 1 
und Pass 2 überlesen. Es zählen also nur die Makroaufrufe bei 
der Assemblierung. 

Der Aufruf eines Makros erfolgt durch den Pseudobefehl.... 
gefolgt vom Makronamen und der aktuellen Parameterliste in 
runden Klammern. 

Wertzuweisung an Label 

Zwei Pseudobefehle stehen zur Verfügung, um Label einen 
Wert zuzuweisen: 

.eq — weist einem Label einen Wert zu, ohne die Ordnungszahl 
des Labels dabei zu verändern. 

.gl — erklärt gleichzeitig das Label als global, 

Beide Pseudos werden der eigentlichen Wertzuweisung 
vorangestellt, so wie LET in Basic: 

100 -.eq marke = SFFCO 

110 -.gl label = $200 

Bei der Wertzuweisung an Label ist immer der Bereich ein¬ 
zuhalten in dem ein Labelwert liegen darf (0 bis $FFFF). 
Einfügen von Tabellen und Text 

Drei Pseudo-Ops erleichtern das Einfügen von Tabellen 
und Text in den Quelltext. Dies sind: 

.by — erlaubt das Einfügen von Bytewerten (Werten zwischen 0 
und $FF). Einzelne Bytewerte werden durch Kommata von¬ 
einander getrennt. Auch Strings der Länge 1 sind als Byte¬ 
werte erlaubt. Beispiel: 

100 -.by 0, "a", 123, "x", $fa 


.wo — erlaubt das Einfügen von Adressen (Werten zwischen 0 

und $FFFF). Mehrere Adressen werden durch Kommata von¬ 
einander getrennt. Die Adressen werden in der Folge 
Low/Highbyte in den Objektcode aufgenommen. Beispiel: 

100 -.wo marke- 1 , label * 2-1 

.tx — erlaubt das Einfügen von Text in den Quelltext. Die einzel¬ 
nen Zeichen des Textes werden als ASCII-Code im Objekt¬ 
code aufgenommen. Beispiel: 

100 -.tx "beispieltext’’ 

Überall im Quelltext, wo Bytewerte erwartet werden, etwa 
bei der unmittelbaren Adressierung, können Strings der Länge 
1 verwendet werden. Ein Befehl lda#’ä” ist also erlaubt. 

Die bedingte Assemblierung 

Zur Unterstützung der bedingten Assemblierung bietet 
Hypra-Ass ein IF/ELSE/ENDIF-Konstrukt und ein IF/THEN- 
Konstrukt. Außerdem steht ein unbedingter Sprungbefehl zur 
Verfügung. 

,on — entspricht dem IF/THEN von Basic. Hinter .on folgt ein Aus¬ 
druck, ein Komma und ein zweiter Ausdruck. Ist der erste 
Ausdruck wahr, wird zu der Zeilennummer gesprungen, die 
der zweite Ausdruck angibt. Beispiel: 

100 -.on switch 1 = 17, 400 

Es wird die Assemblierung in Zeile 400 fortgesetzt, wenn 
switch gleich 7 ist. 

,go — ergibt einen unbedingten Sprung zu der Zeile, die der Aus¬ 
druck hinter .go angibt. Beispiel: 

100 -.go 1000 

.if — wird gefolgt von einem Ausdruck. Ist der Ausdruck wahr, 
wird die Assemblierung hinter der .if-Zeile fortgesetzt, bis 
.ei — gefunden wird. Daraufhin wird 
.ei — gesucht und dahinter die Assemblierung fortgesetzt. 
Entsprechend erfolgt die Assemblierung von .el bis .ei, falls 
der Ausdruck hinter .if falsch ist. .el kann auch fehlen, es wird 
dann direkt hinter .ei fortgefahren. 

Auf rh <j Schachtelung von IF-Konstrukten wurde wegen 
des Zwecks der bedingten Assemblierung verzichtet. 
Beispiel: 


100 

-.if switch 1 

! = ! 6 

110 

- 

lda#0 

120 

-.el 


130 

- 

Ida #2 

140 

-.ei 



Wenn switch gleich 6 ist, erhält man lda#0, sonst wird 
Ida #2 erzeugt. Vor den Pseudos .if, .el und .ei dürfen keine 
Labei in derselben Zeile stehen. 

Verkettung von Quelltexten 

Mit dem Pseudo ,ap (apend) kann ein weiterer Quelltext am 
Ende des Pass 2 automatisch nachgeladen werden, wobei der 
Programmzähler aus der vorangegangenen Assemblierung 
erhalten bleibt. 

Hinter .ap muß der Name des nachzuladenden Files in 
Anführungszeichen stehen. 

Eine Besonderheit von Hypra-Ass bildet im Zusammenhang 
mit verketteten Quelltexten der Pseudo-Opcode .co 
(common). 

Dieser Befehl bewirkt zunächst, daß alle Variablen/Label, die 
hinter der .co-Anweisung in einer Liste stehen, an den nachge¬ 
ladenen Teil übergeben werden. 

Zweitens bleiben alle Quelltextzeilen bis zur common-Zeile 
beim Nachladen erhalten. Steht also etwa ein Makro vor der 
common-Zeile, wird auch das Makro übergeben. Zu beachten 
ist dabei: 

a) Es sollten keine Makroaufrufe im common-Bereich stehen, es 
sei denn innerhalb eines Makros. 

b) Die .ba-Anweisung, die die Startadresse des Objektcodes 
bestimmt, sollte außerhalb des common-Bereiches liegen, 
damit nach dem Nachladen nicht wieder mit der gleichen 
Startadresse assembliert wird. 

c) Wertzuweisungen an Label sollten ebenfalls außerhalb des 
common-Bereiches liegen, um Platz für den nachgeladenen 
Quelltext zu gewinnen. 
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Direktes Senden des Objektcodes zur Floppy 

Der Pseudobefehl .ob (object), gefolgt vom Filenamen ,p,w 
in Anführungszeichen, sendet den erzeugten Objektcode 
direkt zur Floppy. 

Geschlossen wird das so erzeugte Objektfile durch den 
Pseudobefehl .en. 

Sollte während der Assemblierung ein Fehler entdeckt wer¬ 
den und das Objektfile nicht schon durch die Hypra-Ass- 
Fehlerroutine geschlossen worden sein, geben Sie bitte 
CLOSE 14 ein. 

Ausgabe von formatierten Listings 

1) .111,3,0 sendet ein formatiertes Listing des Quelltextes unter 
der logischen Filenummer 1 an das Gerat 3 mit der 
Sekundäradresse 0 (Bildschirm). Die Parameter hin¬ 
ter .11 entsprechen denen des OPEN-Befehls. So ist 
es auch möglich, mit ,li 2,8,2, "test,u,w" das Listing 
auf eine Userdatei zu leiten und so weiter. 

Der .li-Pseudobefehl muß der erste Befehl im Quelltext sein, 
wenn alle Zeilen gelistet werden sollen. Die Zeilen bis ein¬ 


schließlich .li werden nicht ausgegeben. Die gelisteten Zeilen 

haben folgendes Format: 

cOOO aObOcO: 1000 -marke befehl ;kommentar 

Die Steuerung der Formatierung erfolgt mit dem Editorbe¬ 
fehl /t. Bei Zeilen, die Pseudobefehie enthalten, wie .eq... wer¬ 
den keine Adressen und Opcodes ausgegeben. 

2) .sy 1,3,0 sendet am Ende von Pass 2 die sortierte Symbolta¬ 

belle. Die Formatierung wird hier durch /t3,„. gesteu¬ 
ert. Die Labelwerte werden hexadezimal ausgegeben. 

Eine Zeile der Symboltabelle sieht dann folgendermaßen 
aus: 

sprungziel = $ffd2 

Das Listing des Quelltextes erhält die Kopfzeile »Hypra-Ass 
Assemblerlisting:«. Die Symboltabelle erhält die Kopfzeile 
»Symbols in alphabetical order«. 

3) .dp t0,t1,t2,t3 setzt aus dem Quelltext heraus die Tabulatoren 

tO = Tabulator für Assemblerbefehle 
tl = Tabulator für den Kommentar bei der formatier¬ 
ten Ausgabe 

t2 = Tabulator für die Anzahl der Blanks, die am 


/a 100,10 Automatische Zeilennumerierung. Hier mit der Start¬ 
nummer 100 und der Schrittweite 10. 

Die automatische Zeilennumerierung wird ausge¬ 
schaltet, indem man direkt hinter dem ausgegebe¬ 
nen Minuszeichen RETURN eingibt. 

/o Re-New eines Quelltextes, der mit NEW gelöscht 

wurde, falls der Text nicht anderweitig zerstört 
wurde. 

/d ; /d 100 ; Id —100 ; Id 100— ; Id 100-200 

Löschen von Zeilen und Zeilenbereichen. Auch für 
das Löschen einzelner Zeilen sollte man den /d- 
Befehl verwenden, da man das Minuszeichen hinter 
der Zeilennummer doch immer wieder vergißt. 

/e ; /e 100 ; /e —100 ; /e 100 — ; /e 100-200 

Formatiertes Listen von Zeilen und Zeilenbereichen. 
Label, Assembler-Befehle werden gemäß den Tabu¬ 
latoren übersichtlich untereinander geschrieben. 

/t 0,13 ; /t 1,24 ; /t 2,0 ; /t 3,10 

setzt die Tabulatoren TO, TI, T2, T3 
TO = Tabulator für Assemblerbefehle 
TI = Tabulator für den Kommentar bei der formatier¬ 
ten Ausgabe 

T2 = Tabulator für die Anzahl der Blanks, die am 
Anfang einer Ausgabezeile ausgegeben werden 
T3= Tabulator für die Symboltabelle 
Verlassen des Assemblers. Beim Verlassen des Pro¬ 
gramms wird ein Reset durchgeführt. 

Setzen eines Arbeitsbereichs (Page). Hier Bereich 1 
von Zeile 100 bis 200, beide einschließlich. Bis zu 
30 solcher Arbeitsbereiche sind erlaubt. Die Para¬ 
meter der Arbeitsbereiche werden im Kassettenpuf¬ 
fer abgelegt. 

Formatiertes Listen der Page. 

Neu Durchnumerieren einer Page mit Startnummer 
und Schrittweite. 

Suchen einer Zeichenkette in einer Page. Dabei sind 
im String Fragezeichen als Joker erlaubt. Das Frage¬ 
zeichen ersetzt ein beliebiges Zeichen. Zu beachten 
ist jedoch, daß im Quelltext unnötige Blanks entfernt 
wurden, wie ein Vergleich mit den Befehlen /e und 
LIST zeigt. 

/r 1 ,"string 1 ", ”string2" 

Ersetzen von Zeichenketten, String 2 darf nicht leer 
sein. Überall in der Page wird die Zeichenkette aus 
String 2 durch die aus Stringl ersetzt. Auch beim 
Ersetzen ist in String 2 das Fragezeichen als Joker 
erlaubt. Da String 1 leer sein darf, können mit die¬ 
sem Befehl auch Zeichenketten gelöscht werden. 

/u 9000 Setzen des Quelltextstartes (Programmstartes). Nor¬ 

malerweise ist als Startwert die Adresse 7000 ein¬ 


gestellt. Durch Hochlegen des Startes kann man 
zum Beispiel einen Monitor in dem nun freien 
Bereich unterbringen. 

/b Anzeige der aktuellen Speicherkonfiguration. Es 

wird angezeigt: 

a) der normale Quelltextstart 7000 als Merkhilfe 

b) der aktuelle Quelltextstart 

c) das Quelltextende 

d) die Anzahl der noch verbleibenden Bytes für den 
Quelltext 

/r'name" ; /s"name" ; /v"name" ; /m”name" 

Kurzform der Befehle LOAD, SAVE, VERIFY und 
MERGE 

/g 8 Die zugehörige Gerätenummer kann mit diesem 

Befehl eingestellt werden. Voreingestellt ist das 
Gerät 8. 

Zur Unterstützung des Umgangs mit dem Floppy-Laufwerk 1541 
sind drei Befehle implementiert: 

/I — Lesen des Inhaltsverzeichnisses von Floppy ohne 

Verlust des geschriebenen Quelltextes 
/k — Lesen des Fehlerkanals 

I® — Übermittlung von Befehlen an die Floopy 

Diese drei Befehle entsprechen denen des DOS 5.1. 

Auch zur Farbgebung des Bildschirms sind zwei Befehle vorhan¬ 
den, die die Hintergrund- und die Rahmenfarbe setzen. 

/ch 0 — Setzen der Hintergrundfarbe 

/er 0 — Setzen der Rahmenfarbe 

Nach erfolgter Assemblierung kann nun die erzeugte Symbolta¬ 
belle mit zwei Befehlen ausgegeben werden: 

/I — Ausgabe In unsortierter Form 

/II — Ausgabe sortiert 

Es werden nur Label ausgegeben, die entweder global 
oder von der Ordnung Null sind. 

Beide Dumps können mit der CTRL-Taste verlangsamt 
und mit der STOP-Taste angehalten werden. 

Mit OPEN... und CMD... können die Dumps an andere 
Geräte gesendet werden. 

Als Ergänzung zum Basic-Befehl PRINT, der aufgrund 
der Tokenbildung nicht alle Labelnamen verarbeiten kann, 
kann der Befehl — verwendet werden. 

Basic-Funktionen wie PEEK sind nur über den PRINT- 
Befehl erreichbar. Die Funktionen <(...) und >(...) sind 
außerhalb des Quelltextes nur durch — zu verwenden. 
Mit dem •—Befehl kann genau wie im Quelltext gerechnet 
werden, 

Bild 1. Die Editorbefehle von »Hypra-Ass« 


Ix 

lp 1,100,200 

/ziffer(n) 

In 1,100,10 

/f 1,"string” 
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Anfang einer Ausgabezeile ausgegeben werden. 
t3 = Tabulator für die Symboltabelle 
4) .st beendet die Assemblierung 

Am Ende des zweiten Passes wird immer die Meldung »end 
of assembly« gefolgt von der Assemblierungsdauer in Minu¬ 
ten, Sekunden und Zehntelsekunden ausgegeben. Dahinter 
folgt die Zeile »base = $XXXX last byte at $YYYY«. 

Eine Zusammenfassung aller Pseudobefehle finden Sie in 
Bild 3. 

Hypra-Ass-Editor 


Eines der Ziele bei der Entwicklung von Hypra-Ass war es 
auch, die Editierung von Quelltexten möglichst bequem zu 
machen. Dazu wurden etliche Funktionen, die im normalen 


Basic-Editor stets gebraucht, aber nie vorhanden sind, in den 
Hypra-Ass-Editor eingebaut. 

Als Grundlage des Hypra-Ass-Editors blieb dabei der Basic- 
Editor erhalten. 

Ein Hypra-Ass-Quelltext wird also im Prinzip genauso einge¬ 
geben wie ein Basic-Programm. Allerdings muß hinter der 
Zeilennummer immer ein Minuszeichen eingegeben wer¬ 
den, das den Beginn der Quelltextzeile bildet. So eingege¬ 
bene Quelltextzeilen werden als ASCII-Zeilen in den Speicher 
übernommen. Alle überflüssigen Blanks werden entfernt. 

Jede eingegebene Zeile wird sofort nach der Übernahme 
formatiertausgegeben, um die Übersichtlichkeit des Quelltex¬ 
tes zu gewährleisten. Eine Tabelle aller Editorbefehle finden 
Sie in Bild 1. 

(Gerd Möllmann/ah) 


Zusätzlich zu den Fehlermeldungen, die von Interpreter¬ 
routinen wie »illegal quantity« oder »syntax« stammen, gibt 
Hypra-Ass folgende Meldungen aus: 

1. can’t number term — ein Ausdruck kann von Hypra-Ass 
nicht berechnet werden. Möglicher Grund kann die falsche 
Abkürzung eines Operators sein. 

2. end of line expected — bei der Abarbeitung einer Zeile 
wurde statt des Zeilenendes etwas anderes gefunden. 

3. no mnemonic — ein Mnemonic kann nicht identifiziert 
werden. 

4. unknown pseudo — ein Pseudo-Op wurde falsch 
abgekürzt. 

5. illegal register — ein Assemblerbefehl existiert in der 
gewählten Adressierungsart nicht mit dem gewählten 
Register. 

6. wrong address — ein Assemblerbefehl existiert nicht in 
der gewählten Adressierungsart. 

7. illegal label — das erste Zeichen eines Labels war kein 
Buchstabe. 

8. unknown label — in Pass 2 wurde ein unbekannter 
Labelname entdeckt 


9. branch too far — eine Verzweigung führt über eine zu 
große Distanz. 

10. label declared twice — ein Labelname wurde zweimal 
benutzt. 

11. too many labels — Label und Quelltext passen zusam¬ 
men nicht mehr in den Speicher. 

12. no macro to close — die Anzahl der .ma-Anweisungen 
stimmt, nicht mit der Anzahl der .rt-Anweisungen überein. 

13. Parameter — im Makroaufruf stimmt die Parameterliste 
nicht mit der Rarameterliste der Definition überein. 

14. rsturn — es liegt keine Rückkehradresse auf dem 
Stack, als eine .rt-Anweisung ausgeführt werden sollte. 

Hinzuweisen ist noch auf eine einfache Möglichkeit, 
den »label twice-error« zu vermeiden: 

Legt man eine Makrodefinition um einen beliebigen Block 
des Q' 'olltextes, so sind alle Label in dem Block automa¬ 
tisch lotväl. Auf diese Weise kann schon vorhandener Quell¬ 
text in neuen eingefügt werden, ohne daß man sich um 
doppelt verwendete Labelnamen kümmern muß. 

Bild 2. Fehlermeldungen von »Hypra-Ass» 


1) 

,ba $C000 

gibt die Startadresse der Assemblierung an. 

Bei anderen Assemblern heißt dieser Befehl 
auch org oder * = . 

2) 

•eq 



label = wert 

weist einem Label einen Wert zu 

3) 

.gl label=wert 

weist einem globalen Label einen Wert zu 

4) 

.by 1 , 2 ,"a" 

Einfügen von Byte-Werten in den Quelltext 

5) 

.wo 1234,label 

Einfügen von Adressen in der Folge low/high 

6) 

,tx"text" 

Einfügen von Text als ASCII-Werte 

7) 

.ap "flle" 

Verketten von Quelltexten 

8) 

.ob "flle.p.w" 

Senden des Objektcodes zur Floppy 

9) 

.en 

Schließen des Objektfiles 

10) 

,on aus- 
druck,sprung 

bedingter Sprung, wenn Ausdruck wahr 

11) 

,go sprung 

unbedingter Sprung 

12) 

,lf ausdruck 

Fortführung der Assemblierung bei ELSE, falls 
Ausdruck falsch. Ansonsten hinter .if bis zu 
ELSE oder ENDIF. 

13) 

.el 

Alternative zu den Zellen, die hinter .if stehen 

14) 

.ei 

Ende der IF-Konstruktlon 

15) 

.co var1,var2 

Übergabe von Labein und Quelltext an nachge¬ 
ladene Teile 

16) 

.ma makro 
(par1,par2) 

Makrodeflnitionszelle 

17) 

.rt 

Ende der Makrodefinition 

18) 

...makro 

(par 1 ,par 2 ) 

Makroaufruf 

19) 

.li, Ifn, dn, ba 

sendet formatiertes Listing unter der File- 
Nummer Ifn zum Gerät dn mit der Sekundär¬ 
adresse ba 


20) 

.sy Ifn, dn, ba 

sendet formatierte Symboltabelle unter der 
File-Nummer Ifn zum Gerät dn mit der 
Sekundäradresse ba 

21) 

.st 

beendet die Assemblierung 

22) 

dp tO, tl. t2, 
t3 

setzt die Tabulatoren TO, TI, T2, T3 aus dem 
Quelltext heraus 


Vor den Anweisungen 12, 13, 14, 16 und 17 dürfen in derselben 
Zeile keine Label stehen. 

Bild 3. Zusammenfassung aller Pseudobefehle 


$0000 

Zeropage 

$033e 

Bandpuffer als Zwischenspeicher 

$0400 

Video-RAM 

$0800 

Hypra-Ass 

$1fd7 

Raum für Quelltext und Label, Quelltext bis maximal 
$a 000 

$a000 

Basic-Interpreter — darunter von cOOO abwärts die 
Symboltabelle 

$c 000 

frei! 

$d000 

I/O und so weiter 

$c000 

Kernal 

Bild 4. 

Speicherbelegung von »Hypra-Ass« 
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Reassembler 
zu Hypra-Ass 

Passend zum Assembler Hypra-Ass stellen 
wir Ihnen einen professionellen Reassem¬ 
bler vor, der aus einem Maschinen¬ 
programm Quelltext erzeugt. 

D er Reassembler (Listing) erzeugt aus einem Maschi¬ 
nenprogramm Quelltext, der mit Hypra-Ass editiert, 
verändert und wieder assembliert werden kann. Der 
vollständig in Maschinensprache geschriebene Reassem¬ 
bler belegt den Speicherplatz von $C000 bis $CB00, kann 
aber mit dem SMON in jeden anderen Bereich verschoben 
werden. Neben dem eigentlichen Reassembler stehen noch 
einige Basic-Befehle zur Verfügung, mit denen zum Beispiel 
Einsprungpunkte im Quelltext durch ein Label markiert wer¬ 
den können. Es läßt sich auch vorherbestimmen, ob der 
Reassembler selbständig nach Tabellen suchen soll oder 


nicht. Weiterhin läßt sich der Aufbau des Quelltextes in eini¬ 
gen Punkten mitbestimmen. Alle dazu nötigen Informationen 
werden dem Reassembler in einem kleinen Basic- 
Informationsprogramm mitgeteilt. Es stehen dafür drei neue 
Basic-Befehle zu Verfügung: 

—P adresse: Mit diesem Befehl lassen sich Einsprungpunkte 
im Quelltext durch ein Label markieren. So sind Adressen, die 
mit SYS angesprungen werden, im Quelltext leichter 
auffindbar. 

—T adresse, adresse: Mit diesem Befehl teilen Sie dem 
Reassembler die Lage von Tabellen mit. Die erste Adresse 
zeigt auf das erste und die zweite Adresse auf das letzte Byte 
der Tabelle. Tabellen werden vom Reassembler nicht reas- 
sembliert, sondern erscheinen im Quelltext in Form eines 
Hex-Dumps (siehe Bild 1; Zeile 190 und Bild 2 Zeile 230 bis 
310). 

—E (byte): Der »E«-Befehl startet den Reassembler und steht 
am Ende des Informationsprogramms. Es wird nun aus einem 
Maschinenprogramm ein Quelltext erzeugt, der im Basic- 
Speicher abgelegt und anschließend wie ein normales Basic- 
Programm gespeichert oder editiert und mit Hypra-Ass 
assembliert werden kann. 

Der Aufbau des Quelltextes läßt sich geringfügig beeinflus¬ 
sen, indem hinter den »E«-Befehl eine Zahl zwischen 0 und 
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255 eingegeben wird. Bei dieser Zahl handelt es sich um ein 
sogenanntes Informations-Byte. Die einzelnen Bits dieses 
Informations-Bytes haben folgende Bedeutung: 
Informations-Byte: oooooooo 
Bit: 7 6 5 4 3 2 1 0 

Wertigkeit: 128 064 032 016 008 004 002 001 

Um zum Beispiel Bit 1 und Bit 6 auf 1 zu setzen, sind die 
Wertigkeiten der einzelnen Bits zu addieren. In diesem Fall 
2 + 64 = 66 

Bit 0 gesetzt: Alle Zeropage-Adressen (Adressen von $00 
bis $FF) werden durch ein Label mit nur drei Buchstaben (nor¬ 
mal fünf) markiert. 

Bit 1 gesetzt: Nach den Befehlen RTS, RTI, BRK und JMP 
wird eine Kommentarzeile in den Quelltext eingefügt (Zeile 
220 in Bild 2). Dadurch wird der Quelltext übersichtlicher. 

Bit 2 gesetzt: Bei allen Befehlen mit unmittelbarer Adressie¬ 
rung (zum Beispiel LDA #$41) wird der Operand zusätzlich 
im ASCII-Förmat ausgegeben (LDY #$00 . ” — Zeile 140 

und 160 in Bild 2), vorausgesetzt, er liegt zwischen 32 und 
96 oder zwischen 160 und 224. Für den Fall, daß er außer¬ 
halb dieses Zahlenbereichs liegt, wird nur ein Punkt 
ausgegeben. 

Bit 3 gesetzt: Zwischen je zwei Tabellenzeilen wird eine Kom¬ 
mentarzeile eingefügt (Zeile 240, 260, 280, 300 in Bild 2). 
Dieses erhöht die Übersichtlichkeit. 

Bit 4 gesetzt: Der ASCII-Ausdruck wird bei Tabellen 
unterdrückt. 

Bit 5 gesetzt: Ist dieses Bit gesetzt, werden externe Label 
und Tabellenlabel speziell gekennzeichnet (Zeile 100 und 
230 in Bild 2). Tabellen wird ein »T« vorangestellt (zum Beispiel 
TLC000) und externen Label (Label die außerhalb des zu 
reassemblierenden Bereichs liegen) ein »E« (zum Beispiel 
ELC000). 

Bit 6 gesetzt: Ist das Bit 6 gesetzt, sucht der Reassembler 
selbständig nach Tabellen. Es wird kein Quelltext, sondern 
ein Basic-Informationsprogramm generiert, das die Start- und 
Endadressen aller gefundenen Tabellen enthält. Dieses kann 
mit LIST oder — wenn Hypra-Ass geladen wurde — mit IE 
geLISTet und geändert werden. 

Bit 7 gesetzt: Der Reassembler reassembliert die Speicher¬ 
inhalte, die sich unter dem ROM im RAM befinden. Dadurch 
ist es möglich, Programme zu reassemblieren, die sich unter 
dem Basic-Interpreter oder Betriebssystem befinden. 

Aus den drei neuen Basic-Befehlen setzt sich jedes Infor¬ 
mationsprogramm zusammen. Es wird mit folgender Befehls- 
Sequenz im Direktmodus gestartet: 

SYS 49152, anfadr, endadr+1:RUN 

anfadr = Anfangsadresse des Maschinenprogramms, das 

reassembliert werden soll. 

endadr = Endadresse des Maschinenprogramms, das reas¬ 
sembliert werden soll. 

Um zum Beispiel den Reassembler durch sich selbst reas¬ 
semblieren zu lassen, gehen Sie wie folgt vor: 

1. Reassembler laden mit LOAD"REASS”,8,1 

2. NEW < RETURN > eingeben 

3. Folgendes Basic-Informationsprogramm eingeben: 

20 —P $C000 kennzeichnet die Adresse $C000 durch ein 
Label 

30—T $C813,$CAFF ;definiert eine Tabelle im Bereich von 
$C813 bis $CAFF 

40 — E 15 ;Startet den Reassembler und setzt die Bits 0 bis 3 

4. SYS 49152,$C000,$CB00:RUN < RETURN > 
im Direktmodus eingeben. 

Die SYS-Zeile, mit der das Informationsprogramm gestartet 
wird, teilt dem Reassembler mit, daß das zu reassemblie- 
rende Maschinenprogramm im Bereich von $C000 bis 
$CAFF ($CB00 -1) liegt. In Zeile 20 trifft der Reassembler auf 
den »P«-Befehl, der dazu auffordert, die Adresse $C000 
durch ein Label zu markieren. Der »T«-Befehl in Zeile 30 defi¬ 


niert eine Tabelle im Bereich $C813 bis $CAFF und der »Ed- 
Befehl in Zeile 40 startet schließlich den Reassembler. 

In weniger als 8 Sekunden wird nun ein etwa 17 KByte lan¬ 
ger Quelltext erzeugt, der mit LIST oder — wenn Hypra-Ass 
geladen und gestartet wurde — mit dem /E-Befehl geLISTet 
und mit RUN assembliert werden kann. 

Wie Sie sicherlich schon bemerkt haben, verarbeitet der 
Reassembler nicht nur Dezimal-, sondern auch Hexadezimal¬ 
zahlen. Eine Hexadezimalzahl beginnt mit einem Dollar- 
Zeichen ($), dem genau vier Hex-Ziffern folgen müssen. 
Beispiel: 

$0073, $C000, $FFFF 

Besonderheiten 

1. Der Reassembler arbeitet ausgezeichnet mit Hypra-Ass 
zusammen. Dabei ist es jedoch übersichtlicher, das Informa¬ 
tionsprogramm ohne Leerzeichen einzugeben, weil Hypra- 
Ass nach dem ersten Leerzeichen einen Tabulator einfügt. 
Das Aussehen des Quelltextes würde dadurch verunstaltet. 
Gestartet wird das Informationsprogramm wie gewohnt mit 
RUN. (Vergessen Sie nicht den Minusstrich vor jeder Zeile, 
wenn Hypra-Ass geladen ist.) 

2. Aus programmtechnischen Gründen kann es Vorkom¬ 
men, daß der Reassembler im ersten Pass ein Maschinenpro¬ 
gramm anders reassembliert als im zweiten. Dadurch können 
in Pass 2 Sprungadressen im Maschinenprogramm auftau¬ 
chen, die in Pass 1 nicht gefunden wurden und deshalb auch 
im Quelltext nicht durch ein Label markiert werden. Der Reas¬ 
sembler ersetzt in diesem Fall die Sprungadresse nicht durch 
ein Label, sondern stellt sie als Hex-Zahl im Queiltext dar. An 
die entsprechende Zeile werden 3 Fragezeichen angehängt. 

3. 3-Byte-Befehle, die bei der Assemblierung als 2-Byte- 
Befehle interpretiert werden (BIT $A9 $00 = .BY $2C LDA 
# $00). werden nicht reassembliert. Statt dessen werden die 
3 Byte’ri,;'. vorangestelltem .BY-Pseudoopcode in den Quell¬ 
text eingefügt. Der reassemblierte Befehl wird aber als Kom¬ 
mentar an die entsprechende Zeile angefügt. 

4. Es ist möglich, ein Programm so zu reassemblieren, als 
ob es in einem anderen Bereich läge. Dazu ist an den SYS- 
Befehl eine weitere Adresse anzuhängen: 

SYS 49152, anfadr, endadr, get 

anfadr und endadr geben die Anfangs- und Endadresse 
des Bereichs an, in dem das Maschinenprogramm liegen soll, 
get gibt die Anfangsadresse des Bereichs an, in dem das Pro¬ 
gramm tatsächlich liegt. 

So kann man zum Beispiel die Kopie der CHRGET-Routine 
ab $E3A2 reassemblieren, als ob sie im Bereich von $0073 
bis $008A liegen würde. Dazu ist im Direktmodus folgende 
Zeile einzugeben: 

SYS 49152, $0073, $008A, $E3A2:-E 

Da keine Tabellen in diesem Bereich liegen, kann auf ein 
Informationsprogramm verzichtet werden. 

5. Es ist möglich, während der Reassemblierung den 
erzeugten Quelltext auf Diskette zu schreiben. Dadurch 
bleibt der Basic-Speicher für andere Programme frei. Dazu ist 
vor dem SYS-Befehl, mit dem die Start- und Endadresse über¬ 
geben wird, ein Programmfile zu öffnen. Mit dem Befehl CMD 
wird die Ausgabe auf das entsprechende Gerät umgeleitet. 
Das könnte wie folgt aussehen: 

OPEN 1,8,1 "NAME,P,W”:CMD 1:SYS 49152,$C000, 

$CB00: —E 64 

Mit dem OPEN-Befehl wird ein Programmfile mit dem 
Namen »Name« zum Schreiben geöffnet. Der CMD-Befehl lei¬ 
tet die Ausgabe auf das Gerät mit der Gerätenummer 8 um 
(Disketten-Laufwerk). Der SYS-Befehl startet schließlich den 
Reassembler, dem durch den »E«-Befehl noch mitgeteilt wird, 
daß kein Quelltext, sondern ein Informationsprogramm 
erstellt werden soll. Das Informationsprogramm wird unter 
dem Namen »Name« auf Diskette gespeichert. 

Vorsicht! Dieser Programmteil ist nicht gegen Fehlbedie- 

119 


aaa? 



Hilfsprogramme 


C 64 


nung abgesichert. So führt eine nicht eingelegte Diskette 
zum Absturz des Systems. In einem solchen Fall ist ein 
RESET auszulösen. Hypra-Ass kann anschließend mit SYS 
2168 neu gestartet werden. Außerdem sollte nach jedem 
Speichern die RUN/STOP-RESTORE-Taste gedrückt werden. 
Fehlermeldungen 

SYNTAX ERROR: Ein Basic-Befehl wurde falsch eingegeben 
oder eine Hex-Zahl besteht aus weniger als 4 Hex-Ziffern. 
OUT OF MEMORY: Es steht zu wenig Speicherplatz für den 
Quelltext zur Verfügung oder im Maschinenprogramm kom¬ 
men mehr als 2700 verschiedene Label vor. 

ILLEGAL QUANTITY: Vor einer Hex-Zahl fehlt das Dollar- 
Zeichen ($) oder das Tabellenende liegt vor dem Tabellenan¬ 
fang oder die Tabellen überschneiden sich oder die angege¬ 
bene Adresse liegt nicht im Maschinenprogramm. 

TYPE MISMATCH: In einer Hex-Zahl stehen falsche Hex- 
Ziffern. Die Adresse, die schon als Einsprungpunkt markiert 
wurde, darf nicht als Tabellenanfang oder -ende angegeben 
werden. Im Informationsprogramm darf keine Adresse dop¬ 
pelt Vorkommen. 

Verschieben des Reassemblers 

Der Reassembler benutzt in der Zeropage verschiedene 
Speicherzellen als Kurzzeitspeicher. Der Langzeitspeicher 
dagegen liegt unter dem Betriebssystem ($E000 bis 
$FFFF). Dort befindet sich auch ab Adresse SE028 die 
Label-Tabelle. In den Langzeitspeicher sollte nicht hineinge- 
POKEt werden. 

Der Reassembler kann mit SMON ohne Schwierigkeiten im 
Speicher verschoben werden. Um den Reassembler nach 
$9000 zu verschieben, sind folgende SMON-Befehle 
einzugeben: 

WC000 CB00 9000 
V C000 CBOO 9000 9000 9813 
Beispiel zu den Basic-Erweiterungen 

Laden Sie Hypra-Ass, starten Sie ihn und laden anschlie¬ 
ßend den Reassembler. Geben Sie NEW und danach im 
Direktmodus 

SYS 49152,$1000,$1FD7: —E 64 < RETURN > 
ein. Der Reassembler bekommt durch den SYS-Befehl die 
Start- und Endadresse des Maschinenprogramms mitgeteilt. 
Der »E«-Befehl setzt Bit 6 des Informations-Bytes und startet 
den Reassembler. Das gesetzte Bit 6 bewirkt, daß kein Quell¬ 
text, sondern ein Informationsprogramm erstellt wird. LISTen 
Sie das Programm mit IE. Sie sehen eine Reihe von »T«- 
Befehlen und zum Schluß einen »E«-Befehl. Schreiben Sie 
hinter diesen Befehl die Zahl 32, drücken die RETURN-Taste 
und geben folgende Zeile im Direktmodus ein: 

OPEN 1,8,1,”REASS DEMO,P,W”:CMD 1:SYS 
49152,$1000,$1FD7:GOTO 100 < RETURN > 


Mit dem OPEN-Befehl wird ein Programmfile mit dem 
Namen »REASS DEMO« zum Schreiben geöffnet. Der nach¬ 
folgende CMD-Befehl leitet die Ausgabe des Quelltextes auf 
dieses File um. Durch den SYS-Befehl wird dem Reassembler 
die Start- und Endadresse des Maschinenprogramms mitge¬ 
teilt. Der GOTO-Befehl startet schließlich das Informations¬ 
programm (der RUN-Befehl darf dazu nicht benutzt werden, 
da er das geöffnete File schließen würde). Die »T«-Befehle im 
Informationsprogramm werden ausgeführt, bis der »E«- 
Befehl Bit 5 setzt und den Reassembler startet. Das gesetzte 
fünfte Bit bewirkt, daß externe Label und Tabellenlabel spe¬ 
ziell gekennzeichnet werden. Das so auf Diskette erzeugte 
Programmfile kann mit LOAD "REASS DEMO",8 geladen, 
geLISTet, editiert und assembliert werden. 

(Martin Wehner/ah) 
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Bild 1. Beispielprogramm zum »Reassembler« 
(Original Quelltext erstellt mit Hypra-Ass) 
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26 

26 

80 

B0 

cl 

C450 


c3 

30 

58 

20 

a2 

c6 

a9 

23 

93 

C76B 


c6 

a9 

3b 

dB 

ad 

20 

66 

c7 

e7 

caBB 


34 

80 

80 

04 

04 

04 

80 

00 

f 7 

c458 


20 

34 

c6 

ad 

aa 

02 

Bd 

a9 

3e 

c7 70 


a9 

00 

20 

34 

c6 

20 

69 

c7 

4b 

ca8B 


B0 

00 

80 

06 

06 

06 

B0 

01 

7b 

c460 


02 

a 2 

71 

ad 

aB 

02 

29 

04 

0d 

C77B 


a9 

20 

4c 

34 

c6 

2c 

a8 

02 

3f 

ca90 


54 

B0 

00 

24 

24 

44 

B0 

00 

2f 

c468 


f0 

02 

a 2 

Bl 

Ba 

8d 

b0 

02 

0 e 

c 780 


Be 

aB 

02 

50 

60 

20 

dl 

c7 

cb 

ca98 


42 

00 

80 

80 

26 

80 

80 

08 

B3 

C470 


29 

03 

85 

5b 

aa 

bd 

a8 

02 

27 

c78B 


20 

f5 

c7 

20 

75 

c7 

20 

if 

ed 

caaB 


34 

08 

80 

04 

04 

04 

80 

00 

db 

c478 


9d 

lf 

p0 

ca 

d0 

f 7 

20 

ec 

5d 

c790 


c6 

a9 

5f 

20 

34 

C6 

bl 

57 

f 6 

caaB 


0B 

00 

80 

06 

06 

06 

80 

01 

26 

c4B0 


c6 

ad 

b0 

02 

c9 

70 

b0 

Be 

89 

C79B 


c9 

ff 

f0 

30 

c9 

80 

f0 

0c 

lf 

cab 0 


54 

B0 

80 

24 

24 

44 

80 

00 

4f 

C4BB 


20 

75 

c7 

20 

a 2 

c6 

4c 

d3 

92 

C7a0 


a9 

50 

20 

b5 

c7 

98 

20 

34 

5a 

cabB 


42 

00 

B0 

26 

26 

46 

80 

0B 

86 

C490 


c3 

20 

2f 

c7 

20 

if 

c6 

20 

7e 

c7aB 


c6 

4c 

Bb 

c7 

a9 

54 

20 

b5 

99 

cac0 


34 

B0 

80 

04 

04 

04 

80 

00 

37 

c49B 


63 

c6 

aB 

00 

8c 

ae 

02 

bl 

30 

c7b0 


c7 

a9 

2c 

d0 

ed 

20 

34 

c6 

af 

cacB 


08 

00 

B0 

06 

06 

06 

80 

01 

46 

c4aB 


fd 

f 0 

70 

30 

2 e 

20 

b6 

c6 

84 

c7bB 


cB 

bl 

37 

Bd 

aa 

02 

cB 

bl 

22 

cad 0 


54 

B0 

80 

B0 

24 

24 

80 

00 

fa 

c4a8 


4c 

5c 

C3 

a2 

00 

a9 

ff 

Bl 

b8 

c7c0 


57 

8d 

ab 

02 

a9 

24 

20 

b8 

b7 

cadB 


42 

80 

80 

80 

26 

26 

80 

0B 

30 

c4b0 


57 

ad 

ae 

02 

f0 

03 

20 

4a 

06 

c7cB 


c6 

4c 

74 

c6 

a9 

45 

20 

34 

58 

cae0 


34 

80 

80 

04 

04 

04 

80 

00 

57 

c4bB 


c5 

20 

7d 

c7 

20 

33 

c6 

20 

dd 

c7d0 


c6 

a9 

5a 

8d 

ac 

02 

a2 

00 

18 

caeB 


08 

00 

80 

06 

06 

06 

80 

01 

66 

c4c0 


30 

c6 

20 

20 

Cl 

a5 

b8 

20 

cc 

c7d8 


8e 

ad 

02 

ad 

0e 

c8 

85 

57 

5f 

caf 0 


54 

80 

80 

80 

24 

24 

80 

00 

la 

c4c8 


c3 

ff 

20 

b5 

ab 

6a 

85 

9d 

a9 

c7e0 


ad 

0f 

cB 

85 

58 

60 

ad 

aB 

BB 

caf 8 


42 

80 

80 

80 

26 

26 

80 

00 

40 

c4dB 


4c 

ab 

el 

20 

e6 

c 7 

20 

3d 

16 

c7e0 


02 

29 

20 

fo 

05 

a9 

54 

20 

d4 

cb00 


ac 

ff 

00 

ff 

0(9 

ff 

00 

ff 

ac 

c4dB 


c 2 

ad 

a8 

02 

29 

10 

f 0 

05 

bc 

c7f 0 


34 

c6 

4c 

b6 

c6 

a5 

9a 

c9 

09 












c4e0 

c4e8 


a9 

5b 

71 

20 

Bd 

70 

b0 

cl 

02 

a4 

a 0 

5b 

00 

Ba 

84 

99 

e9 

2a 

c7f 8 

c 800 


08 

C0 

90 

2 c 

ea 

4a 

4c 

c2 

34 

2c 

c6 

67 

2 c 

cl 

72 

2c 

9c 

lf 

Listing zum 

»Reassembler 

i 


c4f 0 

* 

20 

e0 

e6 

5b 

b0 

0a 

C0 

07 

12 

c808 


28 

e0 

2c 

f 0 

f 7 

2c 

00 

f 8 

9c 

(Schluß) 
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SMON- 

komplett 

Die Stärken dieses Super-Maschinen- 
sprache-Monitors sind hauptsächlich die 
mächtigen Such- und Trace-Befehle zum 
Austesten von Programmen in Maschinen¬ 
sprache. Neben dem kompletten Listing 
und der kompletten Anleitung mit einer 
Tabelle sämtlicher Funktionen und einer 
Tabelle wichtiger Einsprungadressen fin¬ 
den Sie zwei Erweiterungen, einen voll¬ 
ständigen Diskmonitor und einen Dis¬ 
assembler, der auch illegale Opcodes 
disassembliert. Ein Programm, mit dem 
auch Profis gerne arbeiten. 

I ch kann mich noch gut an unsere ersten Schritte in 
Maschinensprache erinnern. Ausgerüstet mit einer Be¬ 
fehlsliste für den 6502 und einem in Basic geschriebenen 
»Mini-Monitor« entstanden Programme, die 3 und 5 addieren 
und das Ergebnis im Speicher ablegen konnten. Dazu mußten 
wir die Befehlcodes aus der Liste heraussuchen und dann in 
den Speicher »POKEn«. Jeder Sprung mußte von Hand aus¬ 
gerechnet werden, jeder falsch herausgesuchte Befehl 
führte zum Programmabsturz. Der erste Disassembler - ein 
Programm zur Anzeige der Maschinenbefehle in Assembler¬ 
sprache - war für uns die Offenbarung. Von nun an konnten 
wir Maschinenprogramme analysieren und daraus lernen. 
Zum Verständnis der Maschinensprache ist es nämlich noch 
weit mehr als bei anderen Sprachen wichtig, vorhandene Pro¬ 
gramme zu verstehen und sich dabei die wichtigsten Tech¬ 
niken anzueignen. 

Mit der Zeit wuchsen unsere Ansprüche, ein Assembler 
mußte her, um die neugewonnenen Erkenntnisse auch aus¬ 
zuprobieren. Das war zuerst wieder ein Basic-Programm, 
langsam und wenig komfortabel, aber immerhin. Wir schrie¬ 
ben unsere ersten kleinen Routinen, vor allem, um vorhan¬ 
dene Maschinenprogramme unseren eigenen Wünschen 
anzupassen. Mit dem AMON für den VC 20 bekamen wir 
dann einen Monitor, der (fast) alle unsere Wünsche erfüllte. 
Als wir jedoch auf den C 64 umstiegen, mußten wir fest¬ 
stellen, daß es für diesen Computer nichts gab, das uns 
zufriedenstellen konnte. Der einzige Ausweg: selbst pro¬ 
grammieren. So entstand im Laufe eines Jahres SMON. 
Ursprünglich hatten wir nur vor, die Funktionen von AMON für 
den C64 zu programmieren, aber dabei blieb es nicht. Immer 
neue Befehle und Routinen kamen hinzu, bis wir endlich 
zufrieden waren. 

Was bietet SMON? 


Zunächst ist alles enthalten, was zum »Standard« gehört: 
Memory-Dump, also die Anzeige des Speicherinhalts in Hex- 
Bytes, mit Änderungsmöglichkeiten, ein Disassembler mit 
Änderungsmöglichkeit sowie Routinen zum Laden, Abspei¬ 
chern und Starten von Maschinenprogrammen. Darüber hin¬ 
aus gibt es einen kleinen Direktassembler, der sogar Labels 


verarbeitet, Befehle zum Verschieben im Speicher mit und 
ohne Umrechnen der Adressen und Routinen zum Umrech¬ 
nen von Hex-, Dezimal- und Binärzahlen. Der besondere Clou 
von SMON liegt aber zweifellos in seinen leistungsfähigen 
Suchroutinen und vor allem im Trace-Modus. Damit lassen 
sich Maschinenprogramme Schritt für Schritt abarbeiten und 
kontrollieren. 

Der Monitor benötigt für alle Eingaben die hexadezimale 
Schreibweise, das heißt zu den Zahlen 1 bis 9 kommen noch 
die Buchstaben A (für dez. 10) bis F (für dez. 15) hinzu. 

Bei der Eingabe von Adressen ist folgendes zu beachten: 
[ANFADR] bedeutet exakt die Startadresse, [ENDADR] 
bedeutet hierbei die erste Adresse hinter dem gewählten 
Bereich. Im Normalfall ist die Eingabe mit und ohne Leerzei¬ 
chen zulässig. Beim Abweichen von dieser Regel wird darauf 
besonders verwiesen. Tippen Sie zuerst das Hauptpro¬ 
gramm (Listing 1) mit dem MSE ab. Befindet sich SMON auf 
Ihrer Diskette, kann er mit LOAD "SMON $C000",8,1 geladen 
und mit dem Befehl SYS 49152 gestartet werden. Geben Sie 
vor dem SYS-Befehl aber NEW ein, um einen späteren »OUT 
OF MEMORY« zu verhindern. 

Assemblieren 

A [ANFADR] 

Assemblierung beginnt bei der angegebenen Adresse 
Beispiel: 

A 4000 Beginn bei Startadresse $4000 

Nach Eingabe von »RETURN« erscheint auf dem Bild¬ 
schirm die gewählte Adresse mit einem blinkenden Cursor. 
Die Befehle werden so eingegeben, wie sie der Disassem¬ 
bler zeigt: LDY #00 oder LDA 400E.Y und so weiter. 
»RETURN« schließt die Eingabe der Zeile ab. Bei fehlerhafter 
Eingabe springt der Cursor wieder in die Anfangsposition 
zurück. Ansonsten wird der Befehl disassembliert und nach 
Ausgabe der Hex-Bytes gelistet. Zur Korrektur vorhergehen¬ 
der Zeilen gehen Sie mit dem Cursor zur Anfangsposition 
(hinter die Adresse) zurück, schreiben den Befehl neu und 
gehen nach »RETURN« mit dem Cursor wieder in die letzte 
Zeile. Falls Ihnen bei Sprüngen (Branch-Befehl, JSR und 
JMP) die Zieladressen noch nicht bekannt sind, geben Sie 
einfach sogenannte »Label« ein. 

Ein Label besteht aus dem Buchstaben »M« (für Marke) und 
einer zweistelligen Hex-Zahl von 01 bis 30. 

Beispiel: BCC M01 

Wenn Sie die Zieladresse für diesen Sprung erreicht 
haben, dann kennzeichnen Sie diese mit eben dieser 
»Marke«. 

Beispiel: M01 LDY #00 

Einzelne Bytes nimmt der Assembler an, indem Sie diese 
mit einem Punkt kennzeichnen: .00 oder .AB. In diesem 
Modus werden die Eingaben natürlich nicht disassembliert. 

Nach Beendigung des Assemblierens geben Sie »F« ein. 
Danach sehen Sie alle Ihre Eingaben noch einmal aufgelistet 
und korrigieren dann bei Bedarf wie beim Disassembler (!) 
angegeben. 

Probieren Sie einmal das folgende Beispiel: 

A 4000 

Der Assembler meldet sich mit: »4000« und einem blinken¬ 
den Cursor. Geben Sie nun ein (die Adressen erscheinen 
automatisch): 


4000 LDY #00 

4009 CPY #12 

4002 LDA 400E,Y 

400B BCC 4002 

4005 JSR FFD2 

400D BRK 

4008 INY 



Die folgenden Bytes werden wie beschrieben mit einem 
Punkt eingegeben. Sie werden nicht disassembliert. 
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400E ,0D 

4017 .54 

400F .OD 

4018 .20 

4010 .53 

4019 .53 

4011 .4D 

401A .55 

4012 ,4F 

401B .50 

4013 .4E 

401C .45 

4014 .20 

401D .52 

4015 .49 

401E .OD 

4016 .53 

401 F .OD 


Drücken Sie anschließend »F«. Ihr Programm wird nochmal 
aufgelistet. Starten Sie es nun mit »G 4000«. Es erscheint ein 
Text auf dem Bildschirm - lassen Sie sich überraschen. 


Disassemblieren 

D [ANFADR,ENDADR] 

disassembliert den Bereich von ANFADR bis ENDADR, wobei 
ENDADR nicht eingegeben werden muß. Wird keine End¬ 
adresse eingegeben, erscheint zunächst nur eine Zeile: 
ADR HEXBYTES BEFEHL 

4000 AO 00 LDY #00 

Mit der SPACE-Taste wird der jeweils nächste Befehl in der 
gleichen Art und Weise gezeigt. Wünschen Sie eine fortlau¬ 
fende Ausgabe, drücken Sie »RETURN«. Die Ausgabe wird 
dann so lange fortgesetzt, bis eine weitere Taste gedrückt 
wird oder bis ENDADR erreicht ist. Mit »RUN/STOP« springen 
Sie jederzeit in den Eingabemodus zurück. 

Das Komma, das vor cjer Adresse auf dem Bildschirm 
erscheint, ist ein »hidden command« (verstecktes Kom¬ 
mando). Es braucht nicht eingegeben zu werden, da es auto¬ 
matisch beim Disassemblieren angezeigt wird. So ermöglicht 
es ein einfaches Ändern des Programms. Fahren Sie mit dem 
Cursor auf den zu ändernden Befehl und überschreiben Sie 
ihn mit dem neuen. Wenn Sie jetzt »RETURN« drücken, 
erkennt SMON das Komma als Befehl und führt ihn im Spei¬ 
cher aus. Achten Sie aber darauf, daß der neue Befehl die 
gleiche Länge (in Byte) hat und füllen Sie gegebenenfalls mit 
»NOPs« auf. Zur Kontrolle können Sie den geänderten 
Bereich noch einmal disassemblieren. 

Lassen Sie als Beispiel einmal das Programm (siehe Befehl 
»A«) ab 4000 disassemblieren (»D 4000 4011«). Ändern Sie 
nun den ersten Befehl auf LDY #01. Die Änderung zeigt sich 
daran, daß die HEX-Bytes automatisch den neuen Wert 
annehmen. Starten Sie nun das Programm nochmals mit »G 
4000«. Jetzt erscheint der Text mit nur einer Zeile Abstand 
auf dem Bildschirm. 

Starten eines Maschinenprogramms (Go) 

G [ADRESSE] 

startet ein Maschinenprogramm, das bei ADRESSE beginnt. 
Das Programm muß mit einem BRK-Befehl abgeschlossen 
werden, damit ein Rücksprung in SMON erfolgen kann. Wird 
nach »G« keine Adresse eingegeben, benutzt SMON die, die 
mit dem letzten BRK erreicht worden ist und bei der Register- 
Ausgabe als PC auftaucht. Mit dem »R«-Befehl (siehe unten) 
werden die Register vorher auf gewünschte Werte gesetzt. 
Memory-Dump 

M [ANFADR ENDADR) 

gibt die HEX-Werte des Speichers sowie die zugehörigen 
ASCII-Zeichen aus. Auch hier kann auf die Eingabe einer End¬ 
adresse verzichtet werden. Die Steuerung der Ausgabe ent¬ 
spricht der beim Disassemblieren. 

Beispiel: 

M 4000 gibt die Inhalte der Speicherstellen $4000 bis 
$4007 aus. Weiter geht es wie beim Disassemblieren mit 
SPACE oder RETURN. Die Bytes können ebenfalls durch 
Überschreiben geändert werden, allerdings nicht die ASCII- 
Zeichen. Verantwortlich dafür ist der Doppelpunkt, der am 
Anfang jeder Zeile ausgegeben wird, ein weiterer »hidden 
command«. Wenn Ihre Änderung nicht durchgeführt werden 


kann, weil Sie zum Beispiel versuchen, ins ROM zu schrei¬ 
ben, wird ein »?« als Fehlermeldung ausgegeben. 

Registeranzeige 

R zeigt den gegenwärtigen Stand der wichtigsten 6510- 
Register an: Programmzähler (PC), Status-Register (SR), 
Akkumulator (AC), X-Register (XR), Y-Register (YR), Stack¬ 
pointer (SP). Außerdem werden die einzelnen Flags des 
Status-Registers mit 1 für »gesetzt« und 0 für »nicht gesetzt« 
angezeigt. Durch Überschreiben werden die Inhalte auf 
einen gewünschten Wert gesetzt. Die Flags können aller¬ 
dings nicht einzeln verändert werden, sondern nur durch 
Überschreiben des Wertes von SR. 

Exit 

X springt ins Basic zurück. Alle Basic-Pointer bleiben er¬ 
halten. Sie können also zum Beispiel direkt im Programm 
fortfahren, wenn Sie zwischendurch mit SMON einige 
Speicherstellen kontrolliert haben. 

Probieren Sie alle bisher beschriebenen Befehle in Ruhe 
aus und machen Sie sich mit SMON vertraut. Arbeiten Sie 
auch parallel den Kurs über Assemblerprogrammierung in 
dieser Ausgabe durch. Alle Beispiele dort sind auf SMON 
abgestimmt. 

I/O-SET 

10 1 legt die Device-Nummer für LOAD und SAVE auf 1 
(Kassette). Jedes Laden und Abspeichern erfolgt jetzt auf 
das angegebene Gerät. Die voreingestellte Device-Nummer 
ist 8 (für die Floppy also: 10 8). Wenn Sie nur mit der Flojspy 
arbeiten, brauchen Sie diesen Befehl also nicht. 

LOAD 

U’name" lädt ein Programm vom angegebenen Gerät (wie 
oben beschrieben) an die Originaladresse in den Speicher. 
Die Basic-Zeiger bleiben bei diesem Ladevorgang unbeein¬ 
flußt, d 00 heißt, sie werden nicht verändert. 

Beispiel: Unser Monitor soll an seiner Originaladresse 
($0000) im Speicher stehen. Also brauchen Sie ihn nur mit 
»L’SMON"« zu laden, damit er dort erscheint. Wenn Sie ein¬ 
mal ein Programm an eine andere als die Originaladresse 
laden wollen, dann bietet Ihnen SMON dazu folgende Mög¬ 
lichkeit: »L'name” ADRESSE« lädt ein Programm an die ange¬ 
gebene Adresse. Nehmen Sie doch bitte noch einmal unser 
letztes Test-Programm und geben es mit dem Assembler ab 
Adresse $4000 ein. Speichern Sie es mit »S”SUPERTEST” 
4000 4023« ab und laden es dann 

1. an die Originaladresse (L'SUPERTEST”) und 

2. an eine andere Adresse (mit L'SUPERTEST”5000 zum 
Beispiel nach $5000). 

Schauen Sie sich danach mit dem Disassembler-Befehl 
beide Routinen einmal an. Sie werden feststellen, daß beide 
Programme zwar bis auf die BRANCH-Befehle gleich ausse- 
hen, daß das Programm in $5000 aber nicht funktionieren 
kann, da es eine falsche Adresse verwendet (5002 LDA 
400E,Y). Ein anderes Beispiel dazu: Ein Autostart-Programm 
beginnt bei $0120, läßt sich aber in diesem Bereich nicht 
untersuchen, da dort der Prozessor-STACK (im Bereich von 
$0100 bis $01FF) liegt, der vom Prozessor selbständig ver¬ 
ändert wird. Wenn Sie nun L’name” 4120 eingeben, befindet 
sich das Programm anschließend bei $4120 (nicht an der 
Originaladresse $0120) und Sie können es ohne Einschrän¬ 
kungen - von den falschen Absolut-Adressen abgesehen - 
disassemblieren. 

SAVE 

S”name", ANFADR ENDADR speichert ein Programm von 
ANFADR bis ENDADR-1 unter »name« auf die Floppy ab, da 
diese - wie wir ja inzwischen wissen - das voreingestellte 
Gerät ist. Wenn Sie auf Kassette abspeichern wollen, setzen 
Sie vorher mit »10 1« die Device-Nummer auf 1. 

Beispiel: S”SUPERTEST”4000 4020 speichert das Pro¬ 
gramm mit dem Namen »SUPERTEST« (es steht im Speicher 
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von $4000 bis $401F) auf Diskette ab. Bitte beachten Sie 
auch bei diesem Befehl, daß die Endadresse auf das nächste 
Byte hinter dem Programm gesetzt wird. 

Printer-Set 

PO 2 setzt die Primäradresse für den Drucker auf 2. Vorein¬ 
gestellt ist hier die 4 als Gerätenummer (zum Beispiel für 
Commodore-Drucker). Vielleicht haben Sie es ja schon 
bemerkt: Bei allen Ausgabe-Befehlen (wie D, M etc.) können 
Sie auch den Drucker ansprechen, wenn Sie das Kommando 
geshiftet eingeben. Die Ausgabe erfolgt dann gleichzeitig auf 
Bildschirm und Drucker. (Beachten Sie bitte die Änderung für 
die Druckerausgabe am Schluß des Artikels.) 

Ein bißchen Rechnerei 


Die folgende Befehlsgruppe enthält Befehle zur Zahlen¬ 
umrechnung. Sie wissen ja: Der Mensch mit seinen zehn 
Fingern neigt eher zur dezimalen Rechenweise, aber der 
Computer bevorzugt das Binärsystem, weil er nur zwei Finger 
hat (siehe Netzstecker). Ein Kompromiß ist das Hexadezimal¬ 
system, denn das versteht keiner von beiden. Um Verständ¬ 
nisschwierigkeiten mit Ihrem Liebling aus dem Weg zu 
gehen, haben Sie aber SMON. 

Umrechnung Dez—Hex 

# (Dezimalzahl) rechnet die Dezimalzahl in die entspre¬ 
chende Hexadezimalzahl um. Hierbei können Sie die Eingabe 
in beliebiger Weise vornehmen, da SMON Zahlen bis 65 535 
umrechnet. Beispiel: #12, #144, #3456, #65533 und so 
weiter. 

Umrechnung Hex—Dez 

$ (Hexadezimalzahl) rechnet die Hexadezimalzahl in die 
entsprechende Dezimalzahl um. Die Eingabe muß hierbei 
zweistellig beziehungsweise vierstellig erfolgen. Ist diese 
Zahl kleiner als $100 (=255), wird zusätzlich auch der Binär¬ 
wert ausgegeben. 

Beispiel: $12, $0012, $0D, $FFD2 etc. In den ersten drei 
Beispielen erfolgt die Anzeige auch in binärer Form. 
Umrechnung Binär—Hex,Dez 

% (Binärzahl (achtstellig)) rechnet die Binärzahl in die ent¬ 
sprechenden Hexa- und Dezimalzahlen um. Bei diesem 
Befehl müssen Sie genau acht Binärzahlen eingeben. Falls 
Sie einmal versehentlich mehr eingeben sollten, werden nur 
die ersten acht zur Umrechnung herangezogen. Beispiel: 
% 00011111 , %10101011 
Add-Sub 

? 2340+156D berechnet die Summe der beiden vier (!)- 
stelligen Hex-Zahlen. Neben der Addition ist auch Subtrak¬ 
tion möglich. 

Programme auf dem Rangierbahnhof 


Occupy (Besetzen) 

O (ANFADR ENDADR HEX-Wert) belegt den angegebenen 
Bereich mit dem vorgegebenen HEX-Wert. Beispiel: O 5000 
8000 00 füllt den Bereich von $5000 bis $7FFF mit Nullen. 

Man kann mit »OCCUPY« aber nicht nur Speicherbereiche 
löschen, sondern auch mit beliebigen Werten belegen. Häu¬ 
fig hat man das Problem, festzustellen, welcher Speicher¬ 
platz von einem Programm wirklich benutzt wird. Wir füllen 
den in Frage kommenden Bereich dann zuerst zum Beispiel 
mit »AA« und laden dann unser Programm. Probieren Sie bitte 
das folgende Beispiel: Füllen Sie den Speicherbereich von 
$3000 bis $6000 mit $AA und laden Sie dann unser 
SUPERTEST-Programm. Beim Disassemblieren können Sie 
erkennen, daß unser kleines Programm exakt zwischen vie¬ 
len »AA« eingebettet ist. 


Write 

W (ANFADRalt ENDADRalt ANFADRneu) verschiebt den 
Speicherbereich von ANFADRalt bis ENDADRalt nach 
ANFADRneu ohne Umrechnung der Adressen! Unser klei¬ 
nes Testprogramm möge noch einmal als Beispiel dienen: 
W 4000 4020 6000 verschiebt das oben angesprochene 
Programm von $4000 nach $6000. 

Hierbei werden weder die absoluten Adressen umgerech¬ 
net noch die Tabellen geändert. Letzteres ist sicherlich 
erwünscht, aber denken Sie daran, daß das verschobene 
Programm nun nicht mehr lauffähig ist, da die absoluten 
Adressen nicht mehr stimmen (zum Beispiel bei dem Befehl 
LDA 400E,Y). Falls Sie jetzt »G6000« eingeben, um das Pro¬ 
gramm zu starten, werden Sie sich sicherlich wundern, daß 
es dennoch läuft. Doch löschen Sie einmal das Programm in 
$4000 (mit »04000 4100 AA«) und starten das Programm 
in $6000 noch einmal! Seltsam, nicht? Abhilfe schafft der 
nächste Befehl. 

Variation 

V (ANFADRalt ENDADRalt ANFADRneu ANFADR ENDADR) 
rechnet alle absoluten Adressen im Bereich von ANFADR bis 
ENDADR, die sich auf ANFADRalt bis ENDADRalt beziehen, 
auf ANFADRneu um. Kompliziert? Nicht, wenn Sie sich klar¬ 
machen, daß die ersten drei Adressen exakt den Eingaben 
beim »W«-Befehl entsprechen. Neu hinzu kommen nur die 
beiden Adressen für den Bereich, in dem die Änderung tat¬ 
sächlich erfolgt. 

Um unser mit »W« schon verschobenes Programm auch 
wieder lauffähig zu machen, geben Sie folgendes ein: 
V4000 4020 6000 6000 600E. Damit werden alle Absolut¬ 
adressen, die im Bereich von $6000 bis $600E - dahinter 
steht die Tabelle - liegen und sich bisher auf $4000 bis 
$4020 bezogen haben, auf den neuen Bereich umgerech¬ 
net. Pr-'bieren geht wie immer über kapieren. 

Eine Zusammenfassung dieser beiden Befehle ermöglicht: 
Convertieren 

(Verschieben eines Programmes mit Adreßumrechnung.) 

C (ANFADRalt ENDADRalt ANFADRneu ANFADRges END- 
ADRges) verschiebt das Programm von ANFADRalt bis END¬ 
ADRalt zur ANFADRneu und zwar mit Umrechnung der 
Adressen zwischen ANFADRges und ENDADRges 

An unserem kleinen Testprogramm läßt sich wieder einmal 
demonstrieren, wie der Befehl eingesetzt wird. Laden Sie es 
also mit »L’SUPERTEST’’« und schauen es mit »D 4000« an. 
Jetzt wollen wir an der Adresse $4008 einen 3-Byte-Befehl 
einfügen: C 4008 4020 400B 4000 4011 verschiebt das 
Programm von $4008 bis $4020 zur neuen Anfangsadresse 
$400B. Dabei werden im Bereich von $4000 bis $4011 
(neue Endadresse des »aktiven« Programmes!) die Sprung¬ 
adressen umgerechnet. Nun können Sie ab Adresse $4008 
einen 3-Byte-Befehl einfügen, zum Beispiel STY 0286. Dazu 
geben Sie bitte ein: 

A 4008 

4008 STY 0286 

F .. 

Überzeugen Sie sich davon, daß SMON die Befehle korrekt 
umgerechnet hat, indem Sie unser Beispiel disassemblieren 
(D 4000) und anschließend mit G 4000 starten. Besitzer 
eines Farbmonitors werden in helle Begeisterung aus¬ 
brechen. Vorsicht ist geboten, wenn Tabellen oder Text vor¬ 
handen sind. SMON wird versuchen, diese als Befehle zu 
disassemblieren und gegebenenfalls umzurechnen. Dabei 
können unvorhersehbare Verfälschungen auftreten. Aus die¬ 
sem Grunde ist im Beispiel die Endadresse des zu ändernden 
Bereiches auf $4011 und nicht etwa auf $4023 gelegt 
worden. Wenn Sie größere Programme zu verschieben 
haben, sollten Sie die Kommandos W und V anwenden bezie¬ 
hungsweise einen Assembler einsetzen (zum Beispiel 
Hypra-Ass), der es Ihnen gestattet, beliebige Einfügungen, 
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Verschiebungen und sonstige Änderungen vorzunehmen. 
Das C-Kommando eignet sich in erster Linie für kleinere 
Änderungen innerhalb eines Programms. 

BASIC-DATA 


B (Anfadr Endadr) 

wandelt das Maschinenprogramm von ANFADR bis 
ENDADR-1 in Basic-DATA-Zeilen um. 

B 4000 4020 

Unser Testprogramm wird in DÄTA-Werte umgerechnet und 
dann mit Zeilennummer 32000 beginnend im Basic- 
Speicher abgelegt. Ein im Speicher befindliches Basic- 
Programm (zum Beispiel ein Basic-Lader) mit kleineren Zei¬ 
lennummern kann dann diese DATA-Zeilen benutzen. 

Wenn Sie das Testprogramm wie oben beschrieben umge¬ 
wandelt haben, überzeugen Sie sich mit »LIST« von der Aus¬ 
führung. Dann können Sie folgendes eingeben: 

10 FOR 1 = 16384 TO 16415 : READ D :POKE l,D : NEXT 

In Verbindung mit den oben erzeugten DATA-Zeilen (und 
RUN!) hätten Sie wieder das ursprüngliche Maschinen¬ 
programm im Speicher. Falls Sie dieses Beispiel durchführen 
wollen, denken Sie bitte daran, daß Sie nach Erstellung der 
DATAs das Originalprogramm zum Beispiel mit OCCUPY 
(O 4000 4020 AA) überschreiben, damit Sie die richtige 
Ausführung überprüfen können. Der BRK-Befehl am Ende 
des Testprogramms bewirkt einen Sprung zum SMON 
zurück. Wollen Sie ein Maschinenprogramm von Basic aus 
starten und auch wieder dorthin zurückgelangen, muß der 
letzte Befehl ein RTS sein. Probieren Sie es aus, indem Sie 
das Basic-Programm um 20 SYS 16384 erweitern. 

KONTROLLE 


K (Anfadr Endadr) 

listet die ASCII-Zeichen im gewünschten Bereich. Es wer¬ 
den jeweils 32 Zeichen pro Zeile ausgegeben, so daß man 
sich einen schnellen Überblick über Texte oder Tabellen ver¬ 
schaffen kann. 

Beispiel: K 4000 listet die ersten 32 Zeichen unseres Pro¬ 
gramms. Die weitere Ausgabe ist genau wie beim Disassem- 
blieren durch Druck auf SPACE oder RETURN möglich. Auch 
hier können Sie wie bei den anderen Bildschirm-Ausgabe¬ 
befehlen Änderungen durch einfaches Überschreiben vor¬ 
nehmen (natürlich nicht im ROM und nur mit ASCII-Zeichen!). 

Als Beispiel wollen wir einmal im Basic »herumpfuschen«. 
Das geht natürlich nicht so ohne weiteres, weil das Basic im 
ROM steht und damit nicht verändert werden kann. Tippen 
Sie bitte folgendes ein: 

W A000 C000 A000 

Auf den ersten Blick eine unsinnige Anweisung; der Spei¬ 
cher soll von A000 bis C000 nach A000 verschoben wer¬ 
den. Dieser Befehl entspricht exakt der Basic-Schleife 
FOR I = 40960 TO 49152 : POKE I, PEEK (I) : NEXT 

Nun ist es aber so, daß beim PEEK das ROM gelesen, beim 
POKE aber ins darunterliegende RAM geschrieben wird. Wir 
erreichen also, daß das Basic ins RAM kopiert wird. Jetzt 
müssen wir dafür sorgen, daß das Betriebssystem sein Basic 
aus dem RAM und nicht aus dem ROM holt. Zuständig dafür 
ist die Speicherstelle 0001. Geben Sie bitte »M 0001« ein 
und überschreiben Sie die »37« mit »36«. 

Es passiert gar nichts. Jetzt tritt unser K-Kommando in 
Aktion. Geben Sie ein: K A100 A360 

Was Sie sehen, sind die Basic-Befehlswörter und -Mel¬ 
dungen. Schalten Sie mit SHIFT/CBM auf Kleinschrift, dann 
erkennen Sie, daß der jeweils letzte Buchstabe eines 
Befehlswortes groß geschrieben ist (Endekennung). Jetzt 


ändern Sie durch Überschreiben das »LIST« (AI 00) in »LUST« 
und »ERROR« (A360) in »FAELER«. (Bei »FAELER« müssen 
Sie ein Zeichen vor »ERROR« beginnen, sonst paßt es nicht.) 
Verlassen Sie jetzt SMON mit »X« und geben Sie danach ein: 
POKE 1,54 

SMON schaltet nämlich beim »X«-Befehl immer auf das 
Basic-ROM zurück, daher müssen wir wieder auf unser 
geändertes Basic umschalten. Schreiben Sie nun einen 
Basic-Dreizeiler und versuchen Sie, diesen zu LISTen. Er¬ 
gebnis? Versuchen Sie es jetzt einmal mit »LUST«. Ihrer wei¬ 
teren Phantasie sind keine Grenzen mehr gesetzt... 

Wie oben angesprochen stellt SMON eine Reihe verschie¬ 
dener Suchroutinen zur Verfügung, die im folgenden an vie¬ 
len Beispielen beschrieben werden. Alle diese Befehle 
bestehen aus zwei Zeichen und beginnen mit dem Buchsta¬ 
ben »F«. 

FIND 


F (HEX-WERT(e), Anfadr Endadr) 

sucht nach einzelnen HEX-Werten innerhalb eines 
bestimmten Bereichs. Das zweite Zeichen (hinter F) ist hier 
ein Leerzeichen und darf nicht weggelassen werden! Die 
Bereichsangabe kann wie bei allen folgenden Befehlen ent¬ 
fallen, dann wird der gesamte Speicher durchsucht. 

Beispiel: Wir suchen alle Befehle LDY # 01, also die Werte 
AO 01 im Bereich von $2000 bis $6000. 

F AO 01, 2000 6000 (die Leerzeichen zwischen den Hex- 
Bytes dürfen nicht weggelassen werden!). Es erscheinen 
alle Speicherstellen, die die gesuchten Bytes enthalten, also 
zum Beispiel 4000. 

FA (Aorw. se, Anfadr Endadr) 

sucht alle Befehle, die eine bestimmte Adresse als Operan¬ 
den haben (absolut). Die Adresse braucht nicht vollständig 
angegeben zu werden, es kann das Jokerzeichen »*« 
benutzt werden. 

1. Beispiel: Wir suchen alle JSR FFD2-Befehle im Bereich 
$2000 bis $6000. 

FAFFD2.2000 6000 

Es erscheinen alle Befehle disassembliert, die FFD2 im 
Operanden enthalten (also auch LDA FFD2 oder STA 
FFD2.Y...). 

2. Beispiel: Wir suchen alle Befehle, die auf den Grafikbe¬ 
reich ($D000 bis $DFFF) zugreifen. 

FAD* * *,2000 6000 

Der Joker kann aber auch zum Beispiel zur Suche im 
Bereich $D000 bis $D0FF dienen: FADO* *,2000 6000 
FR (Adresse, Anfadr Endadr) 

sucht nach relativen Sprungzielen. Anders als bei absolu¬ 
ten Sprüngen (JMP, JSR) benutzen die Branch-Befehle eine 
relative Adressierung, also zum Beispiel »Verzweige 10 vor« 
oder »37 zurück«. Solche Sprünge lassen sich mit dem FA- 
Kommando nicht finden. Hier wird »FR« eingesetzt. 

Beispiel: Gesucht werden alle Branch-Befehle, die die 
Adresse $4002 anspringen. 

FR4002.2000 6000 

Natürlich können solche Befehle nur höchstens 128 Byte 
vom Sprungziel entfernt sein. Die Bereichsangabe ist hier 
also viel zu groß gewählt (SMON stört dies allerdings nicht). 
Der Einsatz des Jokers ist hier ebenfalls wie oben beschrie¬ 
ben möglich. 

FT (Anfadr Endadr) 

sucht Tabellen im angegebenen Bereich. SMON behandelt 
dabei alles, was sich nicht disassemblieren läßt, als Tabelle. 
Beispiel: Wir suchen Tabellen oder Text im Bereich $2000 
bis $6000. 

FT 2000 6000 
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FZ (Adr, Anfadr Endadr) 

sucht alle Befehle, die Zeropage-Adressen haben. 

1. Beispiel: FZC5.2000 6000 findet alle Befehle, die C5 
adressieren, also zum Beispiel BIT $C5, LDA (C5), Y etc. 

2. Beispiel: FZF*,2000 6000 findet alle Befehle, die den 
Bereich zwischen $F0 und $FF adressieren. 

3. Beispiel: FZ* *,2000 6000 findet sämtliche Befehle mit 
Zeropage-Adressierung. 

Fl (Operand, Anfadr Endadr) 

sucht alle Befehle mit unmittelbarer Adressierung 
(immediate). 

Beispiel: Gesucht werden Befehle, die zum Beispiel das Y- 
Register mit 01 laden. FI01.2000 6000 findet LDY #01 in 
Adresse $4000. 

Sie sehen, SMON bietet eine Fülle von verschiedensten 
FIND-Routinen, mit denen alles gesucht und auch gefunden 
(!) werden kann. 

= 4000 6000 

vergleicht den Speicherinhalt ab $4000 mit dem ab $6000. 
Das erste nicht übereinstimmende Byte wird angezeigt und 
der Vergleich wird abgebrochen. 

Wenn Sie also ein Maschinenprogramm geschrieben und 
überarbeitet haben und Sie wissen nicht mehr genau, worin 
eigentlich der Unterschied zwischen der 76. und der 77. 
Version besteht, gehen Sie so vor: Laden Sie zuerst Version 
76 und verschieben Sie diese mit dem »W«-Befehl in einen 
freien Speicherbereich. Laden Sie dann Version 77 und füh¬ 
ren Sie den »=«-Befehl durch. Sofort finden Sie den Unter¬ 
schied und können mit der Arbeit an Version 78 beginnen... 

Wir wollen uns bei der Beschreibung der Trace-Befehle auf 
Anwendungsbeispiele konzentrieren. Zum Aufbau der Rou¬ 
tine sei nur so viel gesagt: Gesteuert wird sie mit Hilfe des 
Prozessor-Interrupts, weil nur damit ein Eingriff ins laufende 
Maschinenprogramm möglich ist. Während des Trace- 
Ablaufs wird deswegen der Bildschirm kurzfristig aus- und 
eingeschaltet, weil alle anderen Interruptanforderungen wie 
zum Beispiel durch den Video-Chip, verhindert werden müs¬ 
sen. Da die Befehle eines Programms nicht nur angezeigt, 
sondern auch wirklich ausgeführt werden, ist der »SEk- 
Befehl mit großer Vorsicht zu verwenden. Doch dazu später 
mehr. Wir wollen ein neues, besser geeignetes Beispiel ver¬ 
wenden als bisher. Tippen Sie also das folgende Mini¬ 
programm mit dem Assembler ein (A 4000): 


4000 

LDA 

#30 

lade den Akku mit (ASCII-) 0 

4002 

JSR 

FFD2 

gib Akku aut dem Bildschirm aus 

4005 

CLC 



4006 

ADC 

#01 

erhöhe Akku um 1 

4008 

CMP 

#39 

vergleiche Akku mit (ASCII-) 9 

400A 

BCC 

4002 

springe, wenn Akku kleiner, zurück 

400C 

BRK 


springe In SMON zurück 


Starten Sie das Programm mit »G 4000«. Es muß die Zahlen 
von 0 bis 8 auf den Bildschirm schreiben. 

▼ Trace-Stop 

TS (Startadresse Stoppadresse) 

Starten Sie nun unser Programm mit TS 4000 4009. Die 
ersten Befehle werden ausgeführt (die Null ausgegeben, der 
Akku erhöht etc.), dann stoppt das Programm bei Adresse 
$4009 und springt in die Registeranzeige. 

Genau genommen ist »TS« gar kein Trace-Befehl, das Pro¬ 
gramm läuft nämlich bis zur gewählten Stoppadresse in Echt¬ 
zeit durch. Dort angekommen, können Sie die Register prü¬ 
fen und gegebenenfalls durch Überschreiben ändern. Mit 
»G«, »TW« oder »TB« (wird später erklärt) ohne weitere 
Adresseneingaben können Sie dann im Programmlauf fort¬ 
fahren. SMON merkt sich nämlich, wo er stehengeblieben ist 
und arbeitet ab dieser Adresse weiter, wenn Sie nicht eine 
neue angeben. 


Sinnvoll ist dieser Befehl immer dann, wenn in einem länge¬ 
ren Programm nur bestimmte Teile »getraced« werden sollen, 
der Anfang aber durchlaufen werden muß, um Variable zu set¬ 
zen oder Benutzereingaben zu erfragen. Auch wenn man 
nicht ganz sicher ist, ob eine bestimmte Passage überhaupt 
jemals durchlaufen wird, kann man das mit »TS« überprüfen. 

Zwei Einschränkungen gibt es allerdings wegen der 
Arbeitsweise dieses Befehls: SMON setzt im Programm an 
die Stoppadresse einen BRK-Befehl und merkt sich, welcher 
Befehl dort stand, um ihn wieder zurückzuschreiben. Des¬ 
halb funktioniert »TS« nur im RAM, nicht aber zum Beispiel im 
Basic oder im Betriebssystem. Auch darf die Speicherstelle, 
in der sich SMON den ausgetauschten Befehl merkt 
($02BC) vom Programm nicht verändert werden, sonst ist 
eine korrekte Reparatur nicht mehr möglich. 

Der wohl am häufigsten und vielseitigsten eingesetzte 
Trace-Befehl ist sicherlich »TW«. 

❖ Trace Walk 
TW (Startadresse) 

Starten Sie unser Beispiel jetzt mit TW 4000 

Der erste Befehl (LDA # 30 in Adresse $4000) wird aus¬ 
geführt, SMON stoppt und zeigt dann die Inhalte aller Regi¬ 
ster in der gleichen Reihenfolge wie beim »R«-Kommando 
sowie den nächsten Befehl an. Im Akku steht jetzt 30, der 
Programmzähler zeigt auf $4002. Jetzt drücken Sie eine 
Taste. Der nächste Befehl (JSR FFD2) wird ausgeführt, der 
Programmzähler zeigt auf $FFD2. Achten Sie auf den Stack¬ 
pointer: Sein Inhalt hat sich um 2 vermindert, weil der Prozes¬ 
sor auf dem Stack die Adresse abgelegt hat, an die er nach 
Beendigung der Subroutine zurückspringen soll. Der näch¬ 
ste angezeigte Befehl ist ein indirekter Sprung über $0326. 
Mit dem nächsten Tastendruck wird er durchgeführt. 

Und so geht es munter weiter. Verzweifeln Sie nicht, wenn 
Sie a"'M nach den nächsten zehn Tastendrücken immer 
noch irgendwo im Betriebssystem »herumtracen« und von 
unserem Beispielprogramm weit und breit nichts mehr zu 
sehen ist. Ausnahmsweise ist unser Liebling einmal nicht im 
»Land der Träume« verschwunden, sondern tut, was er soll: 
Er arbeitet brav einen Befehl nach dem anderen ab, was zur 
Routine $FFD2 gehört, und das ist reichlich viel. Also bewe¬ 
gen Sie Ihre Finger, Sie haben’s ja nicht anders gewollt. 
Irgendwann einmal, nach mehreren hundert gedrückten 
Tasten, befinden Sie sich plötzlich wieder in der Registeran¬ 
zeige von SMON. Das Programm ist beendet. Nun werden 
Sie enttäuscht fragen, was man wohl mit einem Trace-Modus 
anfangen soll, der schon bei kleinsten Beispielprogrammen 
ein völlig undurchschaubares Chaos erzeugt? Nur Geduld, 
die Rettung naht in Gestalt der Taste »J«. 

Falls ihre Hand noch nicht in Gips liegt, starten Sie das 
Ganze nochmal von vorn mit »TW 4000«. Diesmal drücken 
Sie aber jedesmal, wenn als nächster Befehl »JSR FFD2« 
angezeigt wird, auf »J«. Der Effekt ist, daß die gesamte 
Subroutine auf einen Schlag abgearbeitet wird und Sie sofort 
wieder auf dem nächsten Befehl unseres Beispiels landen. 
Daß wir nicht gemogelt und die Befehle von »JSR FFD2« ein¬ 
fach unterschlagen haben, sehen Sie daran, daß der Akku 
tatsächlich auf dem Bildschirm ausgegeben worden ist 
(rechts neben FFD2). Jetzt können Sie unser Beispiel in aller 
Ruhe bis zum Ende durchgehen und verfolgen, wie der Akku 
erhöht wird, wie der Vergleich das Statusregister beeinflußt 
und wie entsprechend der Rücksprung in die Schleife erfolgt. 

Sie dürfen die »J«-Taste auch dann benutzen, wenn Sie 
schon mitten in der Subroutine sind. Aber hierbei ist äußerste 
Vorsicht geboten: Die Rücksprungadresse muß unbedingt 
oben auf dem Stack liegen, wenn Sie »J« drücken. Hat näm¬ 
lich der Prozessor Werte auf dem Stack abgelegt (mit PHA 
oder PHP), dann erfolgt der Sprung irgendwo hin, nur nicht 
zurück ins Programm. Achten Sie deshalb genau auf die 
Anzeige des Stackpointers. Wenn dessen Wert genau so 
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groß ist wie bei Beginn der Subroutine, kann nichts passie¬ 
ren. Sonst hilft nur noch der Reset-Taster, den Sie ja in¬ 
zwischen hoffentlich eingebaut haben, oder eine ruhige 
Hand, die die Büroklammer an Pin 1 und 3 des User-Ports hält 
(Kostenpunkt der Reparatur bei Abrutschen liegt bei zirka 
100 Mark ...). 

»TW« bricht automatisch mit der Registeranzeige ab, wenn 
im Programm ein »BRK«-Befehl auftaucht. Wenn Ihnen das zu 
lange dauert oder Sie zwischendurch ein Register ändern 
möchten, können Sie den Trace-Modus jederzeit mit der 
Stopp-Taste verlassen. Anschließend können Sie wie bei »TS« 
beschrieben fortfahren. 

Im Gegensatz zu »TS« können Sie mit »TW« auch im ROM 
herumstöbern; Sie haben es ja bei der Subroutine $FFD2 
bereits getan. Einzige Einschränkung beim »TW«-Befehl: Ihr 
Programm darf keinen »SEI« enthalten, da dieser den Inter¬ 
rupt und damit auch den Trace-Modus lahmlegt. Verlassen 
Sie in diesem Falle »TW« mit STOP und starten erneut hinter 
dem »SEI«-Befehl. Allerdings müssen Sie in Kauf nehmen, 
daß das Programm normalerweise nicht mehr korrekt 
arbeitet. 

Das nächste Programm soll als weiteres Beispiel für den 
TW-Modus dienen. Geben Sie es folgendermaßen ein: 


5000 

LDA 

#00 

lädt den Akku mit »0« 

5002 

TAX 


überträgt den Akku ins X-Register 

5003 

.OC 


ein mysteriöses Byte 

5004 

LDA 

#04 

lädt den Akku mit »4« 

5006 

TAY 


überträgt den Akku ins Y-Register 

5007 

BRK 


springt in SMON 


Wenn wir dieses kleine Programm abarbeiten, müßte das 
X-Register auf »0« stehen, während Akku und Y-Register mit 
»4« geladen sind. Starten wir also das Programm mit »G 
5000« und schauen uns die Register an. 

Seltsamerweise enthalten alle Register eine »0«. Vorsich¬ 
tig, wie wir sind, überschreiben wir die drei Register mit »FF«, 
um die Veränderung deutlich kontrollieren zu können. 

Dann starten wir mit »G 5000« ein zweites Mal. Gegen alle 
Gesetze der Vernunft erscheint wieder das »falsche« Ergeb¬ 
nis - alle drei Register sind »0«. Hier soll uns jetzt der TW- 
Modus weiterhelfen, indem er uns zeigt, was in Wirklichkeit 
passiert. 

Geben wir »TW 5000« ein. Der erste Befehl (LDA # 00) ist 
durchgeführt, im Akku erscheint die Null. Jetzt steht der Pro¬ 
grammzähler auf dem folgenden Befehl »5002 TAX«. Nach 
Drücken einer Taste wird dieser Befehl ausgeführt und es 
erscheint die Null im X-Register. Belm folgenden Befehl müs¬ 
sen wir feststellen, daß der Disassembler nicht in der Lage ist, 
ihn zu interpretieren - er gibt drei Sternchen aus. Hierbei han¬ 
delt es sich um unser Byte »OC«. 

Wieder ein Tastendruck; und dann erkennen wir, daß etwas 
Merkwürdiges passiert ist. Der Prozessor hat augenschein¬ 
lich den nächsten Befehl (LDA #04) übersprungen und 
steht schon auf dem folgenden »TAY«. So also wird unser Pro¬ 
gramm abgearbeitet. Damit ist auch das »falsche« Ergebnis 
erklärt. Bleibt nur noch die Frage nach dem Grund für dieses 
seltsame Verhalten. Und der ist sicherlich in dem mysteriö¬ 
sen Byte »OC« zu suchen. Hierbei handelt es sich um einen 
der »inoffiziellen« Opcodes, die aufgrund der Prozessorarchi¬ 
tektur vorhanden sind und in manchen Programmen ihr 
Unwesen treiben - wie wir zu unserem Leidwesen erfahren 
mußten. Das Byte »OC« wirkt wie ein »NOP«, der eine Länge 
von 3 Byte hat. Deshalb wird der folgende 2-Byte-Befehl 
(LDA #04) verschluckt. 

Es gibt noch einiges zu entdecken am 6502 und 6510 - 
TW macht's möglich. 

Häufig ist es nicht sinnvoll, ein Programm von Anfang an im 
TW-Modus laufenzulassen. Zum anderen sind gerade Schlei¬ 
fen, die per Hand mit »TW« durchlaufen werden müssen, eine 


ermüdende Angelegenheit. Hier bietet SMON neben dem 
bereits beschriebenen »TS« eine weitere Trace-Möglichkeit 
an: 

▼ Trace Break 

TB (Adresse Anzahl der Durchläufe) 

❖ Trace Quick 
TQ (Adresse) 

Geben Sie als Beispiel folgendes Programm ein: 


6000 

LDY 

#00 

Y als Zähler auf »0« 

6002 

LDA 

600E.Y 

Werte von S600E ff. sollen geladen 
werden 

6005 

JSR 

FFD2 

Ausgabe der Zeichen auf dem 

Bildschirm 

6008 

INY 


der Zähler wird erhöht 

6009 

CPY 

#0E 

Zähler schon »14«? 

600B 

601D 

BCC 

BRK 

6000 

wenn nein, dann nächsten Wert holen 


Bei $600E soll nun ein Text stehen, den das Programm 
ausgibt. Die einfachste Art, mit SMON Texte in den Speicher 
zu schreiben, besteht im »K«-Befehl. Geben Sie 
K600E 

ein (danach natürlich Return) und drücken Sie die STOP- 
Taste. Fahren Sie mit dem Cursor an das erste ausgegebene 
Zeichen (vermutlich ein Punkt) und schreiben Sie - ohne 
Anführungszeichen: 

»FEHLER BEHOBEN« 

Drücken Sie dann Return, um die Zeile an den Rechner zu 
übergeben. Wenn Sie das Programm starten, werden Sie 
wieder einmal Gelegenheit haben, sich in Ruhe etwas zu 
trinken zu holen (Prost!), denn das Programm enthält einen 
dummen Fehler und beschäftigt den Computer für eine lange, 
lange /<-> Genauer gesagt, bis Sie ihn mit Reset ( zum Bei¬ 
spiel durch RUN/STOP-RESTORE) erlösen. 

Nun soll SMON helfen, diesen Fehler zu lokalisieren. Set¬ 
zen Sie zuerst einmal einen Breakpoint bei $6002 und 
begrenzen die Durchläufe auf die maximale Anzahl: 

TB 6002 OE 
und starten mit 
TQ 6000 

den Quicktrace bei $6000. Das Programm läuft so lange, bis 
zum 14. Mal die Adresse $6002 erreicht wird und springt 
dann in den TW-Modus. Wenn Sie sich jetzt die Registerin¬ 
halte genau anschauen, müßte ihnen der Fehler geradezu ins 
Auge springen. Wie groß sollte denn das Y-Register sein? 
Welchen Wert sollte der Akku haben? NA?! 

Das »Gedächtnis« von SMON 


Wenn Sie Programme mit SMON untersuchen oder verän¬ 
dern wollen, müssen Sie noch wissen, welche Speicherstel¬ 
len SMON verwendet. Es soll ja Monitorprogramme geben, 
die die Basic-Zeiger als Arbeitsspeicher benutzen, so daß ein 
Basic-Programm nach dem Rücksprung aus dem Monitor 
gelöscht ist. SMON tut so etwas nicht. Aber natürlich braucht 
er auch Speicherstellen, um sich Werte merken zu können. 
Damit Sie Konflikten von Anfang an aus dem Wege gehen 
können, sind die wichtigsten hier dargestellt. 

In der Zeropage belegt SMON den Bereich von $00A4 bis 
$00B6. Dort stehen Systemvariable für die Kassettenspei¬ 
cherung und die RS232-Schnittstelle. Diese werden nur 
während des Betriebs der Kassette oder von RS232 
gebraucht, sind ansonsten aber frei. Außerdem werden die 
Speicherstellen $00FB bis $00FF benutzt, die sowieso zur 
freien Verfügung des Anwenders vorgesehen sind. Alle 
anderen Zeiger in der Zeropage, also insbesondere die Spei¬ 
cherverwaltung für Basic, bleiben unbeeinflußt. 
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Als weiteren Arbeitsspeicher benutzt SMON den Bereich 
von $02A8 bis $02C0. Auch dieser Bereich wird vom 
Betriebssystem nicht benutzt, so daß keine Konflikte entste¬ 
hen dürften. Beim Assemblieren wird zusätzlich noch der 
Kassettenpuffer als Speicher für die Label benötigt. Dieser 
bleibt ansonsten aber auch unverändert; das ist wichtig, 
wenn Maschinenroutinen dort abgelegt werden sollen. 

Alles in allem ist SMON also recht verträglich. 

SMON verschieben? - Mit SMON! 


Eine Reihe von Anfragen hat uns erreicht, ob man SMON 
nicht mit Hilfe des »W«-, »V«- oder »C«-Kommandos verschie¬ 
ben könne. Alle Versuche in dieser Richtung seien fehlge¬ 
schlagen. Einige Leser meinten auch, in der V-Routine müsse 
ein Fehler stecken. Diesmal sind wir jedoch völlig schuldlos; 
es gibt nämlich einige Befehle in SMON, die keine Sprung¬ 
adressen sind und sich trotzdem auf den Bereich ($0000-) 
beziehen, in dem SMON steht. 

Dazu gehören in erster Linie die oben erwähnten Ein¬ 
sprungadressen, deren High-Byte natürlich geändert wer¬ 
den muß, wenn SMON in einem anderen Speicherbereich 
laufen soll. Es gibt aber auch Befehle, die eine Adresse im 
Programm in einem Vektor ablegen müssen. Disassemblie- 
ren Sie einmal den Anfang von SMON mit »D C000 COOB«. 
Sie erhalten 


LDA 

#14 

Low-Byte der BREAK-Routine von SMON 

STA 

0316 

im Break-Vektor speichern 

LDA 

#C2 

High-Byte (!) siehe oben 

STA 

0317 

siehe oben 

BRK 






Damit wird der Break-Vektor des Betriebssystems auf den 
SMON gesetzt und mit dem anschließenden — und jedem wei¬ 
teren BRK-Befehl — springt das Programm in SMONs BREAK- 
Routine. Wenn SMON in einem anderen Bereich als $0000 
laufen soll, dann müssen diese Befehle geändert werden. 

Heraussuchen kann man sie mit »FIC*,C000 D000«. Sie 
wissen doch noch, was diese Anweisung bedeutet: Suche mir 
alle Befehle, die ein Register unmittelbar mit einem Wert laden, 
der mit $C beginnt. Aber Vorsicht! Nicht alles, was da ange¬ 
zeigt wird, muß auch geändert werden! Um Ihnen weitere 
Stunden sinnlosen Herumbrütens zu ersparen, wollen wir als 
Beispiel zeigen, wie man SMON in den Bereich $9000 bis 
$AOOO verlegen kann. Natürlich geht das Im Prinzip für Jeden 
anderen Bereich genauso; wir selbst haben insgesamt fünf 
SMON-Versionen für fünf verschiedene Speicherbereiche, 
von denen eine immer paßt. 

1. Wir verschieben zuerst das ganze Programm ohne 
Umrechnen in den neuen Bereich: 

W C000 CFFA 9000 

2. Nun lassen wir alle absoluten (3-Byte-)Befehle umrech¬ 
nen. Die Tabellen am Anfang von SMON bleiben verschont: 
V C000 CFFA 9000 920B 9FD2 

3. Als nächstes ändern wir die High-Bytes der Befehls¬ 
adresse. Geben Sie 

»M 902B 906B« 

ein und ändern Sie in jedem zweiten Byte das »C« durch 
Überschreiben in »9«. Vergessen Sie nicht, am Ende jeder 
Zeile »RETURN« zu drücken, damit Ihre Änderung auch über¬ 
nommen wird. 

4. Nun sind die Befehle mit Immediate-Adressierung an der 
Reihe. Sie müssen so geändert werden, daß sie sich auf den 
neuen Bereich $9... beziehen. Suchen Sie sie mit 
FIC*,9000 9FFA 

heraus. Sie erhalten 

9005 LDA #02 ändern 


9124 

CPX 

#00 

nicht ändern 

9386 

LDY 

#00 

ändern 

9441 

CMP 

#00 

nicht ändern 

987F 

LDX 

#03 

nicht ändern 

988D 

LDX 

#C1 

nicht ändern 

9992 

LDA 

#C1 

nicht ändern 

9C2C 

LDA 

#cc 

ändern 

9C5B 

LDA 

#C2 

ändern 

9CF4 

LDA 

#CC 

ändern 

9DA1 

LDX 

#CC 

ändern 

9E03 

LDA 

#cc 

ändern 

9E6C 

CMP 

#00 

nicht ändern 

9F71 

LDY 

#CF 

ändern 


Sie sehen, es gibt keine Regel, welche Befehle zu ändern 
sind und welche nicht. Aus diesem Grunde müssen Sie diese 
Änderungen »von Hand« vornehmen. 

5. Die Adressen im Diskmonitor müssen ebenfalls umgestellt 
werden. Dazu geben Sie bitte ein: 

M 9FD8 9FE4 

und ändern Sie jedes zweite Byte wie unter Punkt 3 
beschrieben. 

Vergessen Sie bitte auf keinen Fall, Ihre neue(n) Ver¬ 
sionen) unter neuem Namen zu speichern. Sie lassen sich 
dann mit LOAD "Name",8,1 von Diskette laden und mit dem 
entsprechenden SYS (zum Beispiel 36864 bei SMON 
$9000) starten. Denken Sie auch daran, nach dem Laden 
und vor dem SYS ein NEW einzugeben, sonst beschwert sich 
der B-Befehl mit einem OUT OF MEMORY ERROR. 

Probieren Sie nun alle Befehle durch. Sie müssen genauso 
arbeiten wie bisher. Vor allem können Sie jetzt auch Pro¬ 
gramme wie »DOS 5.1« oder »Turbo Tape« untersuchen, die im 
$C000-Bereich stehen. Achten Sie aber, wenn Sie »SMON 
$9000« von Basic aus benutzen, darauf, daß das Basic ihn 
nichi _berschreibt. String-Variable werden nämlich von 
$ A000 nach unten hin aufgebaut und bis $9E09 ist nicht viel 
Platz. Schützen Sie im Zweifelsfalle den Bereich, indem Sie 
nach dem Laden des SMON $9000 eingeben: 

NEW : POKE 56,144 : POKE 55,0 

Damit ist SMON vor Überschreiben geschützt. Das ist 
natürlich bei dem SMON $0000 nicht nötig, weil Basic in die¬ 
sen Bereich nicht hineinkommt. 

Die Befehle des Disk-Monitors 


Da das Arbeiten mit dem Disk-Monitor besondere Aufmerk¬ 
samkeit verlangt (nach Murphys Gesetzen führen Fehleinga¬ 
ben in der Regel zu unlesbaren Disketten), wird er mit einem 
eigenen Kommando eingeschaltet. Leider waren alle halb¬ 
wegs sinnvollen Buchstaben (»D« wie Diskette oder »F« wie 
Floppy) schon vergeben, deshalb haben wir uns für ein 
schlichtes »Z« wie Zuversicht entschieden. 

-Z schaltet den Disk-Monitor ein 

Die Rahmenfarbe ändert sich auf Gelb, der gewohnte».«am 
Anfang einer Zeile ändert sich in »V Dies alles hat den 
Zweck, Ihnen deutlich zu machen, daß es jetzt ernst wird. 
Intern wird jetzt das Basic abgeschaltet, weil der Disk- 
Monitor einen 256 Byte großen Puffer benötigt. Dieser liegt 
von $BF00 bis $0000 im RAM unter dem Basic, weil er dort 
am wenigsten stören kann. 

READ: R (Track Sektor) 

Liest einen Block von der Diskette in den Computer. Track 
und Sektor müssen als Hexzahlen eingegeben werden. Die 
erste Zeile des Blocks wird ausgegeben. Da wir dazu normale 
SMON-Routinen verwenden, steht als Speicheradresse 
$BF00. Das »BF« können Sie vorerst ignorieren. Die weitere 
Ausgabe des Hexdump erfolgt anders als gewohnt mit der 
Taste »SHIFT«. STOP bricht die Ausgabe ab. Sie können die 
Hex-Bytes überschreiben und damit ändern. Eine dauerhafte 
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Änderung erfolgt aber erst beim Zurückschreiben auf die Dis¬ 
kette (siehe Befehl »W«). Geben Sie nur »R« ohne Track und 
Sektor ein, wird der logisch (!) nächste Block eingelesen. 

MEMORY-DUMP: M 

Zeigt den gerade im Puffer befindlichen Block nochmals 
auf dem Bildschirm an. 

Genau wie beim R-Befehl können Sie die Ausgabe mit 
»SHIFT« und »STOP« steuern und Änderungen vornehmen. 

WRITE: W (Track Sektor) 

Schreibt einen Block aus dem Puffer auf die Diskette 
zurück. Ähnlich wie bei »R« kann die Angabe von Track und 
Sektor entfallen. Es wird dann der Track und Sektor des letz¬ 
ten R-Befehls benutzt. Das ist in fast allen Fällen auch der 
richtige. 

ERROR: @ 

Liest den Fehlerkanal aus, gibt ihn aber nur aus, wenn wirk¬ 
lich ein Fehler vorhanden war. (»00, OK, 00, 00« wird unter¬ 
drückt.) 

EXIT: X 

Verläßt den Disk-Monitor und springt in den SMON zurück. 
Dabei wird die Rahmenfarbe auf Blau zurückgeschaltet und 
es erscheint wieder der».« am Anfang der Zeile. Das Basic 
wird wieder eingeschaltet. Wollen Sie nun mit SMON- 
Kommandos auf den Puffer zugreifen, müssen Sie Basic wie¬ 
der abschalten ($36 in Speicherstelle $0001). 

Die folgenden Beispiele sollen Ihnen die Arbeit mit dem 
Disk-Monitor verdeutlichen. 

Achtung! Benutzen Sie unbedingt zum Üben eine Diskette, 
die Sie nicht mehr brauchen! 

Weder wir noch der Verlag haften dafür, wenn Ihr Lieblings¬ 
programm oder die mühsam erstellte Adreßdatei unwieder¬ 
bringlich dahin sind. Daß das sehr sehr schnell gehen kann, 
wissen wir aus eigener Erfahrung ... 

Am besten machen Sie von einer Ihrer Diskette eine Kopie, 
die Sie zum Üben benutzen können. 

Reparatur eines gelöschten Files 

Sicher ist Ihnen das auch schon passiert: Sie wollen Ihr 
Programm mit Namen »Schrott« löschen, geben als Abkür¬ 
zung »S:S*« ein und merken in dem Moment, in dem Sie 
»RETURN« drücken, daß auf der Diskette auch alle Versionen 
von »SMON« waren, außerdem auch noch »Springvogel«, 
»Soccer« etc. Verzweifeln müssen Sie nur, wenn auch diese 
letzte SMON-Version mit dem Disk-Monitor dabei war. 
Ansonsten behalten Sie die Ruhe und verfahren Sie wie im 
folgenden beschrieben. 

Laden Sie also Jetzt SMON, legen Sie Ihre »Übungsdis¬ 
kette« (!) ins Laufwerk und löschen Sie eins der ersten Pro¬ 
gramme mit dem üblichen Scratch-Kommando. Nun starten 
Sie SMON und drücken »Z«. Der Bildschirm ändert seine 
Farbe wie beschrieben und am Anfang der Zeile erscheint 
der »*«. Jetzt geben Sie ein: 

R 12 00 

Auf dem Bildschirm erscheint die erste Zeile der BAM, die 
bei jeder Diskette auf Track 18, Sektor 0 abgelegt ist. Die 
ersten beiden Bytes enthalten »1201« und geben damit den 
logisch nächsten Block an. In diesem Falle wäre das der erste 
Block des Directory. Wenn Sie mit »SHIFT« die Bildschirmaus¬ 
gabe fortsetzen, erkennen Sie etwa in der Mitte den Dis¬ 
kettennamen. Lassen Sie die Ausgabe durchlaufen, bis 
wieder der »*« erscheint. Nun geben Sie »R« ohne weitere 
Angaben ein. Damit erhalten Sie den Koppel-Block, also 
Track 18, Sektor 1, den ersten Directory-Block. (Natürlich 
hätten Sie auch gleich »R 12 01« eintippen können, aber wir 
wollen ja zeigen, wie die Befehle funktionieren.) 

In diesem Block stehen die ersten acht Programme Ihrer 
Übungsdiskette, auch der Name des gelöschten ist dabei. 

Trotzdem ist dieses Programm tatsächlich gelöscht und 
erscheint nicht mehr, wenn Sie sich das Directory anzeigen 



lassen. Vergleichen Sie den Eintrag des gelöschten Pro¬ 
gramms mit den anderen, fällt auf, daß 3 Byte vor Beginn des 
Namens bei allen anderen »82« steht (sofern es sich um Pro¬ 
grammfiles handelt), bei dem gelöschten aber »00«. Die 
Reparatur ist nun denkbar einfach: Sie brauchen lediglich die 
»00« mit »82« zu überschreiben. Einen Haken hat die Sache 
allerdings noch. Beim SCRATCHEN sind die vom Programm 
belegten Blöcke in der BAM als frei gekennzeichnet worden 
und jeder neue Eintrag würde das als gelöscht gekennzeich¬ 
nete File endgültig überschreiben. Um das zu verhindern, 
müssen Sie nach erfolgter Reparatur die Diskette validieren 
(von Basic aus mit Kommando: OPEN 1, 8, 15, "V"). Dabei 
wird die BAM neu erzeugt und korrigiert. 

Schützen eines Files 

Da wir gerade dabei sind, wollen wir unser repariertes 
gelöschtes File gleich ein für allemal gegen Löschen schüt¬ 
zen. Diese Möglichkeit des Diskettenoperationssystems 
(DOS) ist zwar nicht im Handbuch beschrieben, funktioniert 
aber trotzdem ausgezeichnet. Laden Sie dazu nochmals die 
erste Seite des Directory mit 
R 12 01 

und ändern Sie die »82« vor dem Fileeintrag in »C2«. Geben 
Sie »W« ein, um die Änderung auf Diskette zu schreiben. 
Verlassen Sie nun SMON mit »X« und lassen Sie sich ein 
Directory anzeigen. Das geschützte File ist mit einem »>« 
gekennzeichnet. Versuchen Sie nun, dieses Programm mit 
dem Scratch-Kommando zu löschen. Es geht nicht! Zum 
»Entriegeln« brauchen Sie nur das »C2« wieder in »82« zu 
ändern. Der »>« im Directory verschwindet und das File ist 
nicht mehr geschützt. 

Schützen einer Diskette 

Wollen Sie eine ganze Diskette vor versehentlichem 
Löschen oder Formatieren schützen, gibt es die Möglichkeit, 
die Löcr ischutzkerbe abzukleben. Es geht jedoch auch 
anders. 

Achtung! Die im folgenden beschriebene Prozedur läßt 
sich nicht ohne weiteres rückgängig machen, auch nicht 
mit dem Disk-Monitor! 

Nehmen Sie also eine Diskette, die Sie anschließend »hart 
formatieren« können (also mit Eingabe einer ID). Starten Sie 
nun den Disk-Monitor und lesen Sie die BAM mit »R 12 00« 
ein. Das dritte Byte enthält »41«. Diese »41« ist ein Kennzei¬ 
chen für das DOS der 1541- oder 4040-Floppy. Ändern Sie 
diese Byte durch Überschreiben in »45« und speichern Sie 
die Änderung mit »W« auf die Diskette zurück. Verlassen Sie 
nun SMON und versuchen Sie, etwas zu löschen. Ergebnis 
siehe oben. Versuchen Sie auch, die Diskette »weich«, also 
zum Beispiel mit OPEN 1,8,15,’’N:TEST" zu formatieren. 

Auch das ist jetzt nicht mehr möglich. Aber es kommt noch 
besser: Starten Sie noch einmal den Disk-Monitor und versu¬ 
chen Sie, die Änderung durch Zurückschreiben der »41« an 
Stelle der »45« rückgängig zu machen. Auch das ist nicht 
mehr möglich, wir hatten Sie bereits gewarnt! Es bleibt ledig¬ 
lich die Möglichkeit, die Diskette »hart«, zum Beispiel mit 
OPEN 1,8,15,"N:TEST,TE" zu formatieren. Sollten Sie nun ent¬ 
gegen allen Warnungen doch Ihre Master-Diskette gegen 
Schreibzugriffe gesichert haben, verraten wir Ihnen aus¬ 
nahmsweise, wie Sie den Eingriff trotzdem rückgängig ma¬ 
chen können. Dazu überlisten wir das DOS des 1541-Lauf- 
werkes, indem wir ihm vorgaukeln, es hätte eine Diskette im 
Normalformat vor sich. Wir verwenden den Memory-Write- 
Befehl, mit dem wir in die Speicherstelle 0101 (Zero-Page 
Adresse) des 1541-RAM einfach ein »A« schreiben. Der 
CHR$-Code des »A« ist 65, oder in hexadezimaler Schreib¬ 
weise 41. Erinnern Sie sich? Dieser Wert stand ursprünglich 
im dritten Byte des Tracks 18, Sektor 0. Mit folgendem klei¬ 
nen Programm umgehen wir einfach die DOS-Kennzeich- 
nung und wir können die Diskette wieder normal beschrei¬ 
ben. Am sinnvollsten ist es, sofort den SMON zu starten, das 
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vorher in 45 abgeänderte Byte wieder in 41 zu verwandeln 
und abzuspeichern. Die Diskette kann dann wieder zum 
Lesen und Schreiben verwendet werden. Hier nun das kleine 
Programm: 

10 OPEN 1,8,15 

20 PRINT#1, ’’M-W , ’CHR$(1)CHR$(1)CHR$(1)CHR$(65) 
30 CLOSEI 

Ändern des Diskettennamens oder der ID 

Wir haben bereits oben gesehen, daß in Spur 18, Sektor 0 
einer Diskette etwa in der Mitte der Diskettenname gespei¬ 
chert wird. Dieser Name kann durch einfaches Überschrei¬ 
ben geändert werden; er darf bekanntlich bis zu 16 Zeichen 
enthalten. Hat Ihr neuer Name weniger Buchstaben als der 
alte, müssen Sie die Lücken mit »A0« und nicht mit »20« als 
Leerzeichen ausfüllen. Dies gilt vor allem, wenn Sie mit dieser 
Methode Filenamen ändern wollen. Das geht natürlich im 
Prinzip genauso wie eben beschrieben. Hinter dem Disket¬ 
tennamen ist in Spur 18, Sektor 0 die ID abgelegt. Sie wird 
beim Formatieren vor jeden Sektor in einen sogenannten 
Header geschrieben und dient dem DOS zur Identifikation 
der Diskette. Zusätzlich wird sie noch in der BAM gespei¬ 
chert, damit sie beim Laden eines Directory mit angezeigt 
werden kann. Nun ist es grundsätzlich nicht möglich, die ID 
im Header eines Sektors ohne Formatieren zu ändern, wohl 
aber die Eintragung in der BAM und damit die ID, die im 
Directory angezeigt wird. Genau wie beim Namen ist dies 
durch einfaches Überschreiben in der BAM möglich. 

Ändern eines Filetyps 

Wenn Sie einmal versucht haben, ein sequentielles File, 
etwa eine Datei, mit LOAD zu laden, werden Sie gemerkt 
haben, daß dies nicht möglich ist. Das DOS behauptet ein¬ 
fach, ein solches File existiere nicht und der Computer mel¬ 
det »FILE NOT FOUND«. Viele Spiele zum Beispiel legen die 
»Hall of Farne« oder Highscore-Liste als sequentielle Datei ab. 
Mit dem Disk-Monitor ist es nun aber möglich, den Filetyp im 
Directory zu verändern. Erinnern Sie sich an die »82«, die im 
Directory vor jedem Filenamen steht. Bei sequentiellen Files 
steht dort »81«. Was zu tun ist, werden Sie sich denken kön¬ 
nen. Na klar, die »81« wird in »82« geändert, und schon ist die 
Datei ohne weiteres ladbar, natürlich wieder erst nach dem 
Zurückschreiben mit »W«. 

Sinnvoll ist dies natürlich nur von SMON aus (mit Eingabe 
einer Ladeadresse). Mit »M« oder »K« können Sie dann die 
Datei ansehen und natürlich auch ändern. Vergessen Sie 
nicht, die geänderte Datei nach dem Zurückschreiben wieder 
in ein sequentielles File zu verwandeln. Verblüffen Sie Ihre 
Freunde doch mal mit einem auf diese Weise »errungenen« 
High-Score. Die Anerkennung Ihrer Umwelt ist Ihnen sicher! 

Ändern der Startadresse eines Programms 

Wir haben uns bisher auf Manipulationen in der BAM oder 
im Directory beschränkt. Wollen wir in einem Programm 
selbst Änderungen vornehmen, müssen wir etwas tiefer in 
die »Geheimnisse der Floppy« eindringen. So ist es bisweilen 
interessant, die Startadresse eines Maschinenprogramms zu 
kennen oder zu ändern. Dazu gehen wir folgendermaßen vor: 
Zunächst suchen wir mit »R 12 01« und eventuell weiteren 
Folgesektoren (12 04, 12 07...) den Fileeintrag im Directory. 
Die beiden Byte hinter der »82« direkt vor dem Programmna¬ 
men geben an, auf welcher Spur und in welchem Sektor das 
Programm startet. Wenn dort zum Beispiel »OA 04« steht, 
beginnt das Programm auf Spur 10, Sektor 4. Lesen Sie nun 
diesen Block mit »R OA 04« ein. Die ersten beiden Bytes die¬ 
ses Blocks zeigen auf den nächsten Block des Programms, 
die beiden nächsten Bytes enthalten die Startadresse in der 
üblichen Low-High-Byte-Reihenfolge. Zum Ändern der Start¬ 
adresse überschreiben Sie die Bytes mit der neuen und spei¬ 
chern den Block mit »W« auf die Diskette zurück. 


Die Zusammenarbeit mit SMON 

Mit all diesen Beispielen sind die Möglichkeiten des Disk- 
Monitors noch lange nicht erschöpft. Sie sollten Ihnen als 
Anregung für eigene Experimente dienen. Üben Sie aber 
unbedingt so lange, bis Sie alle Kommandos aus dem »FF« 
(oder dezimal 255) beherrschen. Sie ersparen sich damit 
unnötigen Ärger und durchweinte Nächte. Besonders inter¬ 
essant ist es, von SMON aus auf den Puffer zuzugreifen und 
die SMON-Befehle auf den Puffer anzuwenden. Erwähnen 
möchte ich nur die Möglichkeit, Programme für das DOS 
direkt zu assemblieren und in einem bestimmten Sektor able- 
gen zu können, die »Find«-Routinen oder das »K«-Kommando 
für Textänderungen. Da der Puffer im RAM unter dem Basic 
liegt, muß Basic in solchen Fällen abgeschaltet werden. 
Ändern Sie dazu mit dem »M«-Befehl in Speicherstelle 0001 
die »37« in »36«. 

Haben Sie die Arbeit mit SMON beendet, können Sie mit 
»Z« in den Disk-Monitor schalten und den Pufferbereich mit 
»W« (Spur, Sektor) abspeichern. 

Die Ausgabe von Diskettenfehlern 

Beim Arbeiten mit dem Disk-Monitor werden sämtliche 
Fehler vom Laufwerk direkt, auch ohne Eingabe von »@«, 
ausgegeben, zum Beispiel »ILLEGAL TRACK OR SECTOR«, 
wenn Sie mit »R« einen Block lesen wollen, den es gar nicht 
gibt. Einen Fehler hat das Programm allerdings, den wir nicht 
verschweigen wollen. Der letzte Block eines Files enthält als 
Koppeladresse »00 FF«. Da es einen solchen Block nicht 
geben kann, »weiß« das DOS, daß es am Ende angelangt ist. 
Versuchen Sie aber, den nächsten Block (Spur 0, Sektor 
255!!) mit »R« zu lesen, erscheint als Fehlermeldung nicht, 
wie es sein müßte, »ILLEGAL BLOCK OR SECTOR«, sondern 
»SYNTAX ERROR*. Das ist zwar eigentlich unerheblich, 
sollte aber erwähnt werden. Der Fehler liegt in der Routine, 
die ur.iere Zahleneingaben in das richtige Diskettenformat 
wandelt. Es fehlte einfach der Platz im Programm für eine 
»korrekte« Umwandlung, wir mußten uns mit einer »Sparrou¬ 
tine« behelfen. 

Abschließend noch ein SMON-Trick, den wir einem auf¬ 
merksamen Leser verdanken. Für eine Directory-Ausgabe 
fehlte der Platz im SMON. Es geht aber hilfsweise so: Laden 
Sie das Directory zum Beispiel mit 
L 8000 

an einen freien Speicherplatz. Mit »M« oder »K« können Sie 
jetzt das Directory »lesen«. Damit sind alle wichtigen Funktio¬ 
nen für den Umgang mit der Diskette im SMON enthalten. 

SMON lüftet Geheimnisse 


Zwei Erweiterungen haben wir Ihnen zu Beginn angekündigt, 
die SMON noch leistungsfähiger machen sollen. Dabei han¬ 
delt es sich einmal um eine Erweiterung des Disassemblers, 
mit dem nun auch die »illegalen« Opcodes des 6502 
disassembliert werden, zum anderen um neue Funktionen 
beim Diskmonitor, mit denen Sie in den Innereien Ihrer Floppy 
herumstöbern können. Nun ist der Speicherplatz bis auf 5 
Byte ausgeschöpft, und die 4-KByte-Grenze soll auf keinen 
Fall überschritten werden. Wir haben daher andere Funk¬ 
tionen herausgenommen, und zwar für die Disassembler- 
Erweiterung den Diskmonitor und für die Diskmonitor- 
Erweiterung den Trace-Modus. Beide Erweiterungen sind 
also nicht gleichzeitig einsetzbar; überhaupt ist es sinnvoll, 
eigene Versionen für spezielle Anwendungen zusammenzu¬ 
stellen, eine »normale«, eine Spezial-Disk-Version und eine 
für verschärftes Disassemblieren. 

Beginnen wir mit dem letzten: Wie Sie wissen, erscheinen 
beim Disassemblieren immer drei Sternchen, wenn SMON 
auf ein Byte trifft, das keinen gültigen 6510-Opcode darstellt. 
Nun wissen Sie aber vielleicht auch, daß es über den offiziel- 
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len Befehlssatz hinaus noch einige Befehle gibt, die der 
Hersteller des Prozessors zwar nicht dokumentiert hat, die 
aber nichtsdestotrotz funktionieren und in einigen Program¬ 
men auch ausgenutzt werden. Es wäre natürlich schön, wenn 
SMON auch diese »illegalen« Opcodes anzeigen könnte. 
Unsere Erweiterung macht's möglich. 

Wir haben Mnemonics für eine Reihe dieser Befehle einge¬ 
setzt und lassen diese von SMON mit einem vorangestellten 
»*« ausgeben. Übrig bleiben noch zehn Befehle, deren Wir¬ 
kung aber so komplex ist, daß sie sich beim besten Willen 
nicht mit einem Mnemonic abkürzen lassen. Sie fallen auch 
aus der Logik der Prozessorstruktur heraus. Im einzelnen 
handelt es sich um die Opcodes OB, 2B, 4B, 6B, 8B, 9C, 9E, 
AB, CB und EB. Bei diesen Befehlen haben wir keine gemein¬ 
same Struktur entdecken können. Die neuen Mnemonics 
haben folgende Bedeutung: 

LAX Load Akku and X 

entspricht LDA und LDX. 

DCP Decrement and ComPare 
entspricht DEC und CMP. 

ISC Increment and SubtraCt 
entspricht INC und SBC. 

RLA Rotate Left AND Akku 

entspricht ROL und AND. 

RRA Rotate Right and Add with carry 
entspricht ROR und ADC. 

SLO Shift Left OR Akku 

entspricht ASL und ORA. 

SRE Shift Right and EOR Akku 
entspricht LSR und EOR. 

SAX Store Akku AND X 

führt eine UND-Verknüpfung zwischen Akku und 
X-Register durch und speichert das Ergebnis in der 
angegebenen Adresse ab. 

CRA CRAsh 

führt zum »Absturz« des Prozessors. 

NOP NO Operation 

entspricht dem bekannten NOP, jedoch kann dieser 
Befehl auch 2 oder 3 Byte lang sein. Dies wird durch die 
angegebene Adresse deutlich, die in diesem Fall natürlich 
keinerlei Bedeutung hat. 


Über den Sinn dieser Befehle läßt sich sicher streiten; aller¬ 
dings kommen sie bisweilen in Programmen vor, meist um 
das Lesen dieser Programme unmöglich zu machen, also als 
Programmschutz. Von der Verwendung dieser Befehle in 
eigenen Programmen raten wir auf jeden Fall ab. Erstens wird 
kein Hersteller garantieren, daß die »illegalen« tatsächlich mit 
jedem 6510-Prozessor funktionieren, zweitens gibt es keine 
Funktion, die nicht auch mit den »normalen« Befehlen 
ebensogut erreicht werden könnte. Und als Programmschutz 
taugen die »illegalen« spätestens mit der Veröffentlichung 
dieses Artikels ja auch nichts mehr. Aus diesem Grund haben 
wir bewußt auf eine Erweiterung des Assemblers in dieser 
Richtung verzichtet. Sie können also keine normalen Op¬ 
codes durch Überschreiben in »illegale« ändern, wohl aber 
umgekehrt. Es bleibt lediglich die Eingabe als Einzelbyte, was 
aber hoffentlich zu umständlich ist. 

Komfortabler Disketten-Monitor 
für SMON 


Jetzt folgt unser zweiter Leckerbissen in Form eines kleinen 
aber ungemein wertvollen Zusatzprogrammes für den 
SMON. Es handelt sich dabei um eine Erweiterung des 
Disketten-Monitors, mit dem jeder auf einen Schlag die Arbeit 
von Stunden zunichte machen kann. Geben Sie das Pro¬ 
gramm wie beschrieben ein, starten Sie SMON wie gewohnt 
und springen mit »Z« in den Disketten-Monitor. Von hier aus 


erreichen Sie mit »F« (wie Floppy) die neuen Befehle. Wir 
haben absichtlich diesen umständlichen Weg gewählt, denn 
Fehler in diesem Modus wirken noch dramatischer als sonst. 
Mit diesem Werkzeug haben Sie unmittelbaren Zugriff auf die 
Eingeweide der Floppy. Jetzt können Sie die folgenden 
Befehle mit einer Übungsdiskette (!!!) in aller Ruhe durch¬ 
arbeiten. 

M Memory-Dump des Disketten-Monitors 
Beispiel: M (ohne weitere Eingabe) listet den Bereich des 
Floppy-RAM von $0000-$00FF. (Es erscheint zunächst die 
erste Zeile, weitere Ausgabe mit der SPACE-Taste.) 

In diesem Bereich befinden sich unter anderem die 
Jobspeicher ($00-$04) für die fünf Puffer 0 bis 4 sowie die 
wichtigsten Variablen des DOS. 

M 07 Memory-Dump ab $0700 
Die BAM der Diskette wird nach dem Initialisieren in Puffer 4 
($0700 im Floppy-RAM) eingelesen. Schauen Sie sich also 
mit »M 07« die aktuelle BAM an. Sie könnten jetzt durch ein¬ 
faches Überschreiben den Inhalt der BAM ändern. (Der 
Doppelpunkt vor der Zeile wirkt als »hidden command«). 
Dann schauen Sie sich Ihre Änderung mit »M 07« wieder an. 
Sie sehen, daß inzwischen der Inhalt des Floppy-RAM 
geändert wurde. Wenn Sie nun den Jobcode »90« ( = 
Schreibbefehl an den Floppy-Controller) in Speicherstelle 
$04 bringen, würde die geänderte (falsche!) BAM auf 
Diskette zurückgeschrieben werden!! Es gibt also genug 
Möglichkeiten, wie oben angedeutet, die Disketten zu 
»versauen«. 

Für das Ausprobieren noch einige wichtige Speicherstel¬ 
len und Jobcodes: 

$80 Lesen 
$90 Schreiben 
$no »Anschlägen« des Kopfes 
$Dj Maschinenprogramme im Puffer 
ausführen 

$E0 Programm im Puffer ausführen mit Hoch¬ 
fahren des Laufwerks 
Speicherstellen im Floppy-RAM: 

$06/$07 ist Spur- und Sektornummer für den 
Befehl in Puffer 0 
$08/$09 für Puffer 1 
$0A/$0B für Puffer 2 
$0C/$0D für Puffer 3 
$0E/$0F für Puffer 4 

Jedem Puffer sind zwei Speicherstellen zugeordnet, eine 
für den Jobcode ($0000 bis $0004) und eine für Spur und 
Sektor. Wenn Sie also in Puffer 0 (in $0300 gelegen) einen 
bestimmten Block einiesen wollen, geben Sie folgende 
Befehle ein: 

»M« liest die Zeropage der Floppy ein — so sehen dann zum 
Beispiel die ersten Zeilen aus: 

:0000 01 01 01 FF 03 04 01 34 
:0008 23 02 04 50 01 03 OA 11 

Gehen Sie mit dem Cursor in die erste Zeile und schreiben 
Sie »80« in die erste Speicherstelle (anstelle der ersten 01). 
In Speicherstelle $06/$07 (die letzten beiden in der ersten 
Reihe) die Spur- und die Sektornummer, die gelesen werden 
soll, zum Beispiel 12 01. Sie sehen dann 
.0000 80 01 01 FF 03 04 12 01 
:0008 unverändert 

Drücken Sie die RETURN-Taste, Mit »M 03« kann jetzt der 
eingelesene Block (hier der erste Directory-Block) ange¬ 
sehen werden. Änderungen können durch einfaches Über¬ 
schreiben vorgenommen werden. Dauerhaft wird Ihre Ände¬ 
rung erst durch Zurückschreiben (nach Spur $12 und Sektor 
$01) mit dem Jobcode »90« in der ersten Speicherstelle. 
Nach Änderung der beiden für Puffer 0 zuständigen Adres¬ 
sen ($06/$07) auch an jede beliebige andere Stelle. Das ist 
wörtlich zu nehmen, denn wir befinden uns hier »unterhalb« 
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Befehlsübersicht zum SMON 


dus bei $4010. Der Schnellschrittmodus wird 

Alle 

Eingaben erfolgen in der hexadezimalen Schreib¬ 


unterbrochen, nachdem $4010 zum fünften Mal 

weise. 

in Klammern angegebene Adreßeingaben können 


erreicht worden ist. 

entfallen. SMON benutzt dann sinnvolle, vorgegebene Werte. 

TQ 

4000 (Trace quick) 

Bei allen Ausgabe-Befehlen ist gleichzeitig die Ausgabe 


Schnellschrittmodus, springt beim Erreichen 

auf einem Drucker möglich. Dazu werden die Befehle 


eines Haltepunktes in den Einzelschrittmodus 

geSHIFTet eingegeben. 

TS 

4000 4020 (Trace stop) 

A 

4000 (Assembler) 


arbeitet ein Programm ab $4000 in Echtzeit ab 


symbolischer Assembler (Verarbeitung von Label 


und springt beim Erreichen von $4020 in die 


möglich) Startadresse $4000 


Registeranzeige. Von dort aus kann (nach even¬ 

B 

4000 4200 (Basic-Data) 


tueller Änderung der Register) mit »G« oder »TW« 


erzeugt Basic-DATA-Zeilen aus Maschinen¬ 


fortgefahren werden. »TS« arbeitet nur im RAM- 


programm im Bereich von $4000 bis $41FF 


Speicher. 

C 

4010 4200 4013 4000 4200 (Convert) 

V 

6000 6200 4000 4100 4200 (Verschieben) 


in ein Programm, das von $4000 bis $4200 im 


ändert in einem Programm von $4100 bis $41 FF 


Speicher steht, soll bei 4010 ein 3-Byte-Befehl 


alle absoluten Adressen, die sich auf den Bereich 


eingefügt werden. Dazu wird das Programm ab 


von $6000 bis $6200 beziehen, auf einen 


$4010 bis 4200 auf die neue Adresse $4013 


neuen Bereich, der bei $4000 beginnt. 


verschoben. Alle absoluten Adressen, die inner¬ 

W 

4000 4300 5000 (Write) 


halb des Programmbereichs ($4000 bis $4200) 


verschiebt den Speicherinhalt von $4000 bis 


stehen, werden umgerechnet, so daß die Sprung¬ 


$42FF nach $5000 ohne Umrechnung der 


ziele stimmen. 


Adressen (zum Beispiel Tabellen) 

D 

4000 (4100) (Disassembler) 

X 

(Exil) 


disassembliert den Bereich von $4000 (bis 


springt aus dem Monitor-Programm ins Basic 


$4100) mit Ausgabe der Hex-Werte. Änderungen 


zurück 


sind durch Überschreiben der Befehle möglich. 

# 

49152 

F 

(Find) 


Dezimalzahl umrechnen 


findet Zeichenketten (F), absolute Adressen (FA), 

$ 

002B 


relative Sprünge (FR), Tabellen (FT), Zeropage¬ 


4steliige Hex-Zahl umrechnen 


adressen (FZ) und Immediate-Befehle (Fl) 

% 

01101010 

G 

(4000) (Go) 


8stellige Binärzahl umrechnen 


startet ein Maschinenprogramm, das bei $4000 

7 

0344 + 5234 


im Speicher beginnt 

k. int 

Addition oder Subtraktion zweier 4stelliger 

1 

01 (I/O-Gerät) 


nex-Zahlen 


stellt die Gerätenummer für Floppy (08 oder 09) 

= 

4000 5000 (Vergleich) 


oder Datasette (Ol) ein 


vergleicht den Speicherinhalt ab $4000 mit dem 

K 

A000 (A500) (Kontrolle) 


ab $5000 


zum schnellen Durchsuchen des Bereichs von 

Z 

(Diskmonitor) 


$A000 (bis $A500) nach ASCII-Zeichen (32 


ruft den Diskmonitor auf. Dieser verfügt über 


Byte pro Zeile). Änderungen sind durch Über¬ 


folgende Befehle: 


schreiben der ASCII-Zeichen möglich. 

R 

(12 01) (Read) 

L 

(4000)(Load) 


liest Track $12, Sektor $01 von der Diskette in 


lädt ein Maschinenprogramm an die richtige oder 


einen Puffer im Speicher. Fehlt die Angabe von 


eine angegebene Adresse ($4000) 


Track und Sektor, wird der logisch (!) nächste 

M 

4000 (4400) (Memory-Dump) 


Sektor gelesen. 


gibt den Inhalt des Speichers von $4000 (bis 

W 

(12 01) (Write) 


$43FF) in Hex-Byte und ASCII-Code aus. 


schreibt den Puffer im Speicher nach Track $12, 


Änderungen sind durch Überschreiben der 


Sektor $01 auf die Diskette. Ohne Angabe von 


Hex-Zahlen möglich. 


Track und Sektor werden die letzten Eingaben 

0 

4000 4500 AA (Occupy) 


von »R« benutzt. 


füllt den Speicherbereich von $4000 bis $4500 

M 

(Memory-Dump) 


mit vorgegebenem Byte ($AA) aus 


zeigt den Pufferinhalt als Hexdump (wie normales 

P 

05 (Printer) 


»M«), Weitere Ausgabe mit CBM-Taste, Abbruch 


setzt Geräteadresse 5 für Drucker 


mit STOP. Werte können durch Überschreiben 

R 

(Register) 


geändert werden. 


zeigt die Registerinhalte und Flags an. 

X 

(Exit) 


Änderungen sind durch Überschreiben möglich. 


springt in SMON zurück 

S 

"Test" 4000 5000 (Save) 

F 

(weitere Disketten-Befehle initialisieren) 


speichert ein Programm von $4000 bis $4FFF 


sind die Befehle initialisiert, gilt: 


unter dem Namen »Test« ab 


M (07) 

TW 

(4000) (Trace Walk) 


Memory-Dump (Floppy-RAM/ROM) 


führt auf Tastendruck den jeweils nächsten 


V 6000 0400 


Maschinenbefehl aus und zeigt die Registerin¬ 


Verschieben eines 256-Byte-Blocks von 


halte an. Subroutinen können in Echtzeit durch¬ 


$6000 in den Laufwerkspuffer 1 beziehungs¬ 


laufen werden (»J«), Wird keine Startadresse ein¬ 


weise in das Floppy-RAM 


gegeben, beginnt »TW« bei der letzten mit »R« 


@ 


angezeigten Adresse. 


normale Disketten-Befehle senden 

TB 

4010 05 (Trace Break) 


X 


setzt einen Haltepunkt für den Schnellschrittmo- 


zurück zum normalen Disketten-Monitor 
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der Controllerebene, die unter anderem für die Prüfung auf 
Einhaltung der zulässigen Spur und Sektorgrenzen ver¬ 
antwortlich ist. Es erfolgt also keine Fehlermeldung, wenn Sie 
versuchen sollten, mit Ihrer Floppy bis in die des Nachbarn zu 
schreiben (zum Beispiel mit der Spur 152). 

Entsprechende Lese- und Schreibübungen können mit 
den anderen Puffern durchgeführt werden. Denken Sie 
daran, erst ist die Spur- beziehungsweise Sektornummer für 
den entsprechenden Puffer (in der zweiten Zeile!) einzuge¬ 
ben, bevor Sie in Zeile 1 den Jobcode mit einem »RETURN« 
übergeben, denn mit Druck auf die RETURN-Taste wird Ihr 
Befehl ausgeführt. Und noch eins: Quälen Sie bitte dabei 
Ihren Schreibkopf nicht mehr als unbedingt erforderlich, 
sonst könnte er sich mechanisch verklemmen und nur noch 
mit einem Eingriff in die Floppymechanik wieder »befreit« 
werden. 

Falls Sie die Ausgaben 1/85 (Seite 151) und 3/85 (Seite 
103 bis 135) der 64’er besitzen, können Sie sich dort über 
andere Speicherstellen der Floppy und die weitere Anwen¬ 
dung der Jobcodes informieren. 

Der Befehl @ ohne weitere Angaben fragt den Fehlerkanal 
ab, ansonsten dient er zur Befehlsübermittlung an die Floppy. 
Beispiel: @ Fehlerkanal 

@1 Initialisierungsbefehl oder 

@S:name Befehl zum Scratchen 

und so weiter. 

Bedingt durch die verschiedenen Versionen, springt dieser 
Befehl manchmal in den »normalen« Disketten-Monitor 
zurück, erkennbar an dem »*« am Zeilenanfang. Sie müssen 
dann wieder ein »F« eingeben. 

Mit X gelangt man wieder in den Disketten-Monitor. 

Zum Abschluß ein sehr hilfreicher Befehl namens »V«, der 
es erlaubt, Speicherbereiche aus dem Computer in den Lauf¬ 
werkspuffer zu verschieben. Folgende einfache Syntax gilt 
dabei: V von nach 

Um zum Beispiel ein Maschinenprogramm von $6000 in 
den Puffer 1 zu bekommen, geben Sie folgendes ein: 

V 6000 0400 

Dabei wird immer eine ganze Seite, also 256 Byte, über¬ 
tragen. Was das Programm dort soll, fragen Sie? Führen Sie 
es doch einfach aus (Jobcode $D0 in Speicherstelle $01 
schreiben); oder schreiben Sie es mit dem Jobcode »90« in 
einen beliebigen Sektor der Diskette. 

Wenn Sie dann Ihre Floppy so richtig durcheinander 
gebracht haben und nichts läuft mehr, brauchen Sie nicht zu 
verzweifeln. Außer einem eventuell festhängenden Lesekopf 
passiert der Floppy nichts, nur Ihren Disketten. 

Hinweise zum Abtippen 


Tippen Sie die beiden Erweiterungsprogramme (Listing 2 
und 3 beziehungsweise bei der M&T-Version Listing 4 und 5) 
mit dem MSE-Programm ab und speichern Sie die fertigen 
Programme. Die Programme für die M&T-Version haben sinni¬ 
gerweise ein M&T im Namen. 

Laden und starten Sie dann Ihren SMON $C000. Geben 
Sie ein: L"NDISASS" 

Damit werden die neuen Befehle automatisch über den bis¬ 
herigen Disketten-Monitor geladen. Sie müssen nun aber 
noch aktiviert werden. Geben Sie dazu G CF0D ein, 

SMON meldet sich sofort mit seiner Registeranzeige 
wieder. Sie sollten nun diese Version unbedingt abspeichern, 
zum Beispiel mit S"SMON NDISASS" C000 CF3D 
Wenn Sie nun das Programm »ILLEGAL-CODE« (Listing 6) 
laden und mit D 4000 disassemblieren, sehen Sie die 
»illegalen« Opcodes schön geordnet nacheinander. 

Um die neuen Befehle des Disketten-Monitors in SMON 
einzubinden, gehen Sie ganz ähnlich vor. Nach dem Abtippen 


und Speichern des Programms »FLOPPYMON« muß natür¬ 
lich SMON C000 geladen und gestartet werden. Anschlie¬ 
ßend geben Sie ein: L " FLOPPYMON" und aktivieren es mit 
G CDD8 (64'er-Version) beziehungsweise G CDB6 (M&T- 
Version). 

Zum Speichern geben Sie S"SMON-FLOPPY"COOO 
CFFF ein. Das gilt für beide Versionen. 

(Dietrich Weineck/ah) 

SMON-Speicherstellen 

Folgende Zeropage-Adressen werden benutzt: 


FLAG 

$AA 

Universalflag 

ADRCODE 

SAB 

Adressierungscode für 
Assembler/Disassembler 

COMMAND 

$AC 

SMON-Befehlscode 

BEFCODE 

$AD 

Befehlscode Ass./Disass. 

LOPER 

$AE 

Low-Operand für Ass./Disass. 

HOPER 

$AF 

High-Operand für Ass./Disass. 

BEFLEN 

$B6 

Befehlslänge Ass./Disass. 

PCL 

SFB 

SMON-Programmcounter 

Low-Byte 

PCH 

$FC 

SMON-Programmcounter 

High-Byte 

Außerhalb der Zeropage benutzt SMON die Bereiche: 
PCHSAVE $02A8 

PCLSAVE $02A9 

SRSAVE $02AA 

AKSAVE 

$02AB 

dienen der Zwischen¬ 
speicherung 

XRSAVE 

YRSAVE 

SPSAVE 

$02AC 

$02AD 

$02AE 

der angegebenen Register 

PRINTER 

$02AF 

Printernummer 

IO.NR 

$02B0 

Devicenummer 

MEM 

$02B1 

Buffer bis $02B8 

TRACEBUF 

$02B8 

bis 

$02BF 

Buffer für Trace-Modus 


Dann folgen die von Diskmonitor benötigten Adressen: 


SAVEX 

$02C1 

Zwischenspeicherung der 

X- und Y-Register 

TMPTRCK 

$02C2 


TMPSECTO 

$02C3 

Zwischenspeicher für Track 
und Sektor 

DCMDST 

$02D0 

Diskkommandostring 

TRACK 

$02D8 


SECTO 

$02DB 

Track und Sektornummer 

BUFFER 

$033C 

Buffer für Label, nur für 


bis 

$03FC 

Assembler 


Einsprungadressen von SMON-Routinen 

Die Angaben in Klammern beziehen sich auf die 
M &T-Version 


I 

(TICK) 

$CADB 

($CACF) 

# 

(BEFDEC) 

$C92E 

($C92F) 

$ 

(BEFHEX) 

$C908 

($C909) 

% 

(BEFBIN) 

$C91C 

($C910) 


(KOMMA) 

$C6FC 

($C6B1) 


(COLON) 

$C41D 

($C40B) 


(SEMIS) 

$C3B6 

($C3A0) 

= 

(COMP) 

$CAF5 

($CAE9) - V Kommando 

? 

(ADDSUB) 

$C89A 

($C89B) 

A 

(ASSEMBLER) 

$C6D1 

($C6BC) 

B 

(BASICDATA) 

$C96C 

($C96D) 

C 

(CONVERT) 

$CA3D 

($CA32) 
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D 

(DISASS.) 

SC55D 

($0542) 

P (SETPRINTER) 

$C83D 

($0829) 


(FIND) 

SCB11 

($CB0C) 

R (REGISTER) 

$0386 

($0370) 

G 

(GO) 

$C3E3 

($C3CD) 

S (LOADSAVE) 

$C84E 

($C83A) 

1 

(IO.SET) 

$0844 

($0830) 

T (TRACE) 

$CBF1 

($CBEC) 

K 

(KONTROLLE) 

$CAB7 

($CAAC) 

V (VERSCHIEB) 

$CA43 

($CA38) - U Kommando 

■ L 

(LOADSAVE) 

$C84E 

($C83A) 

W (WRITE) 

$C9D3 

($C9D4) 

M 

(MEMDUMP) 

$C3F9 

($C3E3) 

X (EXIT) 

$C36E 

($0369) 

o 

(OCUPPY) 

$C9C1 

($0902) 

Z (DMON) 

$CE09 

($CDFE) 

















pragramm 

: araon *c000 


C000 cffa 

c270 

x 

c2 

c2 

d0 

0c 

Bd 

77 

02 

e6 

b3 

c4f 8 

x 

B0 

16 

d0 

f 6 

bl 

fb 

3d 

fb 

de 












C270 

x 

c6 

60 

20 

7b 

c2 

2c 

a2 

fb 

56 

c500 

s 

C0 

5d 

1 1 

Cl 

f0 

05 

ca 

dB 

ef 












C2B0 

X 

20 

Bd 

C2 

98 

01 

20 

9a 

c2 

cb 

c508 

a 

f 3 

a2 

00 

86 

ad 

B.i 

* b 

0f 

2e 

C000 

3 

a9 

14 

Bd 

16 

03 

a9 

c2 

Bd 

7d 

c288 

1 

95 

00 

eB 

B8 

60 

20 

ca 

c2 

2c 

c510 

: 

a2 

11 

bl 

fb 

3d 

b5 

C0 

5d 

66 

C00B 

X 

17 

03 

00 

27 

23 

24 

25 

2c 

c6 

c290 

s 

C9 

20 

fo 

f 9 

c9 

2c 

f0 

f 5 

92 

C518 

i 

c6 

C0 

f0 

03 

ca 

d0 

f 3 

bd 
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29 

OB 

09 

11 

Bd 

0e 

de 

a9 

76 

cda0 


95 

a2 

CC 

Bd 

bb 

02 

Be 

ba 

e 7 

cdaB 


02 

ae 

ae 

02 

9a 

78 

ad 

bb 

B9 

cdbB 


02 

ae 

b.i 

02 

Bd 

14 

03 

Be 

9b 

cdbO 


15 

03 

ad 

aB 

02 

48 

ad 

a9 

3c 

cdc0 


02 

48 

ad 

aa 

02 

48 

ad 

ab 

17 

cdc8 


02 

ae 

ac 

02 

ac 

ad 

02 

4B 

4d 

cdd0 


20 

Bd 

c2 

8d 

be 

02 

20 

Bd 

bl 

cddB 


c2 

Bd 

bd 

02 

20 

8d 

c2 

8d 

aS 

cde0 


bf 

02 

4c 

d6 

c2 

ad 

bB 

B2 

0f 

cdeB 


ae 

b9 

02 

Bd 

14 

03 

8e 

15 

63 

cdf 0 


03 

M 

ad 

14 

03 

ae 

15 

03 

11 

cdf 8 


Bd 

bB 

02 

8e 

b9 

02 

a9 

95 

bl 

ce00 


Bd 

16 

03 

a9 

cc 

Bd 

17 

03 

2a 

ce0B 


60 

a9 

07 

Bd 

20 

Ü0 

a9 

36 

4c 

cel0 


B5 

01 

a2 

00 

bd 

e4 

cf 

9d 

3c 

cel8 


d0 

02 

eB 

e0 

Mil 

90 

f 5 

a2 

b2 

ce20 


2a 

20 

40 

c3 

20 

cf 

ff 

C9 

f 7 

ce28 


2a 

f0 

f 9 

a2 

06 

dd 

d2 

cf 

d7 

ce30 


d0 

11 

Be 

cl 

02 

Ba 

0a 

aa 

57 

ce38 


eB 

bd 

dB 

cf 

48 

ca 

bd 

dB 

b2 

ce40 


cf 

4B 

60 

ca 

10 

e7 

4c 

lf 

54 

ce48 


ce 

a9 

00 

85 

fb 

a9 

bf 

B5 

b3 

ce50 


fc 

B5 

fe 

a5 

fb 

69 

04 

BS 

a9 

ce58 


fd 

20 

fc 

c3 

20 

el 

ff 

f0 

10 

ce60 


0f 

ad 

Bd 

02 

f0 

f 6 

a9 

00 

57 

ce60 


85 

c6 

a5 

fc 

c9 

C0 

90 

e3 

06 

ce70 


4c 

lf 

ce 

20 

7e 

c2 

a0 

20 

c4 

ce70 


a2 

00 

20 

ca 

c2 

20 

9 a 

c2 

99 

ce80 


Bl 

fb 

20 

39 

c4 

d0 

f 3 

20 

11 

ce88 


51 

c3 

4c 

24 

ce 

20 

55 

cf 

35 

ce90 


ad 

cl 

02 

c9 

02 

d0 

03 

4c 

23 

ce98 


eb 

ce 

a2 

00 

bd 

00 

bf 

Bd 

B9 

cea0 


c3 

02 

eB 

bd 

00 

bf 

8d 

c4 

14 

cea8 


02 

Ba 

4c 

cb 

ce 

20 

c2 

c2 

fa 

cebB 


d0 

03 

4c 

Bd 

ce 

20 

8d 

c2 

70 

cebG 


Bd 

c3 

02 

20 

8d 

c2 

8d 

c4 

5a 

cec0 


02 

20 

55 

cf 

ad 

cl 

02 

c9 

a6 

cecB 

: 

02 

f0 

20 

20 

0d 

cf 

a2 

Bd 

42 

cedB 


20 

c6 

ff 

a0 

00 

20 

cf 

ff 

a7 

ced8 

2 

ea 

ea 

ea 

ea 

99 

00 

bf 

c8 

79 

ceeO 


da 

f 3 

20 

cc 

ff 

20 

bc 

cf 

df 

cee8 


4c 

49 

ce 

20 

40 

cf 

a2 

Bd 

bB 

cef 0 


20 

c9 

ff 

a0 

00 

b9 

00 

bf 

56 

cef 8 

2 

20 

d2 

ff 

a6 

90 

d0 

03 

cB 

83 

cf 00 


d0 

f 3 

20 

cc 

ff 

a9 

32 

2B 

c2 

cf 08 


0d 

cf 

4c 

b6 

cf 

Bd 

dl 

B2 

9b 

cf 10 


ad 

c3 

02 

20 

79 

cf 

8e 

dB 

25 

cf 18 


02 

Bd 

d9 

02 

ad 

c4 

02 

20 

el 

cf 20 


79 

cf 

Be 

db 

02 

Bd 

de 

02 

a4 

cf 28 


a2 

0f 

20 

c9 

ff 

a2 

00 

bd 

24 

cf 30 


d0 

02 

20 

d2 

ff 

eB 

e0 

Bd 

49 

cf 38 

: 

90 

f 5 

20 

cc 

ff 

4c 

8c 

Cf 

99 

cf 40 


a2 

Bf 

20 

c9 

ff 

a2 

00 

bd 

3c 

cf 48 


f 2 

cf 

20 

d2 

ff 

eB 

e0 

08 

5f 

cf 50 


90 

f 5 

4c 

cc 

ff 

a9 

0f 

aB 

62 

cf 58 


a2 

BO 

20 

ba 

ff 

a9 

00 

20 

eb 

cf 60 

: 

bd 

ff 

20 

C0 

ff 

a9 

0d 

aB 

10 

cf 68 


a2 

06 

20 

ba 

ff 

a9 

01 

a2 

04 

cf 70 


fl 

aB 

cf 

20 

bd 

ff 

4c 

C0 

3B 

Cf 78 


ff 

a2 

30 

38 

e9 

04 

90 

03 

13 

cf B0 


eB 

b0 

f 9 

69 

3a 

60 

20 

Bc 

ac 

cf 88 


cf 

4c 

b6 

cf 

.«<? 

00 

05 

90 

f 7 

cf 90 


20 

51 

c3 

a9 

08 

20 

b4 

ff 

d3 

cf 98 


a9 

6f 

20 

96 

ff 

20 

a5 

ff 

6b 

cfaB 


c9 

30 

d0 

06 

4c 

ab 

ff 

20 

d9 

cf a8 


a5 

ff 

20 

d2 

ff 

c9 

0d 

dB 

d3 

cf b0 


f 6 

20 

ab 

ff 

68 

68 

20 

bc 

65 

cfbB 


cf 

4c 

lf 

ce 

a9 

0d 

20 

c3 

5a 

cfcB 


ff 

a9 

0f 

4c 

c3 

ff 

a9 

06 

dB 

cf cB 


Bd 

20 

dB 

a9 

37 

85 

01 

4c 

0b 

cf dB 


d6 

c2 

3a 

52 

57 

4d 

58 

40 

a2 

cf dB 


72 

ce 

ac 

ce 

ac 

ce 

48 

ce 

b6 

Cf S0 


c5 

cf 

85 

cf 

55 

31 

3a 

31 

12 

cfe8 


33 

20 

30 

20 

31 

38 

20 

30 

fl 

Cff0 


30 

23 

42 

2d 

50 

20 

31 

33 

19 

cf f 8 


20 

30 

b7 

00 

ff 

00 

ff 

00 

le 


Listing 1. 
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C 64 


Programm 

: ndi 

»as« 



CB09 cf 3d 

ce09 


2b 

4b 

6b 

8b 

9b 

ab 

bb 

cb 

c4 

cell 

X 

eb 

B9 

93 

9f 

0b 

9c 

9e 

4e 

46 

cel9 

: 

53 

52 

53 

52 

53 

4c 

44 

49 

f0 

ce21 

i 

43 

4f 

4c 

4c 

52 

52 

41 

41 

eB 

ce29 


43 

53 

52 

50 

4f 

41 

45 

41 

4b 

ce31 

■ 

58 

58 

50 

43 

41 

25 

26 

20 

48 

ce39 

i 

21 

82 

80 

81 

22 

21 

B2 

81 

24 

ce4 1 

s 

03 

13 

07 

17 

lb 

0f 

lf 

97 

48 

ce49 

: 

d7 

bf 

df 

02 

02 

02 

02 

03 

76 

ce51 

s 

03 

03 

02 

02 

03 

03 

a2 

02 

6b 

c«59 

X 

dIA 

28 

a6 

ad 

d0 

2b 

a2 

01 

90 

ce61 

1 

bl 

f b 

c9 

9c 

f0 

38 

c9 

80 

0f 

ce69 

X 

f0 

■c 

c9 

89 

f 0 

eB 

29 

0f 

Bc 

ce71 

s 

c9 

02 

f0 

16 

c9 

0a 

f0 

0a 

ff 

ce79 

X 

eS 

C9 

04 

f0 

05 

eB 

c9 

0c 

3c 

ce81 

: 

d0 

lc 

86 

b6 

a2 

01 

Be 

c5 

dB 

ceB9 

: 

02 

60 

bl 

fb 

29 

90 

49 

B0 

e4 

ce91 

X 

d0 

04 

a2 

02 

d0 

ac 

B6 

b6 

48 

ce99 

X 

a2 

0a 

Be 

c5 

02 

60 

*0 

02 

46 

ceal 

X 

84 

b6 

a0 

00 

Bc 

cS 

02 

bl 

0b 

cea9 

: 

fb 

a2 

0f 

dd 

0B 

ce 

f0 

d9 

83 

cebl 

x 

ca 

d0 

f 8 

29 

01 

f0 

d2 

bl 

Bd 

ceb9 

x 

fb 

4a 

4a 

4a 

4a 

4a 

1B 

69 

df 

cecl 

e 

02 

8d 

c5 

02 

a2 

0b 

bl 

fb 

7d 

cec9 

: 

3d 

40 

CS 

dd 

40 

CB 

f0 

03 

da 

cedl 

■ 

ca 

d0 

f 3 

bd 

35 

CO 

B5 

ab 

Bi 

ced9 

x 

bd 

4b 

ce 

B5 

b6 

60 

a0 

00 

91 

CBBl 

x 

a6 

ad 

f0 

06 

20 

4c 

c3 

4c 

67 

cee9 

X 

da 

c5 

ae 

cS 

02 

d0 

06 

20 

09 

cef 1 

x 

4c 

c3 

4c 

c9 

c5 

a9 

2a 

20 

fe 

c«f 9 

X 

d2 

ff 

bd 

17 

CB 

20 

d2 

ff 

56 

Cf01 

X 

bd 

21 

ca 

20 

d2 

ff 

bd 

2b 

81 

cf 09 

I 

CB 

4c 

16 

c6 

a9 

00 

Bd 

6b 

03 

cf 11 

X 

C0 

Bd 

6c 

C0 

a9 

4c 

Bd 

29 

50 

cf 19 

X 

c5 

0d 

be 

c5 

a9 

20 

Bd 

30 

3f 

cf 21 

: 

cd 

a9 

5b 

Bd 

2a 

c5 

a9 

CB 

60 

cf 29 

X 

Bd 

2b 

c5 

a9 

df 

Bd 

bf 

c5 

a7 

cf 31 

x 

8d 

31 

cd 

a9 

CB 

Bd 

C0 

c5 

b7 

cf 39 

■ 

8d 

32 

cd 

00 

4c 

Bc 

cf 

a2 

00 

Listing 2. 

Mit dieser Erweiterung 

lassen sich illegale Opcodes 
disassemblieren. 



cd21 

X 

a2 

00 

bd 

al 

cd 

20 

d2 

ff 

90 

cd29 

: 

eB 

e0 

06 

90 

f 5 

60 

20 

75 

e3 

cd31 

: 

c2 

a2 

fd 

20 

77 

c2 

a5 

fd 

eB 

cd39 

x 

8d 

a4 

cd 

a5 

fe 

8d 

a5 

cd 

cf 

cd41 

: 

a9 

20 

Bd 

a6 

cd 

20 

19 

cd 

10 

cd49 

X 

a0 

00 

bl 

fb 

20 

d2 

ff 

cB 

ff 

cd51 

: 

C0 

20 

90 

f 6 

18 

a9 

20 

6d 

4e 

cd59 

s 

a4 

cd 

b0 

0C 

8d 

a4 

cd 

a9 

la 

cd61 

x 

20 

65 

f b 

85 

fb 

4c 

46 

cd 

ba 

cd69 

x 

20 

cc 

ff 

20 

c4 

cf 

a9 

08 

75 

cd71 

X 

Bd 

a6 

cd 

4c 

02 

cc 

a9 

0f 

9a 

cd79 

x 

aB 

a2 

08 

20 

ba 

ff 

a9 

00 

cb 

cdBl 

x 

20 

bd 

ff 

4c 

C0 

ff 

20 

e4 

60 

cd89 

X 

ff 

f0 

fb 

60 

4c 

fa 

cd 

0d 

19 

Cd91 

1 

3e 

46 

4c 

4f 

50 

2d 

4d 

4f 

32 

cd99 

: 

4b 

00 

4d 

2d 

52 

00 

00 

ff 

05 

cdal 

i 

4d 

2d 

57 

00 

00 

0B 

3a 

4d 

lf 

cda9 

x 

56 

38 

40 

aa 

cc 

92 

cc 

2e 

8a 

cdbl 

x 

cd 

Bc 

cd 

76 

cf 

a9 

00 

Bd 

6c 

cdb9 

i 

22 

C0 

a9 

46 

Bd 

df 

cf 

a9 

d9 

edel 

X 

cb 

Bd 

eb 

cf 

a9 

fB 

8d 

aa 

76 

cdc9 

• 

cf 

00 

36 

40 

58 

aa 

CC 

92 

6b 

Listing 3. 

(Schluß) 







cc49 

X 

c2 

c2 

d0 

07 

a9 

00 

Bd 

C0 

d4 

cc51 

: 

cd 

f0 

0B 

20 

Qd 

c2 

29 

fB 

22 

cc59 

x 

Bd 

C0 

cd 

20 

77 

cd 

a2 

0f 

4c 

cc61 

: 

20 

c9 

ff 

a2 

00 

bd 

bd 

cd 

3a 

cc69 

X 

20 

d2 

ff 

eB 

e0 

06 

90 

f 5 

7c 

cc71 

x 

20 

cc 

ff 

a2 

Bf 

20 

c6 

ff 

59 

cc79 

x 

a0 

00 

20 

cf 

ff 

99 

00 

bf 

6B 

cc81 

3 

c8 

d0 

f 7 

20 

cc 

ff 

4c 

bc 

2b 

ccS9 

X 

cf 

a9 

bf 

B5 

fc 

a9 

00 

B5 

f 5 

CC91 

X 

fb 

60 

20 

33 

cc 

20 

Ba 

CC 

bc 

cc99 

X 

a2 

3a 

20 

40 

c3 

ad 

cl 

cd 

b5 

ccal 

1 

20 

2a 

c3 

ad 

C.0 

cd 

20 

2a 

cc 

cca9 

1 

c3 

a0 

20 

a2 

00 

20 

4c 

c3 

d2 

ccbl 

I 

20 

4c 

c3 

al 

fb 

20 

2a 

c3 

od 

ccb9 

3 

al 

fb 

20 

39 

c4 

d0 

f 1 

a9 

75 

cccl 

1 

BB 

1B 

6d 

C0 

cd 

Bd 

C0 

cd 

31 

ccc9 

I 

08 

c9 

fB 

d0 

06 

20 

5c 

cc 

7a 

ccdl 

3 

20 

Ba 

CC 

28 

90 

09 

BB 

cl 

ff 

ccd9 

X 

cd 

20 

5c 

cc 

20 

Ba 

CC 

20 

31 

ccel 

t 

87 

cd 

20 

el 

ff 

d0 

bl 

4c 

79 

cce9 

X 

02 

cc 

20 

7a 

c2 

a5 

fb 

Bd 

Be 

ccf 1 

3 

c6 

cd 

aS 

fe 

Bd 

c7 

cd 

20 

35 

ccf 9 

X 

19 

cd 

a0 

20 

a2 

00 

20 

ca 

65 

cd01 

3 

C2 

20 

ca 

c2 

20 

9a 

c2 

20 

00 

cd09 

3 

d2 

ff 

20 

39 

c4 

d0 

f 2 

20 

c9 

cdll 

3 

cc 

ft 

20 

bc 

cf 

4c 

07 

cc 

92 

cd 19 

I 

20 

77 

cd 

a2 

0f 

20 

c9 

ff 

d6 

cd21 

3 

a2 

00 

bd 

c3 

cd 

20 

d2 

ff 

d4 

cd29 

3 

e8 

e0 

06 

90 

f 5 

60 

20 

7e 

f 5 

cd31 

X 

c2 

a2 

fd 

20 

80 

c2 

aS 

fd 

7B 

cd39 

3 

Bd 

c6 

cd 

a5 

f e 

Bd 

c7 

cd 

68 

cd41 

3 

a9 

20 

Bd 

c8 

cd 

20 

19 

cd 

55 

cd49 

X 

30 

00 

bl 

fb 

20 

d2 

ff 

CB 

ff 

cd51 

X 

C 0 

20 

90 

f 6 

18 

a9 

20 

6d 

4e 

cd59 


c6 

cd 

b0 

0C 

Bd 

c6 

cd 

a9 

4d 

cd61 

X 

20 

65 

fb 

85 

fb 

4c 

46 

cd 

ba 

cd69 


20 

CC 

ff 

20 

bc 

cf 

a9 

08 

f 4 

cd71 

3 

8d 

cB 

cd 

4c 

02 

cc 

a9 

0f 

ab 

cd79 

X 

a8 

ü2 

08 

20 

ba 

ff 

a9 

00 

cb 

cd81 

X 

20 

bd 

ff 

4c 

C0 

ff 

20 

«4 

60 

cdB9 

: 

ff 

f0 

fb 

60 

20 

c2 

c2 

dB 

d0 

cd91 

3 

03 

4c 

86 

cf 

a9 

08 

20 

bl 

15 

cd99 

X 

ff 

a9 

6f 

20 

93 

ff 

20 

Cf 

a6 

cdal 


ff 

20 

aB 

ff 

c9 

0d 

d0 

f 6 

11 

cda9 

3 

20 

ae 

ff 

4c 

02 

cc 

4c 

09 

74 

cdbl 

3 

ce 

0d 

3e 

46 

4c 

4f 

50 

2d 

39 

cdb9 

3 

4d 

4f 

4e 

00 

4d 

2d 

52 

00 

c9 

edel 

: 

00 

ff 

4d 

2d 

57 

00 

00 

08 

3f 

cdc9 


3a 

4d 

56 

40 

5B 

ea 

CC 

92 

7d 

edd 1 

: 

cc 

2e 

cd 

Bc 

cd 

ae 

cd 

a9 

96 

cdd9 


00 

Bd 

22 

C0 

a9 

46 

Bd 

d7 

f 3 

edel 

x 

cf 

a9 

cb 

8d 

e3 

cf 

a9 

f0 

6f 

cde9 

X 

Bd 

e2 

cf 

00 

03 

Be 

15 

03 

da 

Listing 5. 

(Schluß) 






Programm 

: ndisass mfct 

ce09 cf3d 

CB09 

X 

2b 

4b 

6b 

Bb 

9b 

ab 

bb 

cb 

c4 

cell 

: 

eb 

89 

93 

9f 

0b 

9c 

9e 

4e 

46 

cel9 

: 

53 

52 

53 

52 

53 

4c 

44 

49 

f0 

ce21 

! 

43 

4f 

4c 

4c 

52 

52 

41 

41 

eB 

ce29 

3 

43 

53 

52 

50 

4f 

41 

45 

41 

4b 

ce31 

3 

5B 

58 

50 

43 

41 

25 

26 

20 

48 

ce39 

3 

21 

82 

B0 

Bl 

22 

21 

82 

81 

24 

ce41 

8 

03 

13 

07 

17 

lb 

0f 

lf 

97 

4B 

ce49 

3 

d7 

bf 

df 

02 

02 

02 

02 

03 

76 

ce51 

3 

03 

03 

02 

02 

03 

03 

a2 

02 

6e 

ce59 

3 

dB 

28 

a6 

ad 

dB 

2b 

a2 

01 

90 

ce61 

: 

bl 

fb 

c9 

9c 

f0 

3B 

c9 

80 

0f 

ce69 

X 

f0 

ec 

c9 

89 

fB 

eB 

29 

0f 

Bc 

ce71 

: 

c9 

02 

f0 

16 

c9 

0a 

f0 

0a 

ff 

ce79 


eB 

c9 

04 

f0 

05 

eB 

c9 

0c 

3c 

ceBl 

: 

d0 

lc 

86 

b6 

a2 

01 

Be 

c5 

dB 

ce89 

X 

02 

60 

bl 

fb 29 

90 


80 

e4 

ce91 

: 

d0 

04 

a2 

02 

d0 

ec 

DO 

b6 

48 

ce99 

3 

a2 

0a 

8e 

c5 

02 

60 

a0 

02 

46 

ceal 

X 

84 

b6 

80 

00 

8c 

c5 

02 

bl 

0b 

cea9 

8 

fb 

a2 

0f 

dd 

08 

ce 

f0 

d9 

e3 

cebl 

: 

ca 

dB 

f 8 

29 

01 

f0 

d2 

bl 

8d 

ceb9 

3 

fb 

4a 

4a 

4a 

4a 

4a 

18 

69 

df 

cecl 

: 

02 

8d 

c5 

02 

a2 

0b 

bl 

fb 

7d 

cec9 

X 

3d 

40 

ce 

dd 

40 

ce 

f0 

03 

da 

cedl 

: 

ca 

d0 

f 3 

bd 

35 

ce 

85 

ab 

ef 

ced9 

3 

bd 

4b 

ce 

85 

b6 

60 

a0 

00 

91 

ceel 

3 

a6 

ad 

f 0 

06 

20 

43 

c3 

4c 

le 

cee9 

: 

be 

c5 

ae 

c5 

02 

d0 

06 

20 

ed 

cef 1 

3 

43 

c3 

4c 

ad 

c5 

a9 

2a 

20 

71 

cef 9 

: 

d2 

ff 

bd 

17 

ce 

20 

d2 

ft 

56 

Cf01 

X 

bd 

21 

ce 

20 

d2 

ff 

bd 

2b 

Bl 

cf 09 

X 

ce 

4c 

f 8 

c5 

a9 

00 

Bd 

60 

86 

cf 11 

X 

C0 

Bd 

61 

C0 

a9 

4c 

Bd 

10 

5c 

cf 19 

X 

c5 

Bd 

a2 

c5 

a9 

20 

8d 

28 

28 

cf 21 

1 

cd 

a9 

Sb 

Bd 

1 1 

c5 

*9 

cm 

cf 

cf 29 

1 

Bd 

12 

cS 

a9 

df 

Bd 

a3 

c5 

ea 

cf 31 

1 

8d 

29 

cd 

a9 

cm 

8d 

a4 

c5 

73 

cf 39 

X 

8d 

2a 

cd 

00 

4c 

Bc 

cf 

a 2 

fc 

Listing 4. 

Illegale Opcodes disas- 

semblieren mit der M&T-Version 
des SMON 


Programm 

x floppymon 

m&t cbf 1 edeb 

cbf 1 


a9 

36 

m 

Ul 

01 

a2 

00 

bd 

90 

79 

cbf 9 


cd 

f0 

06 

20 

d2 

ff 

eB 

d0 

36 

CC01 

X 

f5 

20 

48 

c3 

a2 

3e 

20 

37 

9c 

cc09 

8 

c3 

20 

cf 

ff 

c9 

3e 

f 0 

f 9 

16 

CC 1 1 

3 

c9 

20 

f0 

f 5 

a2 

05 

dd 

a6 

fc 

ccl9 

X 

cd 

f0 

09 

ca 

d0 

f 8 

20 

4B 

e0 

cc21 

X 

c3 

4c 

05 

cc 

Ba 

0a 

aa 

e8 

5b 

cc29 

8 

bd 

aa 

cd 

48 

ca 

bd 

aa 

cd 

99 

cc31 

X 

48 

60 

20 

b9 

c2 

d0 

0a 

a9 

17 

cc39 

8 

00 

Bd 

9e 

cd 

Bd 

9f 

cd 

f 0 

50 

cc41 

: 

la 

20 

84 

c2 

Bd 

9f 

cd 

20 

32 

cc49 

X 

b9 

c2 

d0 

07 

a9 

00 

8d 

9e 

86 

cc51 

■ 

cd 

f b 

0Q 

20 

04 

c2 

29 

f Q 

91 

cc59 

X 

Bd 

9 e 

cd 

20 

77 

cd 

a2 

0f 

3b 

cc61 

X 

20 

c9 

ff 

a2 

00 

bd 

9b 

cd 

b2 

cc69 

8 

20 

d2 

ff 

eB 

B0 

06 

90 

f 5 

7c 

cc71 

3 

20 

CC 

ft 

a2 

Of 

20 

c6 

ff 

59 

cc79 

X 

a0 

00 

20 

cf 

ff 

99 

00 

bf 

68 

cc81 

8 

c8 

dB 

f 7 

20 

CC 

ff 

4c 

c4 

3b 

cc89 

3 

cf 

a9 

bf 

B5 

fc 

a9 

00 

85 

f 5 

cc91 

1 

fb 

60 

20 

33 

CC 

20 

8a 

cc 

bc 

cc99 

8 

a2 

3a 

20 

37 

c3 

ad 

9f 

cd 

0b 

ccal 

8 

20 

21 

c3 

ad 

9e 

cd 

20 

21 

13 

cca9 

8 

c3 

a0 

20 

a2 

00 

20 

43 

c3 

ae 

ccbl 

I 

20 

43 

c3 

al 

fb 

20 

21 

c3 

65 

ccb9 

8 

al 

fb 

20 

20 

c4 

d0 

f 1 

a9 

52 

cccl 

8 

08 

18 

6d 

9e 

cd 

Bd 

9e 

cd 

64 

ccc9 

8 

0B 

c9 

fB 

d0 

06 

20 

5c 

cc 

7a 

ccdl 

X 

20 

Ba 

cc 

28 

90 

09 

ee 

9f 

bb 

ccd9 

X 

cd 

20 

5c 

CC 

20 

Ba 

cc 

20 

31 

CCBl 

1 

B7 

cd 

20 

el 

ff 

d0 

bl 

4c 

79 

CCB9 

X 

02 

CC 

20 

75 

c2 

a5 

fb 

Bd 

6c 

ccf 1 

8 

a4 

cd 

a5 

fc 

Bd 

a5 

cd 

20 

02 

Ccf 9 

8 

19 

cd 

a0 

20 

a2 

00 

20 

cl 

53 

cd01 

3 

c2 

20 

cl 

C2 

20 

91 

c2 

20 

76 

cd09 

8 

d2 

ff 

20 

20 

c4 

d0 

f 2 

20 

c6 

cdll 

3 

cc 

ff 

20 

c4 

cf 

4c 

07 

cc 

93 

cd19 x 20 

Listing 3. 

77 cd a2 0f 20 

Komfortabler 

c9 

ff 

d6 

Disketten-Monitor. 

Bitte 

beachten 

Sie die Eingabehinweise auf 
Seite 110. (Fortsetzung) 



pragramm 

x illegal-code 

4000 40f4 

4000 : 

87 

87 

c7 

c7 

#7 

b7 

a7 

a7 

el 

400B I 

27 

27 

67 

67 

07 

07 

47 

47 

de 

4010 x 

d7 

d7 

f 7 

ff 

37 

aa 

17 

60 

b6 

4018 : 

57 

20 

97 

13 

b7 

20 

Bf 

0f 

a0 

4020 i 

Cf 

Cf 

01 

Bf 

ef 

20 

0c 

af 

99 

402B i 

19 

20 

2f 

24 

30 

6f 

60 

60 

62 

4030 : 

0f 

0c 

04 

4f 

20 

2a 

df 

05 

0d 

4038 I 

06 

ff 

0f 

04 

3f 

60 

60 

7f 

f a 

4040 l 

03 

0d 

lf 

20 

23 

5f 

32 

30 

ec 

404B l 

db 

60 

20 

fb 

05 

11 

bf 

01 

b3 

4050 x 

04 

3b 

03 

0f 

7b 

12 

33 

lb 

e0 

4058 : 

60 

01 

5b 

12 

03 

B3 

12 

c3 

6e 

4060 I 

32 

e3 

0c 

a3 

1B 

23 

01 

63 

61 

4068 x 

01 

03 

31 

43 

31 

d3 

19 

f 3 

9e 

4070 l 

60 

b3 

0c 

33 

0i 

73 

01 

13 

e9 

407B l 

01 

53 

32 

53 

32 

ea 

6d 

54 

f 3 

4080 : 

6b 

03 

Bl 

09 

a6 

07 

b9 

02 

7c 

40B8 I 

43 

27 

9d 

06 

ae 

07 

al 

la 

65 

4090 x 

5b 

3f 

BS 

le 

b6 

0t 

a9 

12 

5f 

409B : 

53 

37 

Bd 

16 

be 

2f 

91 

2a 

ad 

40a0 i 

6b 

0f 

b5 

2e 

86 

67 

99 

22 

14 

40aB s 

63 

07 

bd 

26 

Ba 

67 

Bl 

3a 

62 

40b0 i 

7b 

lf 

a5 


9b 

43 

b2 

21 

cd 

40bB l 

57 

bd 

b6 

b0 

4a 

b5 

20 

43 

Ob 

40c0 : 

ef 

36 

ce 

95 

59 

BB 

49 

c4 

ec 

40cB : 

3f 

cl 

ee 

4d 

e7 

3a 

f 0 

54 

0a 

40d0 i 

72 

dl 

00 

f 7 

le 

f 7 

f0 

t0 

71 

40dB x 

5a 

7b 

aa 

60 

fc 

f 7 

c9 

60 

le 

40e0 x 

42 

95 

59 

05 

cb 

f 2 

ea 

e4 

ae 

40eB : 

92 

a4 

el 

94 

al 

c2 

03 

fb 

0b 

40f 0 : 

00 

54 

20 

00 

00 

00 

00 

00 

23 

Listing 6. 

Mit dem 

Befehl D 

4000 

erscheinen alle illegalen Opcodes 

disassembliert auf dem Bildschirm 


Programm 

x floppymon 


cbfl eded 

cbf 1 : 

a9 

36 

85 

01 

a2 

00 

bd 

b2 

bd 

cbf 9 i 

cd 

f0 

06 

20 

d2 

ff 

eB 

d0 

36 

CC01 X 

f 5 

20 

51 

c3 

a2 

3a 

20 

40 

f0 

cc09 i 

c3 

20 

cf 

ff 

c9 

3e 

f0 

f 9 

16 

CC 1 1 X 

C9 

20 

f 0 

f 5 

a2 

05 

dd 

cB 

40 

CC19 I 

cd 

f0 

09 

ca 

d0 

f 8 

20 

51 

f 2 

cc21 s 

c3 

4c 

05 

cc 

Ba 

0a 

aa 

»8 

5b 

cc29 i 

bd 

cc 

cd 

4B 

ca 

bd 

cc 

cd 

32 

cc31 i 

48 

60 

20 

c2 

c2 

d0 

0a 

a9 

38 

cc39 x 

00 

Bd 

C0 

cd 

Bd 

cl 

cd 

f0 

ea 

cc41 : 

la 

20 

8d 

c2 

Bd 

cl 

cd 

20 

B5 

Listing 5 

Komfortabler 

Disketten- 

Monitor für die M&T-Version 
(Fortsetzung) 
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C 64 


Hilfsprogramme 


Neues vom 
SMON 

Diese Erweiterung stellt elf weitere Befehle 
zur Verfügung. So läßt sich der Monitor 
zum Beispiel frei im Speicher verschieben 
und Sprites oder Zeichensätze können 
sehr einfach erstellt und geändert werden. 

m die Befehlserweiterung zu initialisieren, geht man 
folgendermaßen vor: 

1. SMON absolut laden und NEW eingeben. 

2. Den Basic-Lader (Listing 1) eintippen und speichern. 

3. Nach dem Start des Laders die Startadresse (dezimal) Ihrer 
SMON-Version eingeben: zum Beispiel 49152 (= $C000). 

4. Den erweiterten SMON zum Beispiel mit "SMONEX" Start¬ 
adresse Endadresse speichern. 

Die neuen Routinen werden, genau wie die meisten bereits 
vorhandenen, durch einen Buchstaben, zum Teil gefolgt von 
Adressenangaben, aufgerufen. Bei den ersten drei Ausgabe¬ 
befehlen kann der Speicherinhalt durch Überschreiben der 
Zeile geändert werden. 

Z 4000 (4100) (Zeichendaten) 
gibt den Speicherinhalt von $4000 (bis $40FF) folgender¬ 
maßen aus: Jeweils ein Byte pro Zeile wird in 8-Bit-Form dar¬ 
gestellt. Dabei ist ein »*« ein gesetztes, ein ».« dagegen ein 
nicht gesetztes Bit. Die beiden Zeichen sind willkürlich 
gewählt und können durch Überschreiben der Speicherzel¬ 
len $xE65, $xE2D (Bit = 1) und $xE69, $xE30 (Bit = 0) in 
den Bildschirm-Code (!) der gewünschten Zeichen geändert 
werden. 

Die Anwendung dieses Befehls liegt beispielsweise in der 
gezielten und anschaulichen Beeinflussung bestimmter 
Steuerbits in VIC, CIA etc. Andererseits lassen sich — beson¬ 
ders in Verbindung mit dem Kommando »Q« — Zeichendaten 
leicht modifizieren. 

H 4000 (4100) 

entspricht dem Befehl »Z« mit dem Unterschied, daß jeweils 
drei Byte pro Zeile ausgegeben werden. Das entspricht dem 
Format für Spritedaten. Auf diese Weise steht mit dem erwei¬ 
terten SMON ein kleiner »Sprite-Editor« zur Verfügung. 

N 4000 (4100) (Normaldarstellung) 
interpretiert den Speicherinhalt von $4000 (bis $40FF) als 
Bildschirm-Code und gibt 32 Zeichen pro Zeile aus. 

U 4000 (4100) (Übersicht) 

Wie »N«, jedoch werden in einer Zeile 40 Zeichen darge¬ 
stellt. Änderungen sind nur mit »N« möglich. Dieser Befehl 
dient hauptsächlich dazu, im Speicher abgelegte Bildschirm¬ 
informationen so auszugeben, wie sie tatsächlich im 
40-Zeichen/Zeile-Förmat aussehen würden. Dieser Befehl 
ist recht nützlich, um professionelle Videospiele zu analysie¬ 
ren, da hier Spielszenen oft im Bildschirm-Code gespeichert 
sind. 

E 4000 (4100) (Erase) 

ist der bereits im 64’er, Ausgabe 2/85 vorgeschlagene 
Erase-Befehl zum Füllen des Speicherbereiches von $4000 
bis $40FF mit $00. 

Y 40 

kopiert die vorhandene SMON-Version in nur drei Sekun¬ 
den nach $4000 bis $4FFF und nimmt dabei alle notwendi¬ 
gen Anpassungen vor. Die ursprüngliche Speicherversion 


des Monitors bleibt unverändert. Mit »G 4000« kann man in 
den neuen SMON springen. Von dem Byte-Wert, der überge¬ 
ben werden muß, wird nur das obere Nibble ($4) gewertet, so 
daß sich theoretisch 16 SMON-Versionen im Speicher unter¬ 
bringen lassen, wobei natürlich nicht alle Möglichkeiten sinn¬ 
voll sind. 

Auf diese Weise läßt sich stets die erforderliche Speicher¬ 
version hersteilen, ohne daß langwierige Änderungen not¬ 
wendig sind. 

Q 2000 

kopiert den Zeichensatz aus dem ROM von $D000 bis 
$DFFF in das RAM nach $2000. Dort kann er mit dem Befehl 
»Z« nach Belieben geändert werden. Möchte man zum Bei¬ 
spiel das Zeichen »A« in ein »Ä« umdefinieren, so ist der Zei¬ 
chensatz mit »Q 2000« ins RAM zu kopieren. Anschließend 
kann mit »Z 2000 2015« der Bereich in binärer Form auf dem 
Bildschirm ausgegeben werden, in dem auch das Zeichen 
»A« steht. Dieses kann nun in ein »Ä« geändert werden, indem 
man mit dem Cursor an die zu ändernde Stelle fährt und für 
einen Punkt, der gesetzt werden soll, ein »*« und für einen 
Punkt der nicht gesetzt werden soll ein ».« setzt. So, jetzt ist 
der Zeichensatz umdefiniert, aber noch nicht aktiviert. Als 
nächstes muß dem Videocontroller die Startadresse des 
neuen Zeichensatzes mitgeteilt werden. Dazu ist die Adresse 
$D018, in der eine hexadezimale 15 steht, durch eine hexa¬ 
dezimale 18 zu ersetzen. 

J 

bringt den letzten Ausgabebefehl ( K, D, M, Z, H, N, U) auf 
den Bildschirm zurück. Mit RETURN wird der letzte Befehl 
noch einmal ausgeführt. 

Zum Schluß noch ein Tip: 

DATA-Zeilen in Hex-Byte-Darstellung sind wegen ihrer kon¬ 
stanten ! änge (immer zwei Ziffern pro Wert!) übersichtlicher 
als solche mit dezimalen Zahlen. Da für die Ausgabe von Hex- 
Werten bereits alle Routinen im SMON integriert sind, kann 
der »B«-Befehl (Basic-DATA-Zeilen erzeugen) durch Verän¬ 
dern eines einzigen Sprungbefehles dahingehend manipu¬ 
liert werden, daß der Speicherinhalt künftig in Form von Hex- 
Byte ausgegeben wird: 

Disassemblieren Sie dazu den Byte-Ausgabebefehl mit 
»D x99F« und ersetzen »JSR BDD1« durch »JSR x32A«. Für 
das »x« muß der 4-KByte-Block, in dem die zu ändernde 
SMON-Version steht, eingesetzt werden. Liegt Ihre SMON- 
Version bei $C000, so ersetzen Sie das »x« durch ein »C«. 

Die Gesamtlänge der DATA-Zeile kann außerdem durch Ver¬ 
ändern der Speicherzelle $x9AE variiert werden. Bei dem 
Wert $ IC werden zum Beispiel genau acht Hex-Byte pro Zeile 
ausgegeben. Das Assembler-Listing zu dieser Erweiterung 
zeigt Listing 2. (Mark Richters/ah) 


100 

REM ******************************* 

<238> 

110 

REM * 


* 

< 159> 

120 

REM * 

SMON - ERWEITERUNG 

* 

<222> 

130 

REM * 


* 

<179> 

140 

REM * 

VON MARK RICHTERS 

# 

<005> 

150 

REM * 

ALLERSTR.4 

* 

<068 > 

160 

REM * 

2806 OYTEN 

# 

<037> 

170 

REM * 

TEL.! 04207/1B70 

* 

<07B> 

180 

REM * 


* 

<229> 

1S>0 

REM ******************************* 

<072> 

200 

1 



<176> 

210 

PRINT' 

BITTE DIE STARTADRESSE" 


<248> 

220 

PRINT' 

IHRER SMON-VERSION EINGEBEN 

" 

<189> 

230 

INPUT 

H IAL=H:H=H/4096 


<234> 

240 

IF HOINT (H) THEN 210 


<052> 

250 

POKE AL+38,0 


<239> 

260 

8 



<238> 

270 

DIM W(75) 


<045> 

Listing 1. Erweiterung zum SMON. Bitte die Eingabe- 

Hinweise auf Seite 109 beachten. 
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Hilfsprogramme 


C 64 


280 

FOR 1 

>0 TO 9 

<096> 

290 

W (48+1) = I 

<224> 

300 

s W(65+I)=I+10 

<069> 

310 

NEXT 

I 

< 140> 

320 

i 


<042> 

330 

FOR 1 

>1 TO 4 

<048> 

340 

s READ K,Z s K“K+H*4096 

< 123> 

350 

! FÜR J=K TO K+Z-l 

<235> 

360 

8 

READ A* 

<038> 

370 

: 

A=W(ASC(A*>) 

<253> 

380 

3 

B=W(ABC(RIGHT*(A*,1>)) 

< 129> 

390 

3 

S-S+A+B 

<023> 

400 

1 

IF ASC(A*)“42 THEN A-H 

<010> 

410 

S 

P-A*16+B t POKE J,P 

< 11B> 

420 

s NEXT J 

<070> 

430 

NEXT 

I 

<004> 

440 

: 


<162> 

450 

IF S=7031 THEN PRINT"OK!"> GOTO 470 

<200> 

460 

PR INT "FEHLER IN DATAS ! " 

<071 > 

470 

STOP 


<026> 

480 

1 


<202> 

490 

DATA 

97,7 

< 136> 

500 

DATA 

27,3A,3B,2C,28,29,21 

<025> 

510 

c 


<232> 

520 

DATA 

739,28 

<137> 

530 

DATA 

A2,06,DD,61,*0,F0,0B,CA 

< 159> 

540 

DATA 

10, F8 , A9,2E , 20, D2, FF, 20 

<1B7> 

550 

DATA 

CA,*2,C9,2E,F0,F9,4C,85 

<184> 

560 

DATA*F,4C,B2,*F 

< 109> 

570 

s 


<03B> 

580 

DATA 

781,2 

<220> 

590 

DATA 

F0,ED 

< 141 > 

600 

3 


<068> 

610 

DATA 

3593,503 

<202> 

620 

DATA 

A9,80,2C,A9,00,85,AB,20 

<085> 

630 

DATA 

64,*2,24,AB,10,03,A2,29 

< 117> 

640 

DATA 

2C,A2,2B,20,40,*3,20,23 

<239> 

650 

DAT A*3,A0,06,A2,00,A1,FB,0A 

<071 > 

660 

DATA 

48,B0,03,A9,2E,2C,A9,2A 

< 144> 

670 

DATA 

91,Dl,AD,86,02,91,F3,68 

<079> 

680 

DATA 

CB,E8,E0,08,D0,E9,20,67 

< 139> 

690 

DATA*3,24,AB,30,04,C0,1E,90 

<233> 

700 

DATA 

DA,20,5D,*4,90,C4,60,A0 

<133> 

710 

DATA 

08,2C,A0,18,20,7E,*2,20 

<100> 

720 

DATA 

BB,*2,A2,08,A9,00,85,AA 

<236> 

730 

DATA 

20, CA , *2, C9,2E, F0,07 , C9 

<052> 

740 

DATA 

2A , F0,04,4C, D1 , *2,18,26 

< 202 > 

750 

DATA 

AA,88,CA,D0,EB,A5,AA,81 

<014> 

760 

DATA 

FB,C1 ,FB,D0,EE,20,67,*3 

<071 > 

770 

DATA 

C0,00,D0,D6,60,A9,80,2C 

<218> 

780 

DATA 

A9,00,85,AB,20,64,*2,20 

<243> 

790 

DATA 

51,*3,24,AB,10,0B,A9,21 

<13B> 


800 DATA 20,D2,FF,20,23,*3,A0,08 <033> 
810 DATA 2C,A0,00,A2,00,A1,FB,20 <242> 
820 DATA 4F,*4,D0,F9,20,5D,*4,90 <059> 
830 DATA DE,60,20,7E,*2,A2,00,A0 <137> 
840 DATA 08,Bl,D1,81,FB,C1,FB,D0 <193> 
850 DATA AA,20,56,*4,90,F3,60,20 <193> 
860 DATA 8D,*2,29,F0,B5,FF,20,3C <190> 
870 DATA*F,20,D6,#9,20,3C,*F,A9 <001> 
880 DATA 14,85,FB,A9,02,05,FF,85 <195> 
890 DATA FC,A9,D1,85,FD,A9,0F,05 <008> 
900 DATA FF,85,FE,20,6B,*A,A0,00 <182> 
910 DATA A2,0D,BD,F2,*F,05,FF,B5 <072> 
920 DATA FC,CA,BD,F2,*F,85,FB,B1 <23B> 
930 DATA FB,29,0F,05,FF,91,FB,CA <150> 
940 DATA 10,E8,A9,2B,85,FB,A9,00 <0B9> 
950 DATA 05,FF,85,FC,A0,35,Bl,FB <0B2> 
960 DATA 29,0F,05,FF,91,FB,88,8B <137> 
970 DATA 10,F4,A9,DE,85,FB,A9,0F <098> 
980 DATA 05,FF,85,FC,A0,13,Bl,FB <08B> 
990 DATA 29,0F,05,FF,91,FB,BB,BB <167> 
1000 DATA 10,F4,60,A5,FF,85,A9,20 <096> 
1010 DATA 43,*F,68,68,29,F0,85,A5 <117> 
1020 DATA 18,69,10,85,A7,A9,00,85 <054> 
1030 DATA A4,85,A6,85,AB,60,20,7A <029> 
1040 DATA*2,A9,00,4C,C7,*9,20,7E <250> 
1050 DATA*2,A0,00,A9,D0,84,FD,85 <002> 
1060 DATA FE,78,A9,03,85,01,A2,10 <164> 
1070 DATA Bl,FD,91,FB,C8,D0,F9,E6 <125> 
1080 DATA FC,E6,FE,CA,D0,F2,A9,27 <124> 
1090 DATA 85,01,58,60,48,C9,4A,D0 <178> 
1100 DATA 10,A0,27,B9,00,02,91,Dl <224> 
1110 DATA 88,10,F8,6B,C6,D6,4C,D6 <214> 
1120 DATA*2,A0,06,D9,D7,*F,D0,0A <1B7> 
1130 DATA A0,27,Bl,Dl,99,00,02,BB <003> 
1140 DATA 10,FB,B8,10,EE,68,4C,FF <033> 
1150 DATA*2,A2,0A,DD,D0,*F,F0,06 <139> 
1160 DATA CA,D0,F8,4C,D1,*2,20,C5 <22B> 
1170 DATA*F,4C,D6,*2,8A,0A,AA,BD <009> 
1180 DATA DD,*F,48,BD,DC,*F,48,60 <111> 
1190 DATA 28,29,21,45,59,51,48,5A <209> 
120C ' ATA 4E,55,44,4B,4D,52,*E,4F <203> 
1210 DATA*E,B2,*E,56,*F,C7,*E,5E <099> 
1220 DATA*F,0B,*E,08,*E,85,*E,88 <157> 
1230 DATA*E,06,00,87,03,2D,0C,5C <076> 
1240 DATA 0C,F5,0C,A2,0D,04,0E <224> 
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Listing 1. Erweiterung zum SMON (Schluß) 


1 101 

C026 

.OPT P4,00 




» !SMON ERWEITERUNG 




l ERWEITERI 

ÜMQN UM FOLGENDE 



1 BEFEHLE 

- H ADR 1 

(ADR2) 



« 

- Z ADRl 

(ADR2) 



1 

N ADR 1 

(ADR2) 



1 

U ADR1 

(ADR2 > 



1 

- E ADR1 

ADR2 



1 

- Y BYTE 




1 

- 0 ADR 1 




1 

1 

- J 


7001 

C026 

* 

8 

• C000 

I DASISADRESSE SMON 

7201 

C026 

HCH 


jHIDDEN COMHANDS 

730t 

C026 

HCZ - 

"> M 


7401 

C026 

HCN 

"! M 


7601 

C026 

FLAG 

*AA 


7701 

C026 

TEMP - 

♦ AB 


7B0« 

C026 

PCL 

•FB 


790i 

C026 

PCH 

•FC 


800: 

C026 

HINIBBLE - 

•FF 


820: 

C026 

1 

criDS - 

S**02B 


8301 

C026 

□ET 12ADR - 

S**264 


8401 

C026 

GET2ADR - 

S**27A 


8501 

C026 

GETADR1 - 

S**27E 


8601 

C026 

GETBYT 

5**ZÜD 


8701 

C026 

SKIPSPAC - 

S**2B8 


880: 

C026 

GETRET 

8**2C2 


890: 

C026 

GETCHRER - 

S**2CA 


900: 

C026 

ERROR 

S+*2D1 


9101 

C026 

EXECUTE - 

S**2D6 



920: 

C026 




CMOSTORE 

■ 

S**2FF 

930: 

0026 




CHARRET 

» 

9**340 

940: 

C026 




RETURN 

■ 

S**351 

9501 

C026 




HEXOUT 

• 

S**323 

9601 

C026 




PC INC 

m 

S+4367 

9701 

0026 




ASCII4 

m 

S**44F 

980: 

0026 




ASC115 

m 

S**456 

9901 

0026 




CONTIN 

m 

9**45D 

10001 

C026 




OCCUPY 

- 

S+*9C7 

10111 

C026 




1 - 

»- 

8*38 

1012t 

C026 

00 




•BYIEBB 1 OLTEN Z-BEFEHL LOEBCHEN 

10201 

C061 




1 

• - 

B+*61 

10401 

C061 

27 

3A 

3B 

1 

HCMDTAB 

.ASC 

“’Mi" 

10501 

C065 

20 

29 

21 


.BYTEHCH.HCZ,HCN 

10701 

C2E3 




1 

•- 

B**2E3 

1090t 

C2E3 

A2 

06 


1 

LDX 

46 ;ZEILENANFANG 

11001 

C2E5 

DD 

61 

C0 

Fl 

CMP 

HCMDTAB,X 

1110: 

C2EB 

F0 

08 



BEO 

EXEC1 

1 1201 

C2EA 

CA 




DEX 


11301 

C2EB 

10 

F8 



BPL 

Fl 

1140: 

C2ED 

A9 

2E 



LDA 

w - " 

1150: 

C2EF 

20 

D2 

FF 


J8R 

•FFD2 

11701 

C2F2 

20 

CA 

C2 

EXEC1 

JSR 

GETCHRERR 

1180: 

C2F5 

C9 

2E 



CMP 


11901 

C2F7 

F0 

F9 



BEO 

EXEC1 

12001 

C2F9 

4C 

85 

CF 


JMP 

LINSTORE 

121(9: 

C2FC 

K 

B2 

CF 

WEITER 

JMP 

MORECMD 


> 
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C 64 


Hilfsprogramme 


12301 

C30D 

*■ 

S+*30D 

•.WEITERE BEFEHLE 

12501 

C30D F0 ED 

DEO 

WEITER 


12701 

CE 09 

*— 

S+*E09 

1 NEUE ROUTINEN 


i 

* 


1310: 

CE09 

A9 

80 


ZCMD 

LDA 

4*80 

1FLAG SETZEN 

1320: 

CE0B 

2C 




.BYTE42C 


13401 

CE0C 

A9 

00 


HCMD 

LDA 

40 


1350: 

CE0E 

85 

AB 



STA 

TEMP 


1360: 

CE 10 

20 

64 

C2 


JBR 

GET12ADR 

5 START/END-ADREBSE 

13B0: 

CE 13 

24 

AB 


1 

LI 

BIT 

TEMP 


1390: 

CE 15 

10 

03 



BPI 

WIJ 


1400: 

CE 17 

A2 

29 



LDX 

4HCZ 

JHIDDEN COflMAND 

1410: 

CE 19 

2C 




.BYTE*2C 

SAUSGEBEN 

14201 

CEIA 

A2 

28 


W0 

LUX 

#HCH 


1430: 

CE IC 

20 

40 

C3 


JSR 

CHARRET 


1440: 

CE 1F 

20 

23 

C3 


JSR 

HEXOUT 

1 PC AUSGEBEN 

1450: 

CE22 

A0 

06 



LDV 

N6 

I SPALTE 6 

1470: 

CE24 

A2 

00 


L2 

LDX 

40 


14130: 

CE26 

Al 

FB 



LDA 

<PCL,X) 


1500: 

CE28 

0A 



1 

L3 

ASL 



1510: 

CE29 

40 




PHA 


1 BYTE MERKEN 

1520: 

CE2A 

B0 

03 



BCS 

BITSET 

jBIT-1, DANN » 

1530: 

CE2C 

A9 

2E 



LDA 

4". " 

»BIT-0, DANN . 

1540: 

CE2E 

2C 




.BYTE»2C 

1 AUSGEBEN 

1550: 

CE2F 

A9 

2A 


BITSET 

LDA 

4"*" 


1560: 

CE31 

91 

Dl 



STA 

(*Dl>,Y 


1570: 

CE33 

AI) 

B6 

02 


LDA 

»286 


1500: 

CE36 

91 

F3 



STA 

<*F3>,Y 


1600: 

CE3B 

68 



1 

PLA 


1 BYTE ZURUECKHOLEN 

1610: 

CE 39 

CB 




I NY 


; CURSOR WEHER 

1620: 

CE3A 

EG 




I NX 


;NAECHSIES BYTE 

1630: 

CE3B 

E0 

00 



CPX 

40 

;0 BIT 

1640: 

CE3D 

D0 

E9 



BNE 

L3 

S BYTE WEITERSCHIEBEN 

1660: 

CE3F 

20 

67 

C3 


JSR 

PC INC 

;ZAEHLER ERHOEHEN 

1670: 

CE42 

24 

AB 



BIT 

TEMP 

;FLAG FUER 1*8 BIT 

1600: 

CE44 

30 

04 



BMI 

W9 

;ZEILE FERTIG 

1690: 

CE46 

C0 

IE 



CPY 

430 

(3 BYTES 

1700: 

CE4B 

90 

DA 



BCC 

L2 


1710: 

CE4A 

20 

5D 

C4 

W9 

JSR 

CONTIN 

S TASTEN-ABFRAGE 

1720: 

CE4D 

90 

C4 



BCC 

LI 


1730: 

CE4F 

60 



, 

RTS 



1770: 

CE50 

A0 

08 


* 

ZCMDH 

LDY 

48 


1700: 

CE52 

2C 




.BYTE*2C 

;1 BYTE 

1800: 

CE53 

A0 

18 


HCMDH 

LDY 

424 

;3 BYTE 

1810: 

CE55 

20 

7E 

C2 


JSR 

QETADR1 

örtert 

1820: 

CE5B 

20 

BQ 

C2 


JSR 

SKIPSPACE ;SPACES UEBERLESEN 

1830: 

CE5B 

A2 

0B 


Al 

LDX 

48 


1040: 

CE5D 

A9 

00 



LDA 

40 


1850: 

CE5F 

85 

AA 



STA 

FLAG 


1870: 

CE61 

20 

CA 

C2 

A2 

JSR 

GETCHRERR 

1800: 

CE64 

C9 

2E 



CMP 

4". " 

*> BIT=0 

1890: 

CE66 

F0 

07 



BEO 

BIT0 

»• -> BIT*1 

1900: 

CE6B 

C9 

2A 



CMP 

4"*'' 


1910: 

CE6A 

F 0 

04 



BEO 

BI T1 


1920: 

CE6C 

4C 

Dl 

C2 

ERR1 

JMP 

ERROR 

»ANDERES ZEICHEN 

1940: 

CE6F 

18 



1 

BIT0 

CLC 



1950: 

CE70 

26 

AA 


BI T 1 

ROL 

FLAG 


1960: 

CE72 

BH 




DEY 



1970: 

CE73 

CA 




DEX 


1 BYTE 

1980: 

CE74 

DB 

EB 



BNE 

A2 

»NOCH NICHT FERTIG 

2000: 

CE76 

A5 

AA 


1 

LDA 

FLAG 

»IN SPEICHER 

2010: 

CE 78 

Ql 

FB 



STA 

( PCL,X > 

»SCHREIBEN 

2020: 

CE7A 

CI 

FB 



CMP 

(PCL,X ) 


2030: 

CE7C 

D0 

EE 



ONE 

ERR1 



CE7E 

20 

6/ 

C3 


J9R 

PC INC 


2060: 

CEBl 

C0 

00 


1 

CPY 

40 


2070: 

CE83 

D0 

D6 



BNE 

Al 

»NOCH NICHT FERTIG 

2080: 

CEB5 

60 



1 

RTS 



2120: 

CEB6 

A9 

80 


1-- 

1 

NCMD 

LDA 

4*80 


2130: 

CEBB 

2C 




.BYTE*2C 


2140: 

CE89 

A9 

00 


IJCHD 

LDA 

40 


2150« 

CEBB 

B5 

AB 



STA 

TEMP 


2160: 

CEBD 

20 

64 

C2 


JSR 

GET12ADK 

2180: 

CE90 

20 

51 

C3 

1 

L5 

JSR 

RETURN 


2190: 

CE93 

24 

AB 



BIT 

TEMP 


2200. 

CE 95 

10 

0B 



BPL 

u 


2210: 

CE97 

A9 

21 



LDA 

4HCN 

»HIDDEN COMMAND 

2220: 

CE99 

20 

D2 

FF 


JSR 

»FFD2 


2230: 

CE9C 

20 

23 

C3 


JSR 

HEXOUT 


2240: 

CE9F 

AB 

08 



LDV 

48 

:SPALTE 0 

2250: 

CE Al 

2C 




.BYTE42C 


2270: 

CEA2 

A0 

00 


1 

u 

LDY 

40 

»SPALTE 0 

2280: 

CEA4 

A2 

00 



LDX 

40 


2300: 

CEA6 

Al 

FB 


L4 

LDA 

(PCL,X> 


2310: 

CEAB 

20 

4F 

C4 


JSR 

ASCII4 

;AL5 BILDSCHIRM-CODE 

2320: 

CEAB 

D0 

F9 



BNE 

L4 

3 AUSGEBEN 

2340: 

CEAD 

20 

5D 

C4 

' 

JSR 

CONTIN 


2350: 

CEB0 

90 

DE 



BCC 

L3 

»NAECHSTE ZEILE 

2360: 

CEB2 

60 




RTS 



2380: 

CEB3 

20 

7E 

C2 

i 

NCMDH 

JSR 

GETADR1 


2390: 

CEB6 

A2 

00 



LDX 

40 


2400: 

CEBB 

AB 

08 



LDY 

48 

»SPALTE 8 

2410: 

CEBA 

Bl 

Dl 


CI 

LDA 

(»Dl),Y 


2420: 

CEBC 

81 

FB 



STA 

(PCL,X) 

»IN 9PEICHER 

2430: 

CEBE 

CI 

FB 



CMP 

(PCL,X) 

»SCHREIBEN 


2440: 

CEC0 

DB 

AA 



BNE 

ERR1 


2450: 

CEC2 

20 

56 

C4 


JSR 

ASCI15 

»PC ERHOEHEN 

2460: 

CEC5 

90 

FZ 



BCC 

CI 

2470: 

CEC7 

60 



, 

RTS 

»ZEILE FERTIG 

2510: 

CEC8 

20 

BD 

C2 

1 

1 

YCMD 

JSR 

GETBYT 


2520: 

CECB 

29 

F0 



AND 

•**/. 1 1 1 10000 


2530: 

CECD 

85 

FF 



STA 

HINIBBLE 

»NEUER 41<-BLOCK 

2540: 

CECF 

20 

3C 

CF 


JSR 

GETPTR 

»ADRESSEN BETZEN 

2550: 

CED2 

20 

D6 

79 


JSR 

»79D6 

|W-BEFEHL 

2570: 

LEDS 

20 

3C 

CF 

1 

JSR 

SETPTR 


2580: 

CEDB 

A9 

14 



LDA 

#»14 

»BEREICH OHNE 

2590: 

CEDA 

85 

FB 



STA 

»FB 

»TABELLEN 

2600: 

CEDC 

A9 

02 



LDA 

#2 

2610: 

CE DE 

05 

FF 



ORA 

HINIBBLE 


2620: 

CEE0 

05 

FC 



STA 

»FC 


2630: 

CEE2 

A9 

Dl 



LDA 

#< NEWCMDS 


2640: 

CEE 4 

85 

FD 



STA 

»FD 


2650: 

CEE6 

A9 

BF 



LDA 

#(NEWCMDS>B fc »F> 

2660: 

CEE8 

05 

FF 



ORA 

HINIBBLE 


2670: 

CEEA 

B5 

FE 



STA 

«FE 


2680: 

CEEC 

20 

68 

7A 


JSR 

»7A68 

»V-BEFEHL 

2700: 

CEEF 

A0 

00 


1 

LDY 

#0 

»LADE-BEFEHLE 

2710: 

CEF 1 

A2 

0D 



LDX 

«13 

» ANPASSEN 

2720: 

CEF3 

Bü 

¥2 

CF 

D3 

LDA 

CHANGE,X 


2730: 

CEF6 

05 

FF 



ORA 

HINIBBLE 


2740: 

CEF8 

05 

FC 



STA 

PCH 

«ADRESSE ALS ZEIGER 

2750: 

CEFA 

CA 




DEX 


2760: 

CEFB 

BD 

F2 

CF 


LDA 

CHANGE.X 


2770: 

CEFE 

Bb 

FB 



STA 

PCL 


2780: 

CF 00 

Bl 

FB 



LDA 

(PCL),Y 


2790: 

CF02 

29 

0F 



AND 

«7.00001 1 1 1 


2000: 

CF04 

05 

FF 



ORA 

HINIBBLE 


2810: 

CF 06 

91 

FB 



STA 

(PCL) ,Y 


2820: 

CFBB 

CA 




DEX 



2830: 

CF09 

10 

EB 



BPL 

D3 


2850: 

CF0B 

A9 

2B 



LDA 

#<CMDS 

»ZEIGER AUF 

2060: 

CF0D 

B5 

FB 



STA 

PCL 

»BEFEHLSADRESSEN 

2870: 

CF0F 

A9 

00 



LDA 

# (CMDS>8 8. 

»F> 

2880: 

CF 1 1 

05 

FF 



ORA 

HINIBBLE 


2090: 

CF 13 

85 

FC 



STA 

PCH 


2910: 

CF 15 

A0 

35 



LDY 

#53 


2920: 

CF 17 

Bl 

FB 


Dl 

LDA 

(PCL),V 


2930: 

CF 19 

29 

0F 



AND 

#7.00001111 


2940: 

CF1B 

05 

FF 



ORA 

HINIBBLE 

»HIBYTES 

2950: 

CF1D 

91 

FB 



STA 

(PCL).Y 

»ANGLEICHEN 

2960: 

CF1F 

B8 



W1 

DEY 



2970: 

CF20 

08 




DEY 



2980: 

CF21 

10 

F4 



BPL 

Dl 


3000: 

CF23 

A9 

DE 


I 

LDA 

•<NEWADR 

»ZEIGER AUF NEUE 


85 

A9 

FB 

0F 



STA 

LDA 

PCL 

•(NEWADR>8 

» BEFEHLSADRESSEN 
& <F) 

3030: 

CF29 

05 

FF 



ORA 

HINIBBLE 


3040: 

CF2B 

85 

FC 



STA 

PCH 


3060: 

CF2D 

A0 

13 


I 

LDY 

•TABEND-NEWADR-1 

3070: 

CF2F 

Bl 

FB 


D2 

LDA 

(PCL) ,Y 


30B0: 

CF31 

29 

0F 



AND 

#7.00001111 


3090: 

CF33 

05 

FF 



ORA 

HINIBBLE 

»HIBYTES 

3100: 

CF35 

91 

FB 



STA 

(PCL),Y 

»ANGLEICHEN 

3110: 

CF37 

88 




DEY 


3120: 

CF3B 

88 




DEY 



3130: 

CF 39 

10 

F4 



BPL 

D2 


3140: 

CF3B 

60 



1 

RTS 



3170: 

CF3C 

A5 

FF 


* 

8ETPTR 

LDA 

HINIBBLE 


31B0: 

CF3E 

85 

A9 



STA 

»A9 

»NEUER START HI 

3190: 

CF40 

20 

43 

CF 


JSR 

GETHI 

3200: 

CF43 

6B 



GETH1 

PLA 



3210: 

CF44 

68 




PLA 



3220: 

CF45 

29 

F0 



AND 

«XI1110000 


3230: 

CF47 

85 

A5 



STA 

*A5 

»ALTER START HI 

3240: 

CF49 

1B 




CLC 



323619 

CF4A 

6V 

10 



ADC 

«*10 


3260 s 

CF4C 

85 

A7 



BTA 

*A7 

»ALTES ENDE HI 

3280: 

CF4E 

A9 

00 


1 

LDA 

#0 

|LO-BYTES LOESCHEN 

3290. 

CF50 

85 

A4 



STA 

• A4 


3300: 

CF52 

B5 

A6 



STA 

«A6 


3310: 

CF54 

85 

AB 



STA 

• AB 


3320: 

CF56 

60 



1 

RT8 



3360: 

CF57 

20 

7A 

C2 

ECMD 

JSR 

GET2ADR 


3370: 

CF5A 

A9 

00 



LDA 

•0 


3380: 

CF5C 

4C 

C7 

C9 

, 

JMP 

OCCUPY 


3420: 

CF5F 

20 

7E 

C2 

QCMD 

JSR 

GETADR1 


3430: 

CF62 

A0 

00 



LDY 

«0 


3440: 

CF64 

A9 

D0 



LDA 

#«D0 

»ZEIGER AUF 

3450: 

CF66 

84 

FD 



STY 

»FD 

1 ZEICHENROM 

3460: 

CF68 

85 

FE 



BTA 

•FE 


3400: 

CF6A 

78 



' 

SEI 



3490: 

CF6B 

A9 

03 



LDA 

#7.01 1 

»ROM EINBLENDEN 

3500: 

CF6D 

85 

01 



BTA 

1 


3510: 

CF6F 

A2 

10 



LDX 

«16 

»4K UEBERTRAGEN 

3520: 

CF71 

Bl 

FD 


El 

LDA 

(♦FD),Y 


3530: 

CF73 

91 

FB 



STA 

(PCL),Y 


3540: 

CF75 

ca 




INY 



3550: 

CF76 

D0 

F9 



BNE 

El 


3560: 

CF78 

E6 

FC 



INC 

PCH 


3570: 

CF7A 

E6 

FE 



INC 

»FE 


3580: 

CF7C 

CA 




DEX 



3590: 

CF7D 

DB 

F2 



BNE 

El 



Listing 2. Assembler-Listing zur SMON-Erweiterung 
(Fortsetzung) 















139 











Hilfsprogramme 


C 64 


3600: 

CF7F 

A9 

27 



LDA 

4*27 »NORMALE INSTELLUNG 

4040: 

CFBF 

20 

C5 CF FOUND 

JSR CMDEXEC2 


3610: 

CF81 

85 

01 



STA 

1 

4050: 

CFC2 

4C 

D6 C2 

JMP EXECUTE 


3620: 

CFB3 

5B 




CLI 





1 



3630: 

CFB4 

60 




RTS 


4070: 

CFC5 

BA 

CMDEXEC2 

TXA 







1 



4000: 

CFC6 

0A 


ASL 










40901 

CFC7 

AA 


TAX 










4100: 

CFC8 

BD 

DD CF 

LDA NEWADR-1,X 


3670: 

CF85 

48 



LINSTQRE 

PHA 

»BEFEHL MERKEN 

4110: 

CFCB 

4B 


PHA 


36B0: 

CFB6 

C9 

4A 



CUP 

• M- 

4120: 

CFCC 

BD 

DC CF 

LDA NEWADR-2,X 


3690: 

CFBB 

D0 

10 



BNE 

STORE 

4130: 

CFCF 

4B 


PHA 







1 



4140: 

CFD0 

60 


RTS 


3710: 

CFBA 

A0 

27 



LDY 

•39 




• 



3720: 

CFBC 

B9 

00 

02 

Ql 

LDA 

•0200,Y 

4160: 

CFD1 

28 

29 21 NEWCMD8 

.BYIEHCH,HCZ,HCN 


3730: 

CFBF 

91 

Dl 



STA 

(*D1>,Y »ZEILE AUF 

4170: 

CFD4 

43 

39 31 

.ASC "EYQ" 


3740: 

CF91 

08 




DEY 

»BILDSCHIRM 

4100: 

CFD7 

48 

5A 4E OUTCMDB 

.ABC "HZNUDKM” 


3750: 

CF92 

10 

F8 



BPL 

Ü1 »SCHREIBEN 




1 



3760: 

CF94 

60 




PLA 


4200: 

CFDE 

52 

CE NEWADR 

.WORDHCMDH-1 


3770: 

CF 93 

C6 

D6 



DEC 

*D6 »CURSOR l HOCH 

4210: 

CFE0 

4F 

CE 

.WQRDZCMDH-1 


3700: 

CF97 

4C 

D6 

C2 


JMP 

EXECUTE 

4220« 

CFE2 

B2 

CE 

.WORDNCMDH-1 







1 



42301 

CFE4 

36 

CF 

.WORDECMD-1 

iE 

3000: 

CF9A 

A0 

06 


STORE 

LDY 

•6 

4240: 

CFE6 

C7 

CE 

.WORDYCMD-1 

|V 

3010: 

CF9C 

D9 

D7 

CF 

B3 

CMP 

□UTCMDB.Y 

42501 

CFEB 

3E 

CF 

.WORDQCMD-1 

;Q 

3020: 

CF9F 

D0 

0A 



BNE 

W3 

4260: 

CFEA 

0B 

CE 

.WORDHCMD-1 

i • 






- 



42/0: 

CFEC 

0B 

CE 

.WORDZCMD-1 

»z 

3040: 

CF Al 

A0 

27 


OKI 

LDY 

• 39 

4280: 

CFEE 

B5 

CE 

.WORDNCMD-1 

|N 

3050: 

CFA3 

Bl 

Dl 


G2 

LDA 

(*D1),Y 

42901 

CFF0 

Hfl 

CE 

.WORDUCMD-1 

|U 

3060: 

CF A3 

99 

00 

02 


BTA 

»0200,Y »ZEILE NUR BEI 

43001 

CFF2 


TABEND 



3070: 

CFAB 

Bü 




DEY 

»H,Z,N,U,K,M,D 




» 



3000: 

CFA9 

10 

F0 



BPL 

Q2 »SPEICHERN 

43201 

CFF2 

06 

00 CHANGE 

. WORD»B003* 1 










4330: 

CFF4 

87 

03 

.WDRD*03B6+1 


3900: 

CFAB 

80 




DEY 


4340: 

CFF6 

2D 

0C 

. WORU40C2C-» 1 


3910: 

CFAC 

10 

EE 



BPL 

G3 

4350: 

CF FB 

5C 

0C 

.WURD40C5B• 1 


3920: 

CF AE 

60 



STEND 

PLA 

|BFFEHL ZURUECKHOLEN 

4360: 

CFFA 

F5 

0C 

.WORD*0CF4+1 


3930: 

CFAF 

4C 

FF 

C2 


JHP 

CMDSTORE 

4370: 

CFFC 

A2 

0D 

.WORD*0DA1«1 







1 



4380: 

CFFE 

04 

0E 

.WORD»0E03U 







1 ♦♦♦♦ ♦♦♦*■♦ 








3970: 

CFB2 

A2 

0A 


MORECMD 

LDX 

•NEWADR-NEWCMDS-3 







3900: 

CFB4 

DD 

D0 

CF 

Bl 

CMP 

NEWCMDS-1,X 







3990: 

CFB7 

F0 

06 



BEQ 

FOUND 







40001 

4010: 

CFB9 

CFBA 

CO 

D0 

F0 



DEX 

BNE 

Bl 

Listing 2 

Assembler-Listing zur SMON-Erweiterung 

4020: 

CFBC 

4C 

Dl 

C2 

1 

JMP 

ERROR 

(Schluß) 







»IPS 

mm 

-SWwm*. 


: w$* 
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C 64 


Tips und Tricks 


Schleifen mit 
Format 

ln manchen Pascal-Versionen geht es auto¬ 
matisch, beim C 64 nur mit einem Trick: 
das Einrücken von Schleifen. Anhand 
eines Programms in Maschinensprache 
bringen Sie Form in Ihre Listings. Wir zei¬ 
gen auch, wie es geht. 

A nhänger der strukturierten Programmierung haben es 
gelernt, selbst der in Schulungen: ein Programm 
modular aufbauen, in kleine Schritte zerlegen, über¬ 
sichtlich gestalten. Leider ist es mit dem C 64 nicht so ganz 
einfach. Außer IF..THEN, GOTO, GOSUB und FOR..NEXT wird 
strukturiertes Codieren nicht unterstützt. 

Eine Möglichkeit ist, FOFL.NEXT-Schleifen einzurücken. 
Normalerweise macht man das, indem nach der Zeilennum¬ 
mer ein Doppelpunkt gesetzt wird und erst danach die 
gewünschte Anzahl Leerstellen. Ein kurzes Beispiel: 

Schleife ohne einrücken: 

10 FOR 1=1 TO 10 
20 A=A+I 
30 GOSUB 100 
40 FOR J = 1 TO 10 
50 PRINT l,J,A*J 
60NEXTJ 
70 NEXTI 

Schleife mit einrücken durch Doppelpunkte: 

10 FOR 1 = 1 TO 10 
20 : A=A+I 
30 : GOSUB 100 
40 : FOR J = 1 TO 10 
50 : PRINT l,J,A*J 
60:NEXTJ 
70 NEXTI 

Das sieht schon viel besser aus. Bei langen Listings werden 
Sie diese Form schätzen lernen. Allerdings, das Nonplusultra 
ist es auch nicht. Besser wäre es, das Listing würde so aus- 
sehen: 

10 FOR 1 = 1 TO 10 
20 A = A + I 100 
30 GOSUB100 
40 FOR J = 1 TO 10 
50 PRINT l,J,A*J 
60 NEXT J 
70 NEXTI 

Um das zu erreichen, müssen wir eine kleine Maschinenrou¬ 
tine schreiben. Aber wie? 

Ein Gedanke liegt nah: Warum nicht die normale LIST- 
Routine des C 64 verwenden? Sie erledigt ja schon einen 
großen Teil der Aufgabe, nämlich das normale LISTen. Was 
fehlt, ist nur noch das Einrücken. Zuerst muß also ein 
dokumentiertes ROM-Listing her. Dort finden wir die LIST- 
Routine des Basic-Interpreters ab SA69C. Sie geht bis 
$A740. Soweit, so gut. Aber wie greifen wir in diese Routine 
ein? Sieht man sich die LIST-Routine etwas genauer an, findet 
man einen indirekten Sprung ab Adresse $A717 (JMP 
($0306)). Das bedeutet, an dieser Stelle springt die LIST- 
Routine zu der Adresse, die sich aus dem Inhalt der Adressen 
$0306/50307 (LO/HI-Byte) ergibt. Man spricht in so einem 
Fall auch von einem Vektor. Dort kurz spioniert, finden wir in 
$0306/$0307 die Zahlen $1A und $A7, zusammengesetzt 


also die Adresse A71A, das heißt genau die Adresse, die dem 
JMP($0306) folgt. Damit haben wir genau das, was wir 
suchen, eine Möglichkeit, in die LIST-Routine einzugreifen. 
Denn $0306 steht im RAM, kann also (von uns) geändert 
werden. 

Im Prinzip brauchen wir also nur folgendes zu machen: Wir 
schreiben die Anfangsadresse unserer Routine in die Spei¬ 
cherstellen $0306/50307, Damit springt die Original-LIST- 
Routine unsere neue Routine an und führt sie aus. In »Fach¬ 
kreisen« würde man sagen, der LIST-Vektor ist verbogen wor¬ 
den. Am Ende unseres Programms müssen wir noch dafür 
sorgen, daß die alte LIST-Routine wieder fortgesetzt wird und 
zwar machen wir das mit JMP $A71A. 

Grundsätzlich kennen wir nun also das Wie. In der Zwi¬ 
schenzeit taucht aber noch ein Gedanke auf: Wie soll das 
Programm gestartet werden? Nach dem Lesen des 
Assembler-Kurses (Assembler ist keine Alchimie) im 64’er 
und einigen anderen Artikeln fällt das Stichwort: Interrupt. 

Interrupt war für mich immer ein Wort, vor dem ich mich 
etwas gedrückt habe, aber so schlimm ist es gar nicht. Doch 
zuerst einmal zur Aufgabe: Die neue LIST-Routine soll mit der 
Funktionstaste F7 an- und mit Fl ausgeschaltet werden. Um 
das zu erreichen, muß noch einmal ein Vektor verbogen wer¬ 
den, und zwar der Interrupt-Vektor in Adresse $0314/$0315 
auf unser eigenes Programm (siehe Listing 2, Zeilen 290 bis 
360). Wir müssen dafür sorgen, daß die Tasten F7 und Fl 
dauernd abgefragt werden. Das erreicht man, indem die 
Interrupt-Routine erweitert wird. Auch hier hilft ein kleines 
Programm (Listing 2, Zeilen 364 bis 372). Im Prinzip soll 
unsere neue LIST-Routine so ablaufen: 

1. Initialisieren des Programms mit SYS adresse (»adresse« 
können wir selbst festlegen) 

2. mit F7 einschalten und mit Fl ausschalten. 

3. mit aem ganz normalen LIST-Befehl ein beliebiges Basic- 
Programm auf dem Bildschirm oder Drucker ausgeben. Auf 
dem Drucker sollen die Basic-Befehle FOR und NEXT fettge¬ 
druckt werden. 

Und damit auch zu sehen ist, ob die neue oder die normale 
Routine aktiviert ist, soll der Rahmen beim Drücken von F7 
die Farbe wechseln (Listing 2, Zeile 452/453) und bei Fl 
ebenso (Listing 2, Zeile 522/523). 

Die LIST-Routine 


Die eigentliche neue LIST-Routine finden Sie in Listing 2, 
Zeile 1000 bis 1340. Danach folgen einige Unterprogramme, 
zum Beispiel Fettdruck ein-/ausschalten und Leerzeichen 
ausgeben. 

Um das Programm zu verstehen, muß man folgendes wis¬ 
sen: 

1. Wenn die neue LIST-Routine angesprungen wird, steht 
im Akku ein Zeichen aus dem Basic-Listing, das wir ausgeben 
wollen. Das kann jedes Zeichen sein zwischen der Basic- 
Zeilennummer und dem Ende einer Basic-Zeile (die Zeilen¬ 
nummer selbst wird vorher, von der alten List-Routine selbst, 
ausgegeben.), 

2. Der Akku-Inhalt muß am Ende unserer LIST-Routine wie¬ 
der an das Original-LIST übergeben werden. Aus diesem 
Grund wird er sicherheitshalber am Anfang der Routine mit 
PHA gesichert und am Ende mit PLA zurückgeholt. 

3. Jeder Basic-Befehl wird im Speicher als Token abgelegt, 
eine Abkürzung. Der Befehl FOR hat den Wert $81 und NEXT 
den Wert $82. 

Der Algorithmus ist jetzt nicht mehr schwer zu entwickeln. 
Da man FOR..NEXT-Schleifen (fast) beliebig schachteln 
kann, setzen wir einen Zähler ein (im Listing 2 ZAEHLER 
genannt), der die Anzahl der Verschachtelungen zählt: Bei 
jedem FOR wird ZAEHLER um 1 erhöht (Zeile 1210 bis 
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C 64 


1240, bei jedem NEXT um 1 vermindert (Zeile 1160 bis 
1180). Der Inhalt von ZAEHLER bestimmt auch die Anzahl 
der Leerzeichen, die am Anfang der Zeile, nach der Zeilen¬ 
nummer, ausgegeben werden (Zeile 1190 bis 1207). Der 
Anfang der Zeile wird durch eine 4 im Y-Register gekenn¬ 
zeichnet. Das hängt mit dem Aufbau einer Basic-Zeile im C 64 
zusammen und mit der indirekt-indizierten Adressierung, die 
die LIST-Routine verwendet (Y=0 und Y=1 sind die Start¬ 
adresse der Basic-Zeile, Y=2 und Y=3 die Zeilennummer 
und ab Y=4 folgt der Rest der Basic-Zeile). 


Das Unterprogramm BLANKOUT (Zeile 2010 bis 2070 
gibt Leerzeichen aus, und zwar so viele, wie in ZAEHLER ste¬ 
hen. 

Die Routinen FETTDRUCK und NORMDRUCK schalten 
bei Ausgabe auf Drucker (mit OPEN 1,4:CMD1:LIST) Fett¬ 
druck an und aus. Interessant sind hier vielleicht die Zeilen 
1510 bis 1530 oder 1710 bis 1730. Durch die Abfrage der 
Speicherstelle $9A (dezimal 154) kann die mit CMD ge¬ 
wählte Geräteadresse überprüft werden (4 steht für 
Drucker). Die Sequenz, die hier gewählt wurde, um Fettschrift 


10B 

ne 

120 

130 

140 

142 

144 

150 

160 

170 

180 

190 

200 

210 

212 

220 

230 

240 

250 

260 

270 

280 

290 


-«■1-11,4 

-J.SY1.4 

-OB"NEULIST.OBJ *5,P,W" 


“I 


j PROGRAMM s LIST-ROUTINE VERAENDERT 
; NAME: NEULIST.*5000.SRC 
INIT MIT SYS 5*4096 
5 MIT F7 AN 
-} MIT Fl AUSSCHALTEN 

RUECKT FOR..NEXT-SCHLEIFEN EIN 
UND FOR..NEXT AUF DRUCKER FETT 

-- 

-.EQ ZAEHLER“ *FE;ANZAHL FOR-SCHACHTELUNGEN 

-.EQ CHROUT = *FFD2;AUSGABE ZEICHEN 

-.EQ STROUT = *AB1EjAUSGABE STRING 

-.EQ IRQVEC = *0314;VEKTOR AUF IRQ 

-.EQ IRQ = *EA31;IRQ 

-.EQ CTRL = *028D ;FLAG FUER CTRL 

-.EQ KEY = *00CB ;LETZTE TASTE 


-.BA *5000 ;STARTADRESSE 


—;INTERRUPT AUF EIGENE ROUTINE VERBIEGEN 


300 

— 

SEI 



310 

- 

LDA 

#<(START) 


320 

— 

STA 

IRQVEC 

;LO-BYTE 

330 

— 

LDA 

4>(START) 


340 

— 

STA 

IRQVEC-*-1 

;HI-BYTE 

350 

- 

CLI 



360 


RTS 




I 




364 

-START 

LDA 

KEY 

;WELCHE TASTE? 

366 

-F7 

CMP 

#3 

;F7 ? 

367 

- 

BNE 

Fl 

; NEIN 

368 

— 

JSR 

LISTNEU 

; NEUE LISTROUTINE 

369 

-Fl 

CMP 

44 

; Fl ? 

370 


BNE 

OLDIRQ 

; NEIN 

371 

- 

JSR 

LISTALT 

;ALTE LISTROUTINE 

372 

—OLDIRQ JMP 

IRQ 


373 

“5 





"i — 




380 

-i 




390 

-i 

LISTVEKTOR AUF EIGENE LISTROUTINE 

395 


START BEI LABEL"LIST" 

4U0 

-LISTNEU LDA 

4<(LIST) 


410 

- 

STA 

*0306 

;LISTVEKTOR LO 

420 

- 

LDA 

4>(LIST) 

;HI-BYTE 

430 

- 

STA 

*0307 


440 

— 

LDA 

40 


450 

- 

STA 

ZAEHLER 


452 

- 

LDA 

4*F6 

;BLAUER 

453 

— 

STA 

*D020 

;RAHMEN 

460 

- 

RTS 



470 

-1 




480 

-« 





or 


485 

486 
490 
500 
510 
520 

522 

523 
530 
540 
1000 
1010 
1020 
1160 
1170 
1180 
1182 
1190 


ALTEN LISTVEKTOR (A71A) 
WIEDERHERSTELLEN MIT Fl 
-LISTALT LDA 4*1A 
STA *0306 
LDA 4*A7 
STA *0307 
LDA #*FB 
STA *D020 
RTS 

- ; ••*•*••••••»•••••••»»•••••••*•«» 

- 5 . 1 - 11,4 

PHA 

JSR NORMDRUCK 
CMP #*82 
BNE LI 1 
DEC ZAEHLER 
JSR FETTDRUCK 
CPY 44 


-LIST 


J GRAUER 
;RAHMEN 


NEXT? 

NEIN 

N=N-1 


—LI 1 


;ZEILENANFANG? 


1200 

— 

BNE 

LI2 


1205 

- 

JSR 

BLANKOUT 


1207 

- 

JSR 

BLANKOUT 


1210 

—LI2 

CMP 

4*81 

3 FOR ? 

1220 

— 

BNE 

LI OUT 


1222 

- 

JSR 

FETTDRUCK 


1240 

— 

INC 

ZAEHLER 

;N=N+1 

1330 

-LIOUT 

PLA 



1340 

- 

JMP 

*A71A 

; LIST 

1350 

1360 

1500 

-1 




"5 -- 

-FETTDRUCK 

PHA 



1510 

— 

LDA 

*9A 

;CMD = 4? 

1520 

— 

CMP 

44 


1530 

- 

BNE 

FEOUT 

; NEIN 

1540 

— 

TYA 



1550 

—• 

PHA 



1560 

— 

LDA 

#< (FETT) 

;DRUCKER 

1570 

- 

LDY 

4>(FETT) 

; AUF 

1580 

- 

JSR 

STROUT 

;FETTDRUCK 

1590 

— 

PLA 



1600 

- 

TAY 



1610 

-FEOUT 

PLA 



1620 

- 

RTS 



1630 

1640 

-FETT 

.BY 

27,"E“,0 

; FETTDRUCK 

l 




m 

-NORMDRUCK 

PHA 

LDA 

*9A 

;CMD4? 

1720 

- 

CMP 

44 


1730 

— 

BNE 

NOOUT 

3 NEIN 

1740 

— 

TYA 



1750 

- 

PHA 



1760 

— 

LDA 

4<(NORM) 

;FETTDRUCK 

1770 

- 

LDY 

4>(NORM) 

iOUS 

1780 

— 

JSR 

STROUT 


1790 

— 

PLA 



1800 

- 

TAY 



1810 

-NOOUT 

PLA 



1820 

- 

RTS 



1830 

1840 

-NORM 

.BY 

27,"F",0 

;FETTDRUCK AUS 

i 




2000 

p 




2010 

-BLANKOUT 

LDX 

ZAEHLER 

SAUSGABE N BLANKS 

7015 

- 

BPL 

BL 1 

i WENN < 120 

2016 

— 

INC 

ZAEHLER 


2017 

- 

BMI 

BLANKOUT 

;WENN >128 

2020 

—BL1 

BEQ 

BLOUT 


2030 

- 

JSR 

BLANK 

5 LEERZEICHEN 

2050 

— 

DEX 



2060 

- 

JMP 

BL1 


2070 

2080 

2090 

-BLOUT 

RTS 



1 




2100 

-CR 

PHA 


3 ZEILENVORSCHUB 

2110 

— 

LDA 

413 

3 RETURN 

2120 

— 

JSR 

CHROUT 


2130 

- 

PLA 



2140 

2150 

- 

RTS 



5 — — 




2160 

-» 




2170 

-BLANK 

PHA 


3LEERZEICHEN 

2180 

— 

LDA 

4” “ 


2190 

2200 


JSR 

PLA 

CHROUT 


2210 

- 

RTS 



2220 

97701 

-» 





* 




9999 

-.EN 





READY. 

Listing 2. Der Assembler-Quelltext zu »Schleifen mit 
Format« 
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einzuschalten, gilt für Epson-kompatible Drucker (Zeile 1630 
und Normalschrift Zeile 1830). Sie können diese Routinen 
natürlich entfernen, es ist Geschmacksache, die FOR..NEXT- 
Schleife auch noch fettgedruckt zu sehen (Listing 1). 

Hinweise zum Abtippen 

Listing 2 ist der Quelltext oder, wie man auch sagt, der 
Sourcecode der neuen Listroutine. Wenn Sie wollen, können 
Sie ihn mit Hypra-Ass eingeben. Das hat den Vorteil, daß Sie 
das Programm weiterentwickeln oder verändern können. 
Wollen Sie das Programm lediglich benutzen, tippen Sie am 
besten Listing 3 mit dem MSE ab. Gestartet wird mit SYS 
5 ’ 4096 oder SYS 20480. Mit F7 ist die neue LIST-Routine 
aktiv, mit Fl abgeschaltet. Auch während des LISTens kann 
umgeschaltet werden. Eine korrekte FOR..NEXT - Schleife 
wird daran erkannt, daß sich FOR und NEXT auf dergleichen 
Höhe befinden (Listing 1). 

Wenn Sie das Programm etwas genauer analysieren, dürfte 
es nicht schwerfallen, eigene Wünsche zu verwirklichen. 

(H.Zwartscholten/gk) 


10 PRINTI:PRINTA 

20 F0RI=1T04:PRINT"LIST TEST NEXTI 
30 A-l 
40 B=>2 

50 FORI“ITQ2 
55 NEXTI 
60 D=4:E*5 
70 F0RI-1T02 
00 FOR J *1T02 

90 I*=3 

91 NEXTJ 

92 A=5 

93 NEXTI 

100 FORI = 1TO20:PRINT I;s NEXTI 

110 A=4:B»5 

120 FORJ=1T02 

130 X=X+2:Z-A 

140 PRINT X;"ALFA=5:3" 

150 NEXTJ 

1100 FORI“1TO20: PRINTI;:NEXTI 
1110 A=4:B=5 
1120 F0RJ-1T02 

1130 X=X+2iZ=A 

1131 F0R0-1T02 

1132 X=X+2:Z=A 

1133 PRINTX;"ALFA=5t 3" 

1134 IFA*3THENB=4:C=5 
1136 NEXTO 

1140 PRINTX; H ALFA»5:3" 

1150 NEXTJ 

READY. 

Listing 1. Ein-Beispielprogramm 


PROGRAMM : NEULIST.OBJ *5 5000 50BB 


5000 

s 

78 

A9 

0D 

8D 

14 

03 

A9 

50 

E2 

5008 

I 

8D 

15 

03 

58 

60 

A5 

CB 

C9 

E2 

5010 

: 

03 

D0 

03 

20 

20 

50 

C9 

04 

F4 

5018 

i 

DO 

03 

20 

34 

50 

4C 

31 

EA 

FA 

5020 

: 

A9 

44 

BD 

06 

03 

A9 

50 

BD 

E9 

5028 

i 

07 

03 

A9 

00 

85 

FE 

A9 

F6 

00 

5030 

B 

BD 

20 

D0 

60 

A9 

1A 

BD 

06 

BB 

5038 

1 

03 

A9 

A7 

BD 

07 

03 

A9 

FB 

D3 

5040 

S 

8D 

20 

D0 

60 

4B 

20 

7F 

50 

42 

5048 

1 

C9 

82 

D0 

05 

C6 

FE 

20 

68 

DD 

5050 

s 

50 

C0 

04 

D0 

06 

20 

96 

50 

78 

5058 

1 

20 

96 

50 

C9 

81 

D0 

05 

20 

04 

5060 

8 

68 

50 

E6 

FE 

68 

4C 

1A 

A7 

2A 

5068 

8 

48 

A3 

9A 

C9 

04 

DO 

0B 

98 

87 

5070 

8 

48 

A9 

7C 

A0 

50 

20 

IE 

AB 

96 

5078 

8 

6B 

AB 

68 

60 

1B 

45 

00 

48 

C7 

5080 

8 

A5 

9A 

C9 

04 

D0 

0B 

98 

48 

BE 

5088 

8 

A9 

93 

A0 

50 

20 

IE 

AB 

68 

9F 

5090 

S 

AB 

68 

60 

1B 

46 

00 

A6 

FE 

E5 

5098 

8 

10 

04 

E6 

FE 

30 

F8 

F0 

07 

E0 

50A0 

3 

20 

B0 

50 

CA 

4C 

9E 

50 

60 

41 

50A8 

I 

48 

A9 

0D 

20 

D2 

FF 

68 

60 

9C 

50B0 

: 

48 

A9 

20 

20 

D2 

FF 

68 

60 

68 


Listing 3. Der Objectcode zu »Schleifen mit Format«. 
Benutzen Sie zur Eingabe den MSE. 


ÜberLISTet 

Mit dieser Betriebssystemerweiterung 
wird das Schreiben von Basic-Programmen 
zum Vergnügen. Scrolling aufwärts und 
abwärts sowie einige Zusatzfunktionen 
machen es möglich. 

D ieses Maschinenprogramm (eventuell in Verbindung 
mit einem Toolkit) macht das Editieren von Basic- 
Texten fast so komfortabel wie mit einem guten Text¬ 
verarbeitungssystem. Man kann damit nämlich nicht nur, wie 
von vielen teuren Basic-Erweiterungen bekannt, das Listing 
mit den Cursortasten hinauf und hinunterscrollen, sondern 
auch: 

- andere Erweiterungen verwenden 
- einzelne Zeilen löschen und einfügen 
- eine Zeile bis beziehungsweise ab Cursorposition 
löschen 

- eine ganze Zeile mit Leerzeichen füllen 
- einen Zeilenaussehnitt beliebig oft an andere Positionen 
kopieren. 

Dies alles geschieht auf einfachen Tastendruck und ohne 
Absturzgefahr. 

Um mit möglichst vielen anderen Programmen Zusammen¬ 
arbeiten zu können, liegt das zirka 1300 Byte lange Pro¬ 
gramm im Bereich S7A00 - 7F20 (Hexadezimal). Dazu muß 
das Ende des Basic-Bereichs gegebenenfalls herabgesetzt 
werden (POKE 56,122:POKE 55,0: NEW). Mit »SYS 31232« 
wird die ti Weiterung in den Interrupt eingehängt und ist dann 
sofort einsatzbereit. Es wird nur der IRQ-Vektor verändert. 

Das Listing läßt sich im Direktmodus mit Hilfe der Cursor¬ 
tasten fließend hoch- und runterscrollen. Die Programm¬ 
zeilen können dabei natürlich wie gewohnt geändert und mit¬ 
tels der RETURN-Taste übernommen werden. Stößt man 
jedoch mit dem Cursor gegen den oberen beziehungsweise 
unteren Bildschirmrand, wird der Inhalt des Bildschirms in die 
entsprechende Richtung gescrollt und die nächste Zeile aus¬ 
gegeben. 

Das Programm geht dabei so vor: Es sucht die am nächsten 
zum Cursor stehende Zeilennummer. Steht keine Zahl in der 
ersten Spalte, wird normal gescrollt (auch nach unten). Ist die 
gefundene Zahl größer gleich 64000, wird der Cursor auf 
diese Zeile gesetzt und das Scrolling verhindert. Andernfalls 
wird die nächsthöhere beziehungsweise nächstniedrigere 
Zeile aus dem Basic-Listing gesucht, der Bildschirm in die 
richtige Richtung gescrollt und die gefundene Zeile gelistet. 

Die Erweiterung arbeitet nur im Direktmodus, das heißt 
wenn in einem Programm ein »INPUT«-Befehl oder ähnliches 
vorkommt, verhält sich der Bildschirm normal. 

Zusätzlich bietet dieses Programm noch einige andere 
Möglichkeiten, die das Editieren erleichtern. Diese Funktio¬ 
nen werden durch gleichzeitiges Drücken der Control-Taste 
und einer Buchstabentaste aufgerufen. Zwischen zwei 
Anführungszeichen werden diese »Control-Codes« jedoch 
normal ausgegeben. 

CTRL-i Einfügen (Insert) einer Leerzeile. Der untere Teil des 
Bildschirms wird nach unten geschoben. Dies dient 
zur Übersichtlichkeit, wenn eine neue Basic-Zeile 
eingegeben werden soll, da keine anderen Zeilen 
überschrieben werden brauchen. 

CTRL-d Löschen (Delete) einer Zeile mit Nachrücken des 
unteren Bildschirmteils. Auch dies dient der Über¬ 
sichtlichkeit. Soll eine Zeile gänzlich aus dem Listing 
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gelöscht werden, muß man (wie üblich) die »leere« 
Zeilennummer und RETURN eingeben. 

CTRL-I Füllen einer Zeile (Line) mit Leerzeichen. Nach den 
drei letztgenannten Funktionen springt der Cursor 
an den Anfang der Zeile. 

CTRL-b löscht die Zeile bis ausschließlich Cursorposition 
CTRL-a löscht die Zeile ab einschließlich Cursorposition 
CTRL-u setzt Cursor in die linke untere Ecke 
CTRL-k Kopieren eines Zeilenausschnitts. Der Bereich wird 
durch Invertieren angezeigt und kann mit der 
Cursor-right/left Taste vergrößert oder verkleinert 
werden. Bei Betätigen der RETURN- oder der STOP- 
Taste wird der vorher invertierte Bereich gespei¬ 
chert. 

CTRL-w schreibt (Write) vorher markierten Bereich wieder 
auf den Bildschirm. 

Die Erweiterung läßt sich durch Normalisieren des IRQ- 
Vektors (zum Beispiel über die Tastenkombination RUN/STOP- 
RESTORE) oder CTRL-X (exit) abschalten. 

Starten von »Listmaster«: Tippen Sie das Listing mit dem 
MSE ab und speichern Sie es auf Disk oder Kassette. Bei 
Bedarf laden Sie es absolut (das heißt mit ,8,1 oder ,1,1) und 
geben ein: 

POKE 56,122: POKE 55,0:NEW 
Dies ist wie gesagt notwendig, um das Ende des Basic- 
Bereichs herabzusetzen und das Maschinenprogramm vor 
der Zerstörung durch Basic-Variablen zu schützen. 

Noch ein paar Informationen zu »Listmaster«: Er arbeitet mit 
anderen Interrupt-Programmen zusammen, da die Routine, 


auf die der IRQ-Vektor ($0314) vor der Initialisierung von 
»Listmaster« zeigte, als Unterprogramm aufrufen wird. Man 
darf also keinesfalls zweimal nacheinander »SYS 31232« ein¬ 
geben. Das würde einen Selbstaufruf und somit Systemab¬ 
sturz bewirken. Außerdem benötigt »Listmaster« einige 
Direkteinsprünge ins Betriebssystem, so daß es bei stark 
geänderten Varianten desselbigen zu Fehlfunktionen kom¬ 
men kann. 

An Speicheradressen verändert »Listmaster« nur einige 
wenige, die auch vom Standardbasic oder vom normalen Bild¬ 
schirmeditor gebraucht werden. Es sind dies im Wesentli¬ 
chen: 


$07 

;Zwischenspeicher 

$14/15 

;Zwischenspeicher 

$22/23 

;Suchzeiger 

$5F/60 

;Suchzeiger 

$62/63 

Zwischenspeicher 

$AC/AD 

Zeiger für Scrolling 

$AE/AF 

Zeiger für Scrolling 

$B0 

Zwischenspeicher 

$CC 

;Flag für Cursor blinken 

$D1/D2 

Zeiger auf aktuelle Zeile 

$D9-F2 

Tabelle Bildschirmzeilen 

$F3/F4 

Zeiger auf Farbram 

$0314/15 

;lnterruptvektor 


Die Daten für den k-Befehl werden unmittelbar hinter dem 
»Listmaster«-Programm aufbewahrt (maximal 80 Zeichen). 

(Matthias Meyer/tr) 
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60 

c2 

7ea8 

z 

78 

a9 

11 

Bd 

14 

03 

a9 

7a 

B0 

7eb0 


Bd 

15 

03 

60 

aS 

cf 

f0 

0c 

49 

7eb8 

8 

a5 

ce 

aa 

87 

B' 1 

All 

00 

84 

Bf 

7ec0 

Z 

cf 

20 

13 

aa 

60 

f «* 

00 

00 

c7 

7ec0 

: 

00 

110 

00 

00 

7a 

,1 

24 

00 

92 

7ed0 


00 

00 

11 

91 

0c 

09 

04 

02 

64 

7ed8 


01 

15 

0b 

17 

18 

0a 

7b 

96 

f 7 

7ee0 

» 

7a 

aS 

7b 

bl 

7b 

d4 

7b 

2f 

ec 

7**8 

8 

7c 

43 

7c 

52 

7c 

5b 

7c 

a3 

cc 

7ef 0 

8 

7c 

13 

7d 

00 

ff 

00 

00 

ff 

55 


Listing. Zur Eingabe des »Listma¬ 
sters« verwenden Sie bitte den MSE 
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C 64 


Tips und Tricks 


Drei 

»Quickies« 

Einzeiler lassen sich nicht nur in Basic, 
sondern auch in Assembler schreiben! 
Tippen Sie unsere drei »Quickies« ein, und 
lassen Sie sich überraschen, mit welchen 
Tricks da gearbeitet wurde. 


Zum Aufbau des Programms (Listing 1a und 1b) 

Ein PRINT-Befehl schreibt das Maschinenprogramm in den 
Bildschirmspeicher, wo es dann mit SYS 1024 gestartet wird. 

Das Maschinenprogramm setzt zunächst das Interruptflag, 
um einen Interrupt durch den CIA 1 zu unterbinden. Das ist 
nötig, da der Computer sonst abstürzen würde, wenn das 
Zeichen-ROM eingeschaltet wird. Danach wird das Zeichen- 
ROM eingeschaltet. Jetzt wird nach der nötigen Parameter¬ 
übergabe (alter Blockanfang, altes Blockende, neues Block¬ 
ende) die Blockverschieberoutine des Interpreters aufgeru¬ 
fen. Dann wird der Zeichengenerator wieder abgeschaltet 
und der Zeiger auf den Zeichengenerator entsprechend ge¬ 
ändert (Hexadezimal D018, Bit 1-3). Nach dem Löschen des 
Interruptflags erfolgt der Rücksprung ins Basic. 


D ie beiden Basic-Programme »Zeichensatz ändern« 
und »invertierte Grafik« müssen Sie mit dem MSE ein¬ 
geben. Dies hat zwei Gründe: Erstens einmal lassen 
sich dadurch Tippfehler leichter ausschalten und zweitens 
wäre die Eingabe über Basic sehr mühsam. Wenn Sie die 
»Einzeiler« auf Diskette gespeichert haben, können Sie sie 
ohne weiteres wie normale Basic-Listings laden, listen und 
mit »RUN« starten. 


Stop! 


1 fori = 828to839:reada:pokei,a:next:data72,173,141,2, 
201,1,240, 249,104,76,202,241 
Einschalten poke806,60:poke807,3 
Ausschalten poke 806,202:poke807,241 
In diesem kleinen Maschinenprogramm wird während des 
Listens eines Programms die Shift-Taste abgefragt und, wenn 
diese gedrückt ist, gewartet. Sonst wird zur Adresse 61898 
(Ausgabe eines Zeichens) gesprungen. Durch die zwei 
POKEs wird der Ausgabe-Vektor ($F1CA) auf den Kassetten¬ 
puffer nach 828 »verbogen«. 


828 

829 

832 

834 

836 

837 


pha : Akku sichern 

Ida 653 : Flag für SHIFT 

cmp#1 : gedrückt? 

beq 829 : ja, dann warten 

pla : Akku wiederherstellen 

jmp 61898 : zur Ausgaberoutine 


(Ulrich Pasch/tr) 


Zeichensatz ändern 


Dieser Einzeiler verschiebt den Zeichensatz in den Speicher¬ 
bereich Hexadezimal $2000 - $3000. Damit können jeder¬ 
zeit beliebige Zeichen geändert werden; zum Beispiel, um 
Sonderzeichen zu definieren. 


$0400 

78 


SEI 

$0401 

A9 

B3 

LDA#$B3 

$0403 

85 

01 

STA $01 

$0405 

A9 

00 

LDA # $00 

$0407 

AO 

DO 

LDY # $D0 

$0409 

85 

5F 

STA $5F 

$040B 

84 

60 

STY $60 

$040D 

AO 

EO 

LDY #$E0 

$040F 

85 

5A 

STA $5A 

$0411 

84 

5B 

STY $5B 

$0413 

AD 

30 

LDY #$30 

$0415 

85 

58 

STA $58 

$0417 

84 

59 

STY $59 

$0419 

20 

BF 

A3 JSR $A3BF 

$041C 

A9 

B7 

LDA#$B7 

$041E 

85 

01 

STA $01 

$0420 

A9 

18 

LDA#$18 

$0422 

8D 

18 

DO STA $D018 

$0425 

58 


CLI 

$0426 

60 


RTS 


Interruptflag setzen 
;Zeichen-ROM ein 


;Alter Blockanfang Low-Byte 
;Alter Blockanfang Hlgh-Byte 

;Altes Blockende Low-Byte 
;Altes Blockende High-Byte 

;Neues Blockende Low-Byte 
;Neues Blockende High-Byte 
;Blockverschieberoutine 

;Zeichen-ROM aus 

;Zeiger für Zeichengenerator 

auf $2000 
;lnterruptflag löschen 


Listing 1b. 

Der Quelltext zum geänderten Zeichensatz 


(Peter Sajonez/tr) 


Invertierte Grafik 


Dieser Einzeiler (Listing 2) invertiert eine im Speicher ste¬ 
hende Grafik. Gegenüber dem Einzeiler, der in der 64’er, 
3/85 veröffentlicht wurde, braucht er zur Ausführung nur den 
Bruchteil einer Sekunde. Er besteht im wesentlichen aus 
einer kleinen Maschinenroutine, die mittels einem PRINT- 
Befehl in den Bildschirm geschrieben und mit SYS 1024 
gestartet wird. 

(Frank Meister/tr) 




Programm 

i ehr- 

-ram 



0801 0857 

0801 

: 

4b 

08 

bi 

00 

99 

22 

93 

b8 

fb 

0809 

3 

12 

29 

33 

45 

92 

41 

12 

29 

f 3 

081 1 

I 

92 

40 

12 

20 

d0 

45 

92 

df 

Bd 

0819 

: 

12 

44 

92 

a0 

12 

20 

a0 

45 

35 

0821 

B 

92 

da 

12 

44 

92 

db 

12 

20 

be 

0829 

8 

92 

30 

12 

45 

92 

dB 

12 

44 

cl 

0831 

8 

92 

d9 

20 

12 

3f 

23 

29 

37 

la 

0839 

1 

45 

92 

41 

12 

29 

92 

50 

12 

07 

0841 

s 

4d 

92 

58 

12 

d0 

92 

dB 

a0 

76 

0849 

I 

22 

00 

55 

08 

02 

00 

9 e 

31 

bf 

0851 

8 

30 

32 

34 

00 

00 

00 

Cf 

ff 

e7 


Listing 1a. Das Basic-Programm zum geänderten 
Zeichensatz geben Sie bitte mit dem MSE (!) ein. Wenn 
Sie das Programm listen, werden Sie sehen warum! 


Programm i grafik invers BB01 0S4e 


0801 3 39 08 0a 00 99 22 93 12 de 
0809 3 29 bf 45 bd 20 92 20 12 5«, 
0811 3 29 92 40 12 45 bb 44 bc 92 
0819 3 29 92 c3 12 2a 29 92 40 75 
0821 s 12 28 31 bb 92 c4 12 bd le 
0829 3 51 bb c8 d0 b7 92 12 a6 4a 
0831 3 bc a4 bc d0 bl 92 22 00 cl 
0839 3 4c 08 14 00 97 31 30 35 bd 
0841 3 37 2c 39 36 3a 9e 31 30 61 
0849 s 32 34 00 00 00 b3 a9 b9 4d 


Listing 2. Auch die »invertierte Grafik« geben Sie bitte 
mit dem MSE ein 
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Tips und Tricks 


C 64 


INPUT mit Pfiff 


Einen INPUT-Befehl, der keine Wünsche 
mehr offenläßt, stellen wir Ihnen mit die¬ 
sem Programm vor. Anhand des ausführ¬ 
lich dokumentierten Assembler-Listings 
können Sie zum Beispiel lernen, wie man 
eigene Befehle in den Interpreter einbaut. 


E xinput 64« löst all Ihre Probleme, die Sie jemals mit dem 
INPUT-Befehl des Basic V2 gehabt haben. Mit dieser 
kleinen Erweiterung haben Sie ein Werkzeug in der 
Hand, das alle seitenlangen GET-Eingabeschleifen verges¬ 
sen läßt. »Exinput 64« beschränkt sich nicht auf 80 Zeichen; 
Sie haben, wenn Sie wollen, die volle Länge eines Strings 
(255 Zeichen) zur Verfügung. Das Eingabefeld wird dabei 
durch eine Linie sichtbar gemacht. Sämtliche Zeichen kön¬ 
nen übernommen werden - auch Kommata und Doppel¬ 
punkte. Natürlich kann man die Eingabe auch auf bestimmte 
Tasten beschränken. 

Eingabehinweis: Bitte geben Sie Listing 1 mit dem MSE ein, 
und speichern Sie es mit einem beliebigen Namen. 

Programmbeschreibung 

Die Erweiterung steht im Speicher von $C000 bis $C51D, 
wird mit »LOAD "Name”,8,1« geladen, mit »SYS 49152« gestar¬ 
tet und muß nur nach einem Reset wieder neu initialisiert wer¬ 
den. Die Routine wurde über einen Zeiger aus der Zero-Page 
des C 64 in das normale Basic eingebunden. 

Dies ist der Zeiger für »Basic-Befehlsadresse holen« in den 
Adressen $308/$309 (dezimal 776/777). Der Zeiger in die¬ 
sen beiden Speicherstellen wird von $A7E4 auf den Anfang 
der Befehlserweiterung, in diesem Fall auf $C00B geändert. 
Dies wird beim Start des Programms durch die vier ersten 
Assemblerbefehle gemacht. Danach springt das Programm 
wieder ins Basic zurück und die beiden zusätzlichen »Basic- 
Befehle« stehen zum sofortigen Gebrauch im Basic-Programm 
zur Verfügung (siehe auch Kasten). 

Die Routine übernimmt das selektieren der neuen Befehls¬ 
worte. Wird ein INPUT- oder PRINT-Befehl gefunden, wird auf 
das Erkennungszeichen der neuen Befehle (>) geprüft. Ist 
dieses Zeichen vorhanden, so wird in die eigene Routine ver¬ 
zweigt, ansonsten wird die Routine des Basic-Interpreters auf¬ 
gerufen. 

Der INPUT-Befehl sieht auf den ersten Blick vielleicht etwas 
kompliziert aus, ist es aber nach ein wenig Ausprobieren nicht 
mehr. 

INPUT> Zeile, Spalte, Länge, Farbe, Text, Code, Zeichen, 
Variable 


Erklärung der Parameter 

Zeile: Ibis25 (oderVariable) 

Spalte: 1 bis 40 (oder Variable) 

Länge: 1 bis 255 (oder Variable) 

Farbe: 0-15 (Farbe des Textes und des 

Eingabefeldes) 

Text: Beliebiger Text zwischen * ", erscheint vor dem 

Eingabefeld 

Code: - ’Ä = Alle Zeichen bei der Eingabe erlaubt 

- ’B’ = Nur Buchstaben, Leerzeichen,und 
für Abkürzung und Trennung 


Erklärungen zu oft benötigten ROM-Routlnen und zur 

Erstellung der Variablen. 

CHRGET: 

Diese Routine steht ab SE3A2 im Betriebssystem 
und wird beim Einschalten des Computers nach 
$0073 in die Zero-Page kopiert. Der Zeiger In 
$007A/$007B zeigt immer auf das aktuelle Zeichen 
im Basic-Text und beim Ansprung der Routine wird 
jeweils das nächste Zeichen in den Akku geholt. 

CHRGOT: 

Dies ist nur eine andere Einsprungadresse der 
CHRGET-Routine. Hier wird das aktuelle Zeichen in 
den Akku geholt und die Flags wieder gesetzt, ohne 
den Zeiger in $7A/$7B vorher zu erhöhen. 

CHKCOM: 

Hier handelt es sich um eine Baslc-Routine, die das 
laufende Zeichen prüft. Beim Einsprung In 
»CHKCOM« ($AEFD) wird auf ein Komma im Basic- 
Text geprüft, bei $AEF7 auf »Klammer zu« und bei 
$AEFA auf »Klammer auf«. Stimmen die Zeichen 
nicht überein, wird automatisch ein »Syntax Error« 
ausgegeben. 

Vor dem Rücksprung liest die Routine gleich das 
nächste Zeichen aus dem Basic-Text in den Akku, so 
daß dies beim Weiterführen des Programms entfallen 
kann. 

GETBYT: 

Diese Basic-Routine holt eine Zahl (Byte 0-255) in 
das X-Register. Beim Einsprung in $B79B wird 
zuerst durch »JSR $0073« das nächste Zeichen 
geholt (CHRGET). Hat man vorher jedoch mit »JSR 
$AEFD« auf ein Komma geprüft (CHKCOM), darf 
man erst bei $B79E einspringen, weil das nächste 
Zeichen sich bereits im Akku befindet. 

GETVAR: 

Diese Routine holt sich den Variablennamen aus dem 
Basic-Text und sucht diese Variable dann im Spei¬ 
cher. Wenn sie nicht vorhanden ist, wird sie angelegt. 
Danach stehen dann in $0D das Typflag dieser Varia- 


bien (String=$FF/Zahi=$00), im Akku das Low- 
Byte und im Y-Register das High-Byte der Adresse, 
an der der Stringdescriptor beginnt. 

FRESTR: 

Mit dieser Routine wird die weitere Auswertung der 
mit »GETVAR« eingelesenen Variablen vorgenom¬ 
men. Nachher stehen im X-Register das Low-Byte 
der Adresse, im Y-Register das High-Byte der 
Adresse und im Akku die Länge des Strings. 

STRPOI: 

Hiermit berechnet man den Stringzeiger und reser¬ 
viert gleichzeitig Speicher für den String am Ende 
des Stringspeichers. Die Länge des Strings muß vor¬ 
her im Akku stehen, wo sie sich nach »FRESTR« ja 
auch befindet. Man findet dann in $61 die Länge des 
reservierten Bereichs, in $62 das Low-Byte der 
Adresse und in $63 das High-Byte der Adresse des 
reservierten Bereichs. 


- ’Z’ = Nur Ziffern, Minuszeichen und Dezimal¬ 
punkt 

Zeichen: Einzelne Ziffern, Buchstaben oder jedes 

andere Zeichen zwischen " ", das bei der Ein¬ 
gabe erlaubt ist. (< 30 Zeichen) zum Beispiel 
Menüpunktabfrage zwischen 1 und 4: 

INPUT >20,5,1,1, "Bitte wählen: ",Z,"1234", 
X$ 

Variable: Muß eine String-Variable sein. 

Einziger Nachteil: Ziffern müssen zum Rech¬ 
nen mit VAL umgewandelt werden. 

Ganz einfach ist der Befehl, weil man verschiedene Para¬ 
meter einzeln oder zusammen weglassen kann, und zwar 
»Farbe«, »Text« und »Zeichen«. Dann bleibt zum Beispiel noch 
übrig: 

INPUT >10,3,15,B,A$ 

Die Länge des Eingabefeldes wird durch eine Linie mar¬ 
kiert, dessen einzelnes Zeichen (CHR$(100)) an der 
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Tips und Tricks 


Adresse 49244 steht und durch »POKE 49244, CHR$- 
Code« beliebig geändert werden kann, zum Beispiel 32 
(Leerzeichen), 46 (Punkt) etc. 

Wird eine unerlaubte Taste gedrückt, oder soll der Cursor 
die Feldgrenze überschreiten, ertönt zur Warnung ein Pieps¬ 
ton. Dieser kann mit »POKE 50340,0« ausgeschaltet und mit 
»POKE 50340,65« wieder eingeschaltet werden. 

Am Ende des Eingabefeldes wird das letzte Zeichen bei 
weiteren Eingaben überschrieben. 

Editier-Tasten 


CRSR Left 

CRSR Right 

CRSR Up 

CRSR Down 

INST 

DEL 

HOME 

CLR/HOME 

RETURN 

SHIFT/RETURN 


(Nur bei mehreren Zeilen) 
(Nur bei mehreren Zeilen) 


übernimmt den Feldinhalt ohne Leer¬ 
stellen am Ende 

übernimmt auch die Leerstellen, also 
das ganze Feld 


Ob mit oder ohne Leerstellen kann bei den beiden Tasten 
auch selbst bestimmt werden. 

Für RETURN: »POKE 49595, 182(ohne)/208(mit)« 

Für SHIFT/RETURN: »POKE 49602, 208(mit)/182(ohne)« 
F8 läßt einen eventuellen Inhalt der 

Variablen im Eingabefeld erschei¬ 
nen, jedoch nur bis zur Länge des 
Feldes selbst 

Der zweite Befehl der Erweiterung betrifft den PRINT-Befehl. 
Die Syntax des PRINT-Befehls 
PRINT > Zeile, Spalte, Farbe, String 
Hier kann die Farbe weggelassen werden, der zu druckende 
String muß zwischen " " stehen wie beim normalen PRINT- 
Befehl und jeder Parameter kann durch eine Variable ersetzt 
werden. 

Mit den Angaben der im Kasten genannten Routinen kann 
man leicht eine Variable erstellen. Man kopiert nur die 
Adresse des reservierten Bereichs und die Länge in den 
Stringdescriptor und den Text der Variablen schreibt man in 
den reservierten Bereich. Alles andere erfahren Sie, wenn 
Sie das Programm selbst durchlesen (Listing 2). 

(Guy Mootz/og) 


PROGRAMM 

i EX INPUT 64 


C000 C51D 

C1A0 


E4 

FF 

F0 

F7 

48 

E6 

CC 

A4 

F7 

C360 


C0 

A9 

11 

20 

16 

E7 

AE 

58 

49 












C1A8 


D3 

Bl 

Dl 

29 

7F 

91 

Dl 

A5 

04 

□368 

: 

C0 

CA 

EC 

55 

C0 

D0 

03 

EE 

F0 












C1B0 


91 

C9 

7F 

F0 

41 

68 

C9 

0D 

BC 

C370 

: 

55 

C0 

4C 

9B 

CI 

48 

AC 

55 

68 












C1BB 


D0 

03 

4C 

B6 

C3 

C9 

SD 

D0 

56 

C378 

: 

C0 

F0 

0E 

CC 

58 

C0 

D0 

01 

9E 

C000 

2 

A9 

0B 

A0 

□0 

BD 

08 

03 

BC 

AD 

C1C0 

: 

03 

4C 

D0 

C3 

C9 

14 

F0 

37 

05 

C380 

3 

BB 

A9 

9D 

20 

D2 

FF 

88 

D0 

39 

C008 


09 

03 

60 

A2 

9C 

8 E 

00 

D4 

E7 

CI CS 

: 

C9 

9D 

F0 

33 

C9 

ID 

F0 

38 

BC 

C388 

8 

F8 

68 

C9 

93 

F0 

0A 

C9 

FF 

20 

C010 


A2 

48 

BE 

01 

D4 

A2 

00 

BE 

1A 

C1D0 

: 

C9 

94 

F0 

28 C9 

91 

2A 

66 

C390 

3 

F0 

03 

4C 

96 

CI 

4C 

C6 

C4 

0B 

C01Q 


02 

D4 

BE 

04 

D4 

A2 

08 

BE 

48 

CI DB 

: 

C9 

13 

F0 

29 C9 

BC F«. 

2B 

A7 

C398 

3 

AC 

58 

C0 

AD 

5C 

C0 

C9 

64 

12 

C020 

: 

03 

D4 

A2 

0A 

8 E 

05 

D4 

A2 

21 

C1E0 

: 

C9 

85 

B0 

03 

4C 

EF 

CI 

C9 

D7 

C3A0 


D0 

02 

A9 

A4 

20 

D2 

FF 

88 

1A 

C028 


64 

BE 

06 

D4 

A2 

0F 

BE 

18 

FD 

C1EB 


BC 

90 

0B 

C9 

93 

F0 

16 

C9 

65 

C3A8 


D0 

Fl 

A9 

13 

48 

AC 

58 

□0 

0A 

C030 

: 

D4 

20 

73 

00 

C9 

85 

F0 

0 D 

98 

C1F0 


11 

D0 

1B 

4C 

3A 

C3 

20 

A3 

43 

C3B0 

: 

4C 

81 

C3 

4C 

96 

CI 

AC 

58 

12 

C038 

: 

C9 

99 

F0 

06 

20 

79 

00 

4C 

31 

C1F8 


C4 

4C 

9B 

CI 

4C 

CA 

C2 

4C 

C0 

C3B8 

3 

C0 

4C 

C0 

C3 

A9 

20 

91 

FD 

25 

C040 

3 

E7 

A7 

4C 

40 

C4 

20 

73 

00 

D3 

□200 

z 

73 

C2 

4C 

14 

C3 

4C 

75 

C3 

66 

C3C0 

3 

BB 

C0 

FF 

F0 

07 

Bl 

FD 

CD 

58 

C04B 


C9 

Bl 

F0 

32 

20 

BF 

AB 

4C 

B3 

□208 

3 

4C 

4E 

C2 

4C 

CI 

C4 

AE 

59 

65 

C3CB 

: 

5C 

C0 

F0 

F0 

C8 

8 C 

58 

□0 

B2 

C050 

B 

AE 

A7 

4C 

08 

AF 

00 

00 

00 

El 

C210 

3 

□ 0 

E0 

41 

F0 

26 

C9 

2E 

F0 

FA 

C3D0 

s 

AC 

58 

C0 

88 

C0 

FF 

F0 

0E 

D5 

C058 

: 

00 

00 

00 

00 

64 

00 

00 

00 

9F 

C218 

3 

22 

C9 

2D 

F0 

IE 

E0 

5A 

F0 

BC 

C3D8 

3 

Bl 

FD 

CD 

5C 

C0 

D0 

F4 

A9 

40 

C060 


00 

00 

00 

00 

00 

00 

00 

00 

61 

C220 

3 

0F 

C9 

20 

F0 

16 

C9 

41 

90 

10 

C3E0 


20 

91 

FD 

4C 

D3 

C3 

AE 

5A 

9C 

C06B 


00 

00 

00 

00 

00 

na 

00 

00 

69 

C22B 

s 

CD 

C9 

5B 

90 

0E 

4C 

F6 

CI 

65 

C3E8 

: 

C0 

BE 

86 

02 

AE 

58 

C0 

F0 

64 

C070 

B 

00 

00 

00 

00 

00 

00 

00 

00 

71 

C230 

3 

C9 

30 

90 

C2 

□9 

3A 

90 

03 

44 

C3F0 

8 

4B 

20 

A3 

B6 

AD 

5F 

C0 

85 

EF 

C078 


00 

00 

00 

00 

00 

00 

A2 

00 

03 

C23B 

8 

4C 

F6 

CI 

AE 

5B 

C0 

E0 

00 

85 

C3FB 

: 

65 

AD 

5E 

C0 

85 

64 

AD 

58 

C6 

□080 

E 

BE 

5B 

□0 

BE 

59 

C0 

20 

9B 

11 

C240 

3 

F0 

C6 

CA 

DD 

60 

C0 

F0 

06 

DD 

C400 


C0 

20 

75 

B4 

84 

FB 

A0 

00 

6 F 

□088 

3 

B7 

BA 

38 

E9 

01 

C9 

19 

B0 

F4 

C24B 

: 

CA 

10 

F8 

4C 

F6 

CI 

AE 

55 

C5 

C40B 

: 

91 

64 

CB 

BA 

91 

64 

CS 

A5 

F9 

C090 

1 

11 

8 D 

56 

□0 

20 

FD 

AE 

20 

02 

C250 

: 

C0 

EC 

58 

C0 

F0 

0B 

EE 

55 

82 

C410 

: 

FB 

91 

64 

A0 

01 

Bl 

64 

48 

CI 

C09B 

: 

9E 

B7 

8 A 

38 

E9 

01 

C9 

28 

DA 

C25B 

3 

C0 

AE 

55 

C0 

EC 

58 

C0 

D0 

13 

C41B 

3 

CB 

Bl 

64 

85 

65 

6 B 

85 

64 

FB 

C0A0 

8 

90 

03 

4C 

4B 

B2 

A8 

BC 

57 

1F 

C260 

3 

09 

C9 

ID 

F0 

0B 

20 

16 

E7 

BD 

C420 

3 

AC 

5B 

C0 

BB 

Bl 

FD 

29 

7F 

EB 

C0AB 

I 

ca 

AE 

S*. 

rot 


ein 

ES 

20 

A7 

C2&B 

■ 

A«? 

90 

2Bt 

i e> 

E7 

4C 

91» 

CI 

7D 

Cn2B 

• 

c»? 

20 

*?0 

19 

C9 

Ata 

«?0 

vt<j 

35 

□0B0 

B 

FD 

AE 

20 

9E 

B7 

E0 

00 

F0 

45 

C270 

3 

4C 

F6 

CI 

AC 

55 

C0 

C0 

00 

9C 

C430 

: 

C9 

60 

90 

15 

69 

3F 

91 

64 

90 

□0B8 

: 

E9 

BE 

58 

C0 

AC 

86 

02 

BC 

37 

C27B 

3 

F0 

F6 

CC 

50 

C0 

D0 

1F 

C9 

C4 

C438 

3 

C0 

00 

D0 

E7 

AE 

56 

C0 

20 

0A 

C0C0 

B 

5A 

□ 0 

20 

FD 

AE 

C9 

39 

B0 

C2 

C2B0 

: 

9D 

D0 

0D 

AC 

58 

C0 

C0 

01 

EF 

C440 

3 

0 C 

E5 

4C 

AE 

A7 

09 

40 

D0 

8 D 

C0CB 

2 

ii 

C9 

2F 

90 

0D 

20 

9E 

B7 

57 

C2BB 

3 

F0 

38 

CE 

55 

C0 

4C 

9E 

C2 

61 

C44B 

3 

ED 

09 

20 

D0 

E9 

20 

73 

00 

49 

□000 

: 

E0 

10 

B0 

CE 

BE 

B6 

02 

20 

24 

C290 

3 

CE 

55 

□0 

AC 

55 

C0 

AD 

5C 

99 

C450 

3 

C9 

Bl 

F0 

06 

20 

A0 

AA 

4C 

39 

C0DB 

B 

FD 

AE 

C9 

22 

F0 

03 

4C 

00 

3B 

C29B 

3 

C0 

91 

FD 

4C 

9B 

CI 

CE 

55 

D7 

C458 

8 

AE 

A7 

20 

9B 

B7 

BA 

38 

E9 

DA 

C0E0 

3 

CI 

A0 

01 

Bl 

7A 

C9 

22 

F0 

CB 

C2A0 

3 

C0 

C9 

9D 

F0 

GS 

Bl 

FB 

AA 

F9 

C460 


01 

C9 

19 

B0 

0F 

48 

20 

FD 

52 

C0E8 

1 

0A 

20 

D2 

FF 

C8 

4C 

E3 

C0 

B7 

C2AB 

3 

Bl 

FD 

BB 

91 

FD 

BA 

91 

FB 

IE 

C46B 

8 

AE 

20 

9E 

B7 

8 A 

38 

E9 

01 

D9 

C0F0 

3 

4C 

99 

AD 

38 

98 

65 

7A 

90 

3B 

C2B0 

1 

CB 

CB 

CC 

58 

C0 

90 

EE 

88 

70 

C470 

8 

C9 

28 

90 

03 

4C 

4B 

B2 

AB 

F5 

C0F8 

3 

02 

E6 

7B 

85 

7A 

20 

FD 

AE 

FB 

C2BB 

3 

AD 

5C 

C0 

91 

FD 

A9 

9D 

4C 

32 

C47B 

3 

68 

AA 

20 

0C 

E5 

AD 

86 

02 

A9 

□ 100 

3 

C9 

5A 

F0 

0B 

C9 

42 

F0 

07 

14 

C2C0 

3 

6 A 

C2 

A0 

00 

BC 

55 

C0 

4C 

C3 

C4B0 

8 

8 D 

5A 

C0 

20 

FD 

AE 

C9 

39 

5D 

C10R 

2 

C9 

41 

F0 

03 

4C 

08 

AF 

BD 

ED 

C2C8 

8 

F6 

CI 

AC 

58 

C0 

CE 

5B 

C0 

3A 

C4B8 

3 

B0 

0 D 

C9 

2F 

90 

09 

20 

9E 

26 

CI 10 

3 

59 

C0 

20 

73 

00 

20 

FD 

AE 

96 

C2D0 

I 

88 

C0 

FF 

F0 

33 

CC 

55 

C0 

47 

C490 

3 

B7 

BE 

86 

02 

20 

FD 

AE 

20 

5D 

CI 1B 

I 

A2 

00 

C9 

22 

D0 

IE 

20 

73 

D6 

C2D8 

1 

90 

2E 

Bl 

FD 

CD 

5C 

C0 

F0 

50 

C49B 

3 

A0 

AA 

AD 

5A 

C0 

8 D 

86 

02 

DB 

CI 20 

: 

00 

C9 

22 

F0 

0E 

E0 

IE 

00 

AD 

C2E0 

1 

EF 

CC 

58 

C0 

F0 

22 

Bl 

FB 

42 

C4A0 

3 

4C 

AE 

A7 

A2 

41 

BE 

04 

D4 

C4 

CI 28 

s 

03 

20 

71 

A5 

9D 

60 

C0 

E8 

FE 

C2E8 

3 

AA 

Bl 

FD 

CB 

91 

FD 

SA 

91 

5A 

C4A8 

8 

A2 

90 

86 

02 

CA 

D0 

FD 

C6 

2D 

CI 30 

: 

4C 

IE 

CI 

8 E 

5B 

C0 

20 

73 

Fl 

C2F0 

8 

FB 

88 

BB 

C0 

FF 

F0 

05 

CC 

9F 

C4B0 

8 

02 

F0 

05 

A2 

FF 

4C 

AC 

C4 

5F 

C138 

3 

00 

20 

FD 

AE 

20 

8 B 

B0 

A6 

0C 

C2FB 

3 

S5 

C0 

B0 

EA 

CB 

AD 

5C 

C0 

24 

C4BB 

8 

A2 

00 

BE 

04 

D4 

60 

4C 

96 

2D 

C140 

1 

0D 

F0 

AD 

BD 

SE 

C0 

BC 

5F 

BF 

C300 

1 

91 

FD 

EE 

SB 

C0 

4C 

9B 

CI 

B7 

C4C0 

3 

CI 

A9 

FF 

4C 

75 

C3 

A0 

00 

D7 

CI 48 

S 

C0 

A0 

00 

AD 

5C 

C0 

C9 

64 

CA 

C30B 


4B 

8 A 

48 

20 

A3 

C4 

68 

AA 

03 

C4CB 

8 

Bl 

47 

99 

61 

00 

CB 

□0 

03 

FF 

CI 50 


D0 

02 

A9 

A4 

20 

D2 

FF 

C8 

4A 

C310 

3 

68 

4C 

02 

C3 

AD 

55 

C0 

38 

90 

C4D0 

3 

D0 

F6 

A5 

61 

CD 

58 

C0 

90 

75 

C15B 

: 

CC 

58 

C0 

D0 

EE 

A0 

00 

A9 

E2 

C31B 

3 

E9 

28 

90 

1B 

AE 

55 

C0 

EC 

0F 

C4DB 

: 

03 

AD 

58 

C0 

8 D 

5D 

C0 

A0 

E8 

CI 60 

2 

90 

20 

D2 

FF 

CB 

CC 

58 

C0 

9B 

C320 

3 

58 

C0 

D0 

0B 

BD 

55 

C0 

A9 

48 

C4E0 


00 

C9 

00 

F0 

D9 

Bl 

62 

C9 

2B 

CI 68 

2 

00 

F5 

A4 

D3 

A6 

06 

8 C 

57 

DB 

C32B 

3 

ID 

20 

16 

E7 

4C 

32 

C3 

GD 

58 

C4EB 


20 

D0 

07 

AD 

5C 

C0 

91 

FD 

F6 

CI 70 


C0 

BE 

56 

C0 

20 

24 

EA 

A5 

3F 

C330 


55 

C0 

A9 

91 

4C 

6 A 

C2 

4C 

3E 

C4F0 

8 

A9 

ID 

20 

D2 

FF 

C8 

18 

CC 

CA 

CI 78 

2 

D2 

85 

FE 

AC 

57 

C0 

9B 

18 

70 

□338 

3 

F6 

CI 

AD 

58 

C0 

C9 

28 

F0 

62 

C4F8 

3 

5D 

C0 

B0 

03 

4C 

ES 

C4 

AD 

A4 

CI 80 

2 

65 

Dl 

90 

02 

E6 

FE 

85 

FD 

AB 

C340 

3 

0F 

AD 

55 

C0 

10 

69 

28 

B0 

62 

C500 

1 

5C 

C0 

CC 

58 

C0 

B0 

06 

91 

C7 

C1BS 

1 

A5 

F4 

95 

FC 

9B 

1B 

65 

F3 

70 

C34B 

3 

07 

CD 

SS 

C0 

F0 

05 

90 

0E 

FA 

C50B 


FD 

CB 

4C 

02 

C5 

AC 

5D 

C0 

75 

CI 90 


90 

02 

E6 

FC 

85 

FB 

A9 

00 

59 

C350 

3 

4C 

F6 

CI 

8 D 

55 

C0 

A9 

9D 

77 

C510 

8 

A9 

9D 

20 

D2 

FF 

BB 

C0 

00 

31 

CI 98 


8 D 

55 

C0 

46 

CC 

46 

CF 

20 

47 

C358 

8 

20 

16 

E7 

4C 

61 

C3 

BD 

55 

IC 

CS18 


D0 

F6 

4C 

96 

CI 

FF 

00 

FF 

65 


Listing 1. Geben Sie »Exinput 64« bitte mit dem MSE ein 












Tips und Tricks 


C 64 


ASM VERS. 4.23 
! 


- 

EXTENDED INPUT 64 


- 

GUY MOOTZ 

- 

- 

BOUVARTSTR. 11 

_ 

- 

L 7519 MERSCH 

- 

- 

LUXEMBURG 

- 


15.10.05 


~ 


~ 


BINPUT 

SPRINT 

BSOUT 

CHRGET 

EXT 

CHRBOT 

CURCOL 

CURSOR 

CKCOM 

EXESTA 

FRESTR 

GETIN 

GETBYT 

GETBY 

GETVAR 

INTERP 

ILQUAN 

OUTSCR 

SYNTAX 

STRLON 

STRPOI 

TYPMIS 

I 

I “ 

I 


-*C000 

-*ABBF 

-*AAA0 

-*FFD2 

-*0073 

-*0079 

-*0206 

-*E50C 

-*AEFD 

=*A7E7 

=*B6A3 

>*FFE4 

-*B79B 

-*B79E 

=*B00B 

-*A7AE 

-*B248 

-*E716 

-*AF00 

-*A571 

=*B475 

=*AD99 


ISTARTADRESSE DE Z.49152 
1 BASIC INPUT 
;BASIC PRINT 

; GIBT ZEICHEN AUS 

[HOLT ZEICHEN AUS BASIC-T 

[FLAGS WIEDER SETZEN 
[MOMENTANE ZEICHENFARBE 
[SETZT CURSOR 
(PRUEFT AUF KOMMA 
[STATEMENT AUSFUEHREN 
[ STR INGVERWAL TUNG 
[HOLT ZEICHEN IN A 
[HOLT BYTE(0-255) NACH X 
[ID.OHNE ZEICHEN ZU HOLEN 
[VARIABLE HOLEN 
[INTERPRETERSCHLEIFE 
[GIBT ILLEGAL OUANT. AUS 
[ZEICHEN AUF BILDSCHIRM 
[GIBT SYNTAX ERROR AUS 
[GIBT STR TOO LONG AUS 
[STRINGZEIGER BERECHNEN 
(GIBT TYPE MISMATCH AUS 


ZEIGER AUF EIGENE ERWEITERUNG 


C000 

A9 

0B 


LDA 

#*0B 

C002 

A0 

C0 


LDY 

#*C0 

C004 

BD 

08 

03 

STA 

*0308 

C007 

8C 

09 

03 

STY 

*0309 

C00A 

60 



RTS 



|LB START 
[HB START 

[LB/HB VEKTOR FUER 
;BASIC-BEFEHLSADR. 
[HOLEN 


m i 


SID-PARAMETER FUER PIEPTON SETZEN 


C00B 

A2 

9C 

. 

* 

LDX 

#*9C 

C00D 

8E 

00 

D4 

STX 

*D400 

C010 

A2 

4S 


LDX 

#*48 

C012 

BE 

01 

D4 

STX 

*D401 

C015 

A2 

00 


LDX 

#*00 

C017 

BE 

02 

D4 

STX 

*D402 

C01A 

8E 

04 

D4 

STX 

*D404 

C01D 

A2 

0B 


LDX 

#*08 

C01F 

BE 

03 

D4 

STX 

*D403 

C022 

A2 

0A 


LDX 

#*0A 

C024 

BE 

05 

D4 

STX 

*D405 

C027 

A2 

64 


LDX 

#*64 

C029 

8E 

06 

D4 

STX 

«D406 

C02C 

A2 

0F 


LDX 

#*0F 

Ctfl2L 

BE 

1B 

D4 

1 

STX 

*D418 


BASIC BEFEHLE PRUEFEN 


C031 

20 

73 

00 

i 

JSR 

CHRGET 

[ZEICHEN HOLEN 

C034 

C9 

05 



CMP 

#*85 

!INPUT-BEFEHL 7 

C036 

F0 

0D 



BEQ 

INPUT 

[JA,NACH 'INPUT- 

C038 

C9 

99 



CMP 

#*99 

[PRINT-BEFEHL 7 

C03A 

F0 

06 



BEQ 

PRINT 1 

[JA,NACH PRINTl' 

C03C 

20 

79 

00 


JSR 

CHRGGT 

[NEIN,FLAGS SETZEN* 

C03F 

4C 

E7 

A7 


JMP 

EXESTA 

[BEFEHL AUSFUEHREN 

C042 

4C 

4D 

C4 

PRINT 1 

1 

JMP 

PRINT 



AUF NEUEN INPUT-BEFEHL PRUEFEN 


[ZEICHEN HOLEN 
| >• 7 

[JA, NEUEN BEFEHL 
[NEIN, BASIC INPUT 
I 
I 
t 

I- 

; SPEICHERPLATZ FUER BEFEHLSPARAMETER 


C045 

20 

73 

00 

INPUT 

JSR 

CHRGET 

C04B 

C9 

Bl 



CMP 

#*B1 

C04A 

F0 

32 



BEQ 

ACCINP 

C04C 

20 

BF 

AB 


JSR 

BINPUT 

C04F 

4 t; 

AE 

A7 


JMP 

INTERP 

C052 

4C 

08 

AF 

SYNOUT 

JMP 

SYNTAX 


Listing 2. Das ausführlich kommentierte Quell-Code- 
Listing des »Exinput 64« 


C055 

00 

COUNT 

■ BYTE 

0 

[ZAEHLER IM FELD 

C056 

00 

CRSLIN 

-BYTE 

0 

;CURSORZEILE 

C057 

00 

CRSCOL 

.BYTE 

0 

;CURSÜRSPALTE 

C05B 

00 

LENGTH 

■ BYTE 

0 

[LAENGE 

C059 

00 

CODE 

• BYTE 

0 

!INPUT-CODE 

C05A 

00 

COLOR 

• BYTE 

0 

[FARBE 

C05B 

00 

ALLNUM 

.BYTE 

0 

[ZAHL ERL. ZEICHEN 

C05C 

64 

FIELDC 

• BYTE 

*64 

[FELD MARKIERER 

C05D 

00 

QUTNUM 

■ BYTE 

0 

[ZAEHLER 

C05E 

00 

VARADL 

■ BYTE 

0 

[ADR FUER VAR. LOW 

C05F 

00 

VARADH 

. BYTE 

0 

[ADR FUER VAR. HIGH 



ALLSTR 

*=«+30 

(ERLAUBTE ZEICHEN 


BEGINN NEUER INPUT-BEFEHL 
CURSOR SETZEN 


C07E 

A2 

00 


ACCINP 

LDX 

»*00 

- 

C0B0 

BE 

5B 

C0 


STX 

ALLNUM 


C083 

BE 

59 

C0 


STX 

CODE 


C086 

20 

9B 

B7 


JSR 

GETBYT 

(ZEILE NACH X 

C089 

SA 




TXA 


C00A 

3B 




SEC 



C08B 

E9 

01 



SBC 

«*01 


C0BD 

C9 

19 



CMP 

#*19 

[> 25 7 

C08F 

B0 

11 



BCS 

CRSNOl 

[JA, ILLEGAL QUANT 

C091 

BD 

56 

C0 


STA 

CRSLIN 

[NEIN, SPEICHERN 

C094 

20 

FD 

AE 


JSR 

CKCOM 

[PRUEFT AUF KOMMA 

C097 

20 

9E 

B7 


JSR 

GETBY 

[SPALTE NACH X 

C09A 

BA 




TXA 



C09B 

3B 




SEC 



C09C 

E9 

01 



SBC 

#*01 


C09E 

C9 

28 



CMP 

#*28 

[> 40 7 

C0A0 

90 

03 



BCC 

CRSOK1 

[JA, WEITER 

C0A2 

4C 

48 

B2 

CRSNÜ1 

JMP 

ILQUAN 

[ILLEGAL QUANTITY 

C0A5 

AB 



CRSOK1 

TAY 



C0A6 

HC 

57 

C0 


STY 

CRSCOL 


C0A9 

AE 

56 

C0 


LDX 

CRSLIN 


C0AC 

20 

0C 

E5 


JSR 

CURSOR 

[CURSOR SETZEN 


FELDLAENGE HOLEN 


"0 

FD 

AE 

JSR 

CKCOM 

0 

9E 

B7 

JSR 

GETBY 

E0 

00 


CPX 

#*00 

F0 

E9 


BEQ 

CRSNOl 

8E 

58 

C0 

LENGOK STX 

LENGTH 


[KOMMA 7 

[BYTE-WERT HOLEN 

[0 7 

[JA, ILLEGAL QUANT. 
[UND SPEICHERN 


FARBE ODER TEXT HOLEN UND AUSGEBEN 


C0BC 

AC 

86 

02 


LDY 

CURCOL 

;AKTUELLE FARBE 

C0BF 

8C 

5A 

C0 


STY 

COLOR 

;SPEICHERN 

C0C2 

20 

FD 

AE 


JSR 

CKCOM 

;KOMMA ? 

C0C5 

C9 

39 



CMP 

#*39 

; > "9" ? 

C0C7 

B0 

11 



BCS 

INTEXT 

;JA, DANN TEXT 

C0C9 

C9 

2F 



CMP 

#*2F 

;< "0" ? 

C0CB 

90 

0D 



BCC 

INTEXT 

;JA, DANN TEXT 

C0CD 

20 

9E 

B7 


JSR 

GETBY 

;FARBE HOLEN 

C0D0 

E0 

10 



CPX 

N* 10 

;< 16 7 

C0D2 

B0 

CE 



BCS 

CRSNOl 

1 JA, ILLEGAL OUANT. 

C0D4 

BE 

S6 

02 


STX 

CURCOL 

;UND SPEICHERN 

C0D7 

20 

FD 

AE 


JSR 

CKCOM 

;KOMMA 7 

C0DA 

C9 

22 


INTEXT 

CMP 

#*22 

s . ? 

C0DC 

F0 

03 



BEQ 

OUTEXT 

J JA, DANN TEXT 

C0DE 

4C 

00 

CI 


JMP 

CODEIN 

; NE IN, DANN CODE 

C0E1 

A0 

01 


OUTEXT 

LDY 

#*01 

; ZAEHLER = 1 

C0E3 

Bl 

7A 


C0NT3 

LDA 

(*7A>,Y 

; ZEICHEN HOLEN 

C0E5 

C9 

22 



CMP 

#*22 

;ENDE DES TEXTES 7 

C0E7 

F0 

BA 



BEQ 

GCODE 

; JA, DANN CODE 

C0E9 

20 

D2 

FF 


JSR 

BSOUT 

; SONST AUSGEBEN 

C0EC 

CB 




INY 


; ZAEHLER +1 

C0ED 

4C 

ES 

C0 


JMP 

C0NT3 

; NAECHSTES ZEICHEN 

C0F0 

4C 

99 

AD 

TYPERR 

JMP 

TYPMIS 

; TYPE-MISMATCH ERR 


INPUT CODE HOLEN * PRUEFEN 


C0F3 

38 



i 

GCODE 

SEC 


[PROGRAMMZEIGER 

C0F4 

98 




TYA 


[UM ZAHL DER AUSGE- 

C0F5 

65 

7A 



ADC 

*7A 

[GEBENEN ZEICHEN 

C0F7 

90 

02 



BCC 

C0NT2 

[ERHOEHEN 

C0F9 

E6 

7B 



INC 

*7B 

C0FB 

B5 

7A 


C0NT2 

STA 

*7A 


C0FD 

20 

FD 

AE 


JSR 

CKCOM 

[KOMMA 7 

CI 00 

C9 

5A 


CODEIN 

CMP 

#'Z' 

[ Z' 7 

C102 

F0 

0B 



BEQ 

CODEOK 

[JA, OK 

CI 04 

C9 

42 



CMP 

#'B' 

| 'B' 7 

CI 06 

F0 

07 



BEQ 

CODEOK 

[JA, OK 

C10B 

C9 

41 



CMP 

#'A' 

! A' 7 

C10A 

F0 

03 



BEQ 

CODEOK 

[JA, OK 

C10C 

4C 

08 

AF 


JMP 

SYNTAX 

[SONST SYNTAX ERROR 

C10F 

BD 

59 

C0 

CODEOK 

STA 

CODE 

[UND SPEICHERN 


148 


Wm 







































C 64 


Tips und Tricks 






;ERLAUBTE ZEICHEN HOLEN + ANZAHL PRUEFEN 

CI 12 

20 

73 

00 

* 

5 

JSR 

CHRGET 

(ZEICHEN HOLEN 

CI 15 

20 

FD 

AE 


JSR 

CKCOM 

(KOMMA 7 

CI 18 

A2 

00 



LDX 

«400 

(ZAEHLER - 0 

CI 1A 

C9 

22 



CliP 

**22 

[" AM ANFANG 7 

CUC 

DB 

IE 



BNE 

CREVAR 

;NEIN, WEITER 

CI IE 

20 

73 

00 

NEXT 

JSR 

CHRGET 

;JA, ZEICHEN HOLEN 

C121 

C9 

22 



CMP 

#*22 

;" ZUM SCHLUSS 

C123 

F0 

0E 



BEQ 

ALLEND 

; JA, ENDE 

CI 23 

E0 

IE 



CPX 

#*1E 

;ZAEHLER - 30 

C1 27 

00 

03 



BNE 

C0NT23 

(NEIN, WEITER 

CI 29 

20 

71 

A5 


JSR 

STRLON 

;SONST STR TOO LONG 

C12C 

9D 

60 

C0 

C0NT23 

STA 

ALLSTR,X 

* ZEICHEN SPEICHERN 

C12F 

E8 




I NX 


(ZAEHLER + 1 

C130 

4C 

IE 

CI 


JMP 

NEXT 

(NAECHSTES ZEICHEN 

CI 33 

BE 

5B 

C0 

ALLEND 

STX 

ALLNUM 

(ZEICHENZAHL MERKEN 

CI 36 

20 

73 

00 


JSR 

CHRGET 

(ZEICHEN HOLEN 

CI 39 

20 

FD 

AE 

1 

JSR 

CKCOM 

[KOMMA 7 





| 

; 


VARIABLE 

HOLEN 

C13C 

20 

8B 

B0 

i 

; 

CREVAR 

JSR 

GETVAR 

(VARIABLE HOLEN 

C13F 

A6 

0D 



LDX 

*0D 

(AUF STRING PRUEFEN 

C141 

F0 

AD 



BEQ 

TYPERR 

(SONST TYPE Ml SM. 

C143 

BD 

5E 

C0 


STA 

VARADL 

; ADR STRDESCRIPT.LO 

C146 

8C 

5F 

C0 

; 

STY 

VARADH 

[ADRESSE HI 





! " 

J 

FELDMARKIERUNG AUSGEBEN 

CI 49 

AB 

00 


» 

5 

LDY 

#*00 

; ZAEHLER = 0 

C14B 

AD 

5C 

C0 

FIELD 

LDA 

FIELDC 

; MARK IERUNGSZEICHEN 

C14E 

C9 

64 



CMP 

#*64 

( HOLEN 

CI 50 

D0 

02 



BNE 

C0NT2B 


CI 52 

A9 

A4 



LDA 

#*A4 


CI 54 

!20 

D2 

FF 

C0NT28 

JSR 

BSDUT 

; UND AUSGEBEN 

CI 57 

CB 




INY 


; ZAEHLER ERHOEHEN 

CI 58 

CC 

58 

C0 


CPY 

LENGTH 

(MIT LAENGE VERGL. 

C15B 

D0 

EE 


• 

> 

BNE 

FIELD 

[KLEINER 7, WEITER 





i 

; CURSOR 

AUF STARTPOSITION SETZEN 

C15D 

A0 

00 


* 

LDY 

#*00 


C15F 

A9 

9D 


C0NT27 

LDA 

#*9D 

;CRSR LINKS 

CI 61 

20 

D2 

FF 


JSR 

BSOUT 

;AUSGEBEN 

C164 

ce 




INY 



CI 65 

CC 

58 

C0 


CPY 

LENGTH 

[BIS LAENGE 

CI 68 

D0 

F5 


; 

BNE 

C0NT27 






i ■ 

STARTPOSITION MERKEN 


5 

1 


C16A 

A4 

D3 



LDY 

*00D3 

;CURSOR SPALTE UND 

C16C 

A 6 

D 6 



LDX 

*00D6 

(CURSOR ZEILE 

C16E 

BC 

57 

C0 


STY 

CRSCOL 

;SPEICHERN 

C171 

8 E 

56 

C0 

1 

STX 

CRSLIN 






5 

5 

BILDSCHIRMPOSITION MERKEN 

CI 74 

20 

24 

EA 

i 

i 

JSR 

*EA24 

;ZEIGER FARB-RAM 

CI 77 

A5 

D2 



LDA 

*D2 

[AKTUELLE ZEILE HB 

CI 79 

85 

FE 



STA 

»FE 

(MERKEN 

C17B 

AC 

57 

C0 


LDY 

CRSCOL 


C17E 

98 




TYA 



C17F 

18 




CLC 



CI 80 

65 

Dl 



ADC 

*D1 

(AKTUELLE ZEILE LB 

CI 82 

90 

02 



BCC 

C0NT6 

[ADDIEREN 

CI 84 

£6 

FE 



INC 

*FE 


CI 86 

85 

FD 


C0NT6 

STA 

*FD 

;UND MERKEN 

C1B8 

A5 

F4 



LDA 

*F4 

[ZEIGER IN FARB-RAM 

C18A 

B3 

FC 



STA 

*FC 

;HB MERKEN 

C1BC 

98 




TYA 



C18D 

18 




CLC 



C1BE 

65 

F3 



ADC 

*F3 

[ZEIGER LB ADDIEREN 

CI 90 

90 

02 



BCC 

C0NT7 


CI 92 

E 6 

FC 



INC 

*FC 


CI 94 

85 

FB 


CÜNT7 

; 

STA 

*FB 

;UND MERKEN 





i ~ 

HAUPT EINGABESCHLEIFE 


; 

; 


CI 96 

A9 

00 


RSTART 

LDA 

#*00 




CI 98 

8 D 

55 

C0 


STA 

COUNT 

; FELD 

ZAEHLER 

- 0 

C19B 

46 

CC 


INLOOP 

LSR 

*CC 

; CRSR 

FLAG EIN/AUS 

C19D 

46 

CF 



LSR 

*CF 

5 CRSR 

EIN/AUS 

PHASE 

C19F 

20 

E4 

FF 


JSR 

GETIN 

:ZEICHEN VON TASTAT 

C1A2 

F0 

F7 



BEQ 

INLOOP 

(NEIN, 

, WARTEN 



CI A4 

4B 




PHA 


»JA, ZEICHEN MERKEN 

C1A5 

E 6 

CC 



INC 

*cc 

(CURSOR AUS 

C1A7 

A4 

D3 



LDY 

*D3 

;SPALTE HOLEN 

C1A9 

Bl 

Dl 



LDA 

(*D1),Y 

[ZEICHEN VON SCHIRM 

CI AB 

29 

7F 



AND 

#*7F 

;POSITIVIEREN UND 

CI AD 

91 

Dl 


1 

STA 

<*D1),Y 

(ZURUECK SPEICHERN 





I EINGEGEBENES 

ZEICHEN PRUEFEN 

C1AF 

A5 

91 


1 

LDA 

*91 

(STOP FLAG 

C1B1 

C9 

7F 



CMP 

#*7F 

[CODE FUER STOP 7 

C1B3 

F0 

41 



BEQ 

NOTACC 

;NICHT ERLAUBT 

C1B5 

68 




PLA 


1 ZEICHEN HOLEN 

C 1 B 6 

C9 

0D 



CMP 

«*0D 

(RETURN 

C1BB 

D0 

03 



BNE 

C0NT5 

;NEIN, WEITER 

C1BA 

4C 

B 6 

C3 


JMP 

TAKEVA 

5 JA, MIT SPACES 

CI BD 

C9 

BD 


C0NT5 

CMP 

**BD 

(SHIFT/RETURN 

CtBF 

D0 

03 



BNE 

C0NT8 

[NEIN, WEITER 

C1C1 

4C 

D0 

C3 


JMP 

MKSPAC 

(JA, OHNE SPACES 

C1C4 

C9 

14 


CONTB 

CMP 

#*14 

(DELETE 

C1C6 

F0 

37 



BEQ 

MOVLFT 

(JA, WEITER 

C1CS 

C9 

9D 



CMP 

«*9D 

(CRSR LEFT 

CI CA 

F0 

33 



BEQ 

MOVLFT 

(JA, WEITER 

C1CC 

C9 

ID 



CMP 

**1D 

[CRSR RIGHT 

CI CE 

F0 

38 



BEQ 

PASS 

[JA,AUSGABE PRUEFEN 

C1D0 

C9 

94 



CMP 

#*94 

I INSERT 

C1D2 

F0 

28 



BEQ 

INSER 

[JA,AUSGABE PRUEFEN 

C1D4 

C9 

91 



CMP 

#*91 

[CRSR UP 

CID 6 

F0 

2A 



BEQ 

CRSUP 

(JA,AUSGABE PRUEFEN 

C1 DB 

C9 

13 



CMP 

**13 

(HOME 

CI DA 

F0 

29 



BEQ 

HOM 

[JA, AUSGABE 

C1DC 

C9 

8 C 



CMP 

**BC 

[FB 

CI DE 

F0 

2B 



BEQ 

VARINF 

;JA, VARIABLE HOLEN 

C 1 E 0 

C9 

85 



CMP 

#*B5 

;F1-F7 

C1E2 

B0 

03 



BCS 

C0NT25 

;NICHT 

C1E4 

4C 

EF 

CI 


JMP 

C0NT26 

;ANNEHMEN 

C1E7 

C9 

BC 


C0NT25 

CMP 

#* 8 C 


C1E9 

90 

0B 



BCC 

NOTACC 


C1EB 

C9 

93 



CMP 

#*93 

;CLR/HOME 

CI ED 

F0 

16 



BEQ 

HOM 

[JA, AUSGABE 

C1EF 

C9 

11 


C0NT26 

CMP 

#*11 

(CRSR DOWN 

C1F1 

D0 

1B 



BNE 

CONT10 

[NEIN, WEITER 

C1F3 

4C 

3A 

C3 


JMP 

CRSRDN 

;JA, AUSGABE TESTEN 

C1F6 

20 

A3 

C4 

NOTACC 

JSR 

SOUND 

;PIEPTON 

C1F9 

4C 

9B 

CI 


JMP 

INLOOP 

(ZUR EINGABE 

C1FC V- 1 . 

C2 

INSER 

JMP 

INSERT 


C1 FF 

4C 

73 

C2 

MOVLFT 

JMP 

MOVLEF 


C202 

4C 

14 

C3 

CRSUP 

JMP 

CRSRUP 


C205 

4C 

75 

C3 

HOM 

JMP 

HOME 


0208 

4C 

4E 

C2 

PASS 

JMP 

PASSED 


C20B 

4C 

CI 

C4 

VARINF 

JMP 

VAR IN 






9 







i 

; 

CONTI 0 




C20E 

AE 

59 

C0 

LDX 

CODE 

;CODE HOLEN 

C211 

E0 

41 



CPX 

#*41 

(CODE = A 

C213 

F0 

26 



BEQ 

ACCALL 

;JA, OK 

C215 

C9 

2E 



CMP 

#*2E 

;ZEICHEN - . 

C217 

F0 

22 



BEQ 

ACCALL 

[JA, OK 

C219 

C9 

2D 



CMP 

#*2D 

;ZEICHEN - - 

C21B 

F0 

IE 



BEQ 

ACCALL 

;JA, OK 

C21D 

E0 

5A 



CPX 

**5A 

[CODE - Z 

C21F 

F0 

0F 



BEO 

ACCNUM 

[JA, NUR ZIFFERN 

C221 

C9 

20 



CMP 

#*20 

[NEIN, BUCHSTABEN 

C223 

in 

16 



D CO 

ACCALL 

JLEERZEICHEN ?, OK 

C22S 

C9 

41 



CMP 

**41 

[ASCII < 65 7 

C227 

90 

CD 



BCC 

NOTACC 

[JA, NICHT ERLAUBT 

C229 

C9 

5B 



CMP 

#*5B 

[ASCII < 91 7 

C22B 

90 

0E 



BCC 

ACCALL 

(JA, OK 

C22D 

4C 

F 6 

CI 


JMP 

NOTACC 

[NEIN,NICHT ERLAUBT 

C230 

C9 

30 


ACCNUM 

CMP 

#*30 

[ASCII < 48 7 

C232 

90 

C2 



BCC 

NOTACC 

[JA, NICHT ERLAUBT 

C234 

C9 

3A 



CMP 

**3A 

;ASCII < 58 7 

C236 

90 

03 



BCC 

ACCALL 

[JA, OK 

C238 

4C 

F 6 

CI 

; 

JMP 

NOTACC 

[NEIN,NICHT ERLAUBT 





i 

I 

ACCALL 




C23B 

OE 

SB 

C0 

LDX 

ALLNUM 

5 ANZAHL HOLEN 

C23E 

E0 

00 



CPX 

H *00 

[WENN 0 

C240 

F0 

C 6 



BEQ 

PASS 

;DANN OK 

C242 

CA 




DEX 


( ZAEHLER -1 

C243 

DD 

60 

C0 

CONTI3 

CMP 

ALLSTR, 

X [VERGLEICHEN 

C246 

F0 

06 



BEQ 

PASSED 

;GLEICH 7 AUSGABE 

C248 

CA 




DEX 


;ZAEHLER -1 

C249 

10 

FB 



BPL 

CONTI3 

;WENN NICHT DABEI 

C24B 

4C 

F 6 

CI 

1 

JMP 

NOTACC 

(NICHT ERLAUBT 





! ALLE TESTS OK, 

ZEICHEN AUSBEBEN 

C24E 

AE 

55 

C0 

• 

PASSED 

LDX 

COUNT 

!ZAEHLER HOLEN 

C251 

EC 

5B 

C0 


CPX 

LENGTH 

(MIT LAENGE VERGL. 

C254 

F0 

0B 



BEQ 

CONTI4 

(GLEICH 7, WEITER 

C256 

EE 

55 

C0 


INC 

COUNT 

iSONST ZAEHLER + 1 

C259 

AE 

55 

C0 


LDX 

COUNT 

;NOCHMAL VERGL. 
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C25C 

EC 

58 

C0 

CPX 

LENBTH 

;WENN NICHT GLEICH 





. 




C23F 

D0 

09 


BNE 

CAROUT 

[ZEICHEN AUSGEBEN 

C314 

AD 

55 

C0 

CRSRUP 

LDA 

COUNT 

[FELDZAEHLER 

C261 

09 

ID 


C0NT14 CMP 

4*1D 

iCRSR RECHTS ? 

C317 

30 




SEC 



C263 

F0 

0B 


BEQ 

CONTI 7 

1 JA f NICHT MOEGLICH 

C31B 

E9 

28 



SBC 

4*28 

(- 40 

C265 

20 

16 

E7 

JBR 

QUTSCR 

;NE IN, AUSGEBEN 

C31A 

90 

1B 



BCC 

NOTUP 

[WENN < 0 NICHT 

C268 

A9 

9D 


LDA 

#*9D 

;UND CURSOR EINE 

C31C 

AE 

55 

C0 


LDX 

COUNT 

[MOEGLICH 

C26A 

20 

16 

E7 

CAROUT JSR 

OUTSCR 

«STELLE NACH RECHTS 

C31F 

EC 

58 

C0 


CPX 

LENGTH 

[ZAEHLER = LAENGE 

C26D 

40 

9B 

01 

JMP 

INLOOP 

(ZUR EINGABE 

C322 

D0 

0B 



BNE 

C0NT38 

[NEIN, WEITER 

0270 

40 

F6 

01 

CONTI7 JMP 

NOTACC 


C324 

BD 

55 

C0 


STA 

COUNT 

[FELDZAEHLER MERKEN 





f 



C327 

A9 

ID 



LDA 

#*1D 

(CURSOR RECHTS 





s- 



C329 

20 

16 

E7 


JSR 

OUTSCR 

gAUSGEBEN 





; CURSOR LINKS 

ODER DELETE 

C32C 

4C 

32 

C3 


JMP 

C0NT39 






5- 



C32F 

BD 

55 

C0 

C0NT3B 

STA 

COUNT 

[FELDZAEHLER MERKEN 





! 



C332 

A9 

91 


C0NT39 

LDA 

4*91 

[CURSOR NACH OBEN 

C273 

AC 

55 

00 

MOVLEF LDY 

COIJNT 

;ZAEHLER HOLEN 

C334 

4C 

6A 

C2 


JMP 

CAROUT 

[AUSGEBEN 

0276 

00 

00 


CPY 

4*00 

sGLEICH 0 ? 

C337 

4C 

F6 

CI 

NOT UP 

JMP 

NOTACC 


C27B 

F0 

F6 


BED 

CONTI 7 

;NE IN,NICHT ERLAUBT 





I 




027« 

cc 

58 

00 

CPY 

LENBTH 

iZAEHLER - LAENBE 





?- 




C27D 

D0 

1F 


BNE 

CONTI 9 

;NE IN, WEITER 





I 

CURSOR NACH 

UNTEN 

C27F 

C9 

9D 


CMP 

H*9D 

[CRSR LINKS ? 





J- 




0281 

D0 

0D 


BNE 

DELET 

(NEIN, DANN DELETE 





( 




C2B3 

AC 

SB 

C0 

LDY 

LENGTH 

[WENN LAENGE - 1 

C33A 

AD 

58 

C0 

CRSRDN 

LDA 

LENGTH 

[WENN LAENGE - 40 

C2B6 

00 

01 


CPY 

#*01 


C33D 

C9 

28 



CMP 

4*2B 


C2BB 

F0 

3B 


BEQ 

LEN1 

(KEIN CURSOR LINKS 

C33F 

F0 

0F 



BEQ 

C0NT36 

(NICHT MDEGLICH 

C2BA 

CE 

55 

00 

DEC 

COUNT 

iSONST ZAEHLER -1 

C341 

AD 

55 

C0 


LDA 

COUNT 


C2BD 

40 

9E 

02 

JMP 

CONTI9 

iUND WEITER 

C344 

1B 




CLC 


(WENN FELDZAEHLER 

C290 

CE 

55 

C0 

DELET DEC 

CUUNT 

[ZAEHLER -1 

C345 

69 

28 



ADC 

#*28 

(> 255, DANN NICHT 

0293 

AC 

55 

00 

LDY 

COUNT 


C347 

B0 

07 



BCS 

C0NT36 

(MOEGLICH 

0296 

AD 

5C 

C0 

LDA 

FIELDC 

[MARKIERUNGSZEICHEN 

C349 

CD 

58 

C0 


CMP 

LENGTH 

(WENN FELDZAEHLER- 

0299 

91 

FD 


STA 

<*FD>,Y 

[ANST. DES LETZTEN 

C34C 

F0 

05 



BEQ 

NOTOVE 

;LAENGE,I POS LINKS 

C29B 

4C 

9B 

01 

JMP 

INLOOP 

[ZEICHENS, ZURUECK 

C34E 

90 

0E 



BCC 

DOWNOK 

(SONST OK 

C29E 

CE 

55 

00 

CONTI9 DEC 

COUNT 

[ZAEHLER -1 

C350 

4C 

F6 

CI 

C0NT36 

JMP 

NOTACC 


C2A1 

09 

9D 


CMP 

#*9D 

[CURSOR LINKS ? 

C353 

8D 

55 

C0 

NOTOVE 

STA 

COUNT 

[FELDZAEHLER MERKEN 

C2A3 

F0 

C5 


BEO 

CAROUT 

[JA, DANN AUSGABE 

C356 

A9 

9D 



LDA 

#*9D 

;CRSR LINKS 

C2AS 

Bl 

FB 


DELETE LDA 

<*FB),Y 

[FARBE HOLEN 

C35B 

20 

16 

E7 


JSR 

OUTSCR 

(AUSGEBEN 

C2A7 

AA 



TAX 



C35B 

4C 

61 

C3 


JMP 

C0NT21 

[WEITER 

C2A8 

Bl 

FD 


LDA 

<*FD>,Y 

[POSITION HOLEN 

C35E 

BD 

55 

C0 

DOWNOK 

STA 

COUNT 


C2AA 

88 



DEY 


[EINE STELLE ZURECK 

C361 

A9 

u 


C0NT21 

LDA 

#*11 

[CURSOR NACH UNTEN 

C2AB 

91 

FD 


STA 

<*FD),Y 

(ZEICHEN AUSGEBEN 

C363 

20 

16 

E7 


JSR 

OUTSCR 

;AUSGEBEN 

C2AD 

8A 



TXA 



C366 

AE 

58 

C0 


LDX 

LENGTH 

;WENN LETZTES FELD, 

02 AE 

91 

FB 


STA 

<*FB),Y 

[UND FARBE AUSGEBEN 

C369 

CA 




DEX 


[ FELDZAEHLER 

C2B0 

CB 



INY 


;ZAEHLER ERHÜEHEN 

C36A 

EC 

55 

C0 


CPX 

COUNT 

(KORRIGIEREN 

C2B1 

C8 



INY 



C36D 

D0 

03 



BNE 

C0NT37 


C2B2 

CC 

58 

C0 

CPY 

LENGTH 

[LAENGE GANZ DURCH? 

C36F 

EE 

55 

C0 


INC 

COUNT 


C2B5 

90 

EE 


BCC 

DELETE 

[NEIN, NAECHSTES 

C372 

4C 

9B 

CI 

C0NT37 

JMP 

INLOOP 

;ZUR EINGABESCHL. 

C2B7 

BB 



DEY 


[ZEICH. VERSCHIEBEN 









C2BB 

AD 

5C 

C0 

LDA 

FIELDC 

[JA, MARKIERUNG 









C2BB 

91 

FD 


STA 

<*FD>,Y 

[ANS ENDE SETZEN 

in»» 




■ 


HOME 


C2BD 

A9 

9D 


LEFOUT LDA 

#*9D 

;CURSOR LINKS 









C2BF 

4C 

6A 

02 

JMP 

CAROUT 

I AUSGEBEN, ZURUECK 





■ 




0202 

A0 

00 


LEN1 LDY 

#*00 

[ZAEHLER FUER DEL 

C375 

48 



HOME 

PHA 


[ZEICHEN MERKEN 

C2C4 

BC 

55 

C0 

STY 

COUNT 

[ZURUECKSETZEN 

C376 

AC 

55 

C0 


LDY 

COUNT 

(FELDZAEHLER- 0 

C2C7 

4C 

F6 

01 

JMP 

NOTACC 


C379 

F0 

0E 



BEQ 

C0NT24 

[JA, DANN WEITER 





i 



C37B 

CC 

58 

C0 


CPY 

LENGTH 

[WENN FELDZAEHLER 





-- 



C37E 

D0 

01 



BNE 

CONT30 

;= LAENGE, DANN 





; 

INSERT 

C3B0 

88 




DEY 


;FELDZAEHLER -1 





;- 



C381 

A9 

9D 


CDNT30 

LDA 

#*9D 

[CURSOR LINKS BIS 





i 



C3B3 

20 

D2 

FF 


JSR 

BSOUT 

[ZUR ANFANGSPOSIT. 

C2CA 

AC 

58 

C0 

INSERT LDY 

LENBTH 

;ZAEHLER = LAENGE 

C3B6 

88 




DEY 


;AUSGEBEN 

C2CD 

CE 

58 

C0 

DEC 

LENGTH 

[LAENGE - 1 

C387 

D0 

F8 



BNE 

CONT30 

;WENN >0 WEITER 

C2D0 

BB 



CONTI5 DEY 


[ZAEHLER -1 

C389 

68 



C0NT24 

PLA 


[ZEICHEN HOLEN 

C2D1 

C0 

FF 


CPY 

#*FF 

IZAEHLER UEBER 0 ? 

C3BA 

C9 

93 



CMP 

#*93 

;CLR/HOME 7 


F0 

33 


BEQ 

NOINST 

(JA, KEIN INSERT 

C3BC 

F0 

0A 



BEQ 

CLRHOM 

[JA, WEITER 

C2D5 

CC 

55 

C0 

CPY 

COUNT 

[FELD ZAEHLER- INS- 

C3BE 

C9 

FF 



CMP 

#*FF 

[HOME NACH ALTE 

C2DB 

90 

2E 


BCC 

NOINST 

[ZAEHLER 7 

C390 

F0 

03 



BEQ 

VARIIN 

;VARIABLE INS FELD 

C2DA 

Bl 

FD 


LDA 

<*FD>,Y 

[WENN GROESSER 

C392 

4C 

96 

CI 


JMP 

RSTART 

(ZUR EINGABESCHL. 

C2DC 

CD 

3C 

CM 

CMP 

riFUDC 

I DANN INSERT 

C395 

4C 

CA 

H4 

VARIIN 

.IMP 

CONTI 1 


C2DF 

F0 

EF 


BEQ 

CONTI5 






J 




C2E1 

cc 

58 

C0 

CPY 

LENGTH 






;- 




C2E4 

F0 

22 


BEQ 

NOINST 






; 


CLR/HOME 

C2E6 

Bl 

FB 


NEXT1N LDA 

(»FBI,Y 

[FARBE HOLEN 





;- 




C2EB 

AA 



TAX 







; 




C2E9 

Bl 

FD 


LDA 

<*FD>,Y 

[ZEICHEN HOLEN 

C398 

AC 

5B 

C0 

CLRHOM 

LDY 

LENGTH 

[ZAEHLER = LAENGE 

C2EB 

CB 



INY 


(POSITIUN + 1 

C39B 

AD 

5C 

C0 

C0NT32 

LDA 

FIELDC 

(ALLE ZEICHEN DURCH 

C2EC 

91 

FD 


STA 

(*FD),Y 

[ZEICHEN ZURUECK 

C39E 

p9 

64 



CMP 

4*64 

; MARKIERUNGSZEICHEN 

C2EE 

BA 



TXA 



C3A0 

D0 

02 



BNE 

C0NT31 


C2EF 

91 

FB 


STA 

(»FBI,Y 

[FARBE ZURUECK 

C3A2 

A9 

A4 



LDA 

#*A4 


C2F1 

BB 



DEY 



C3A4 

20 

D2 

FF 

C0NT3! 

JSR 

BSOUT 

gERSETZEN 

C2F2 

BB 



DEY 



C3A7 

BB 




DEY 



C2F3 

00 

FF 


CPY 

#*FF 

[ALLE ZEICHEN ? 

C3AB 

D0 

Fl 



BNE 

CGNT32 

[UND CURSOR 

C2F3 

F0 

05 


BEO 

CONTI 6 

[JA, DANN WEITER 

C3AA 

A9 

13 



LDA 

4*13 


C2F7 

CC 

BS 

00 

CPY 

COUNT 

[NEIN, DANN 

C3AC 

48 




PHA 



C2FA 

B0 

EA 


BCS 

NEXTIN 

[NAECHSTES ZEICHEN 

C3AD 

AC 

58 

C0 


LDY 

LENBTH 

[NACH HOME 

C2FC 

CB 



CÜNT16 INY 



C3B0 

4C 

Bl 

C3 


JMP 

CONT30 

;BRINGEN 

C2FD 

AD 

5C 

C0 

LDA 

FIELDC 

; MARK IERUNGSZEI CHEN 

C3B3 

4C 

96 

CI 

RESTAR 

JMP 

RSTART 

[ZUR EINGABESCHL. 

C300 

91 

FD 


STA 

(*FD!,Y 

[ZWISCHEN 2 STRING- 









0302 

EE 

58 

C0 

NOTINS INC 

LENGTH 

;TEILE 





! 




C305 

40 

9B 

CI 

JMP 

INLOOP 

g ZUR EINGABE 





i- 




C30B 

48 



NOINST PHA 


;KEIN INSERT 





I AUSLESE DER MARK!ERUNGSZEICHEN 

C309 

8A 



TXA 







1- 




C30A 

4B 



PHA 







; 




C30B 

20 

A3 

C4 

JSR 

SOUND 

[PIEPTON 









C30E 

6B 



PLA 



C3B6 

AC 

58 

C0 

TAKEVA 

LDY 

LENGTH 

[ZAEHLER- LAENGE 

C30F 

AA 



TAX 



C3B9 

4C 

C0 

C3 


JMP 

BCKPRT 

[ MARKIERUNGSZE I CHEN 

C310 

68 



PLA 



C3BC 

A9 

20 


ELIMIN 

LDA 

#*20 

[AM ENDE DURCH LEER 

C311 

4C 

02 

C3 

JMP 

NOTINS 

I UND ZURUECK 

C3BE 

91 

FD 



STA 

C*FD>,Y 

[-ZEICHEN ERSETZEN 





; 



C3C0 

88 



BCKPRT 

DEY 










C3C1 

C0 

FF 



CPY 

#*FF 






; 

CURSOR NACH DBEN 

C3C3 

F0 

07 



BEQ 

C0NT34 

[LAENGE ERREICHT, 





s - 



C3C5 

Bl 

FD 



LDA 

(*FD),Y 
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C 64 


Tips und Tricks 


C3C7 

CD 

5C 

C0 


CMP 

FIELDC 


C3CA 

F0 

F0 



BEQ 

ELIMIN 


C3CC 

CB 



C0NT34 

INY 



C3CD 

BC 

5B 

C0 


STY 

LENGTH 

;NEUE LAENQE MERKEN 

C3D0 

AC 

58 

C0 

MKSPAC 

LDY 

LENGTH 

;UND MARKIERUNG 

C3D3 

88 



MAKSPC 

DEY 


;ZWISCHEN ANDEREN 

C3D4 

C0 

FF 



CPY 

#*FF 

iZEICHEN ENTFERNEN 

C3D6 

F0 

0E 



BEQ 

TAKVAR 

IFERTIG,ZU VARIABLE 

C3D8 

Bl 

FD 



LDA 

<*FD> t Y 

;ZEICHEN HOLEN 

C3DA 

CD 

5C 

C0 


CMP 

FIELDC 

iMARKIERUNG ? 

C3DD 

D0 

F4 



BNE 

MAKSPC 


C3DF 

A9 

20 



LDA 

#*20 


C3E1 

91 

FD 



STA 

<*FD>,Y 

[JA, ERSETZEN 

C3E3 

4C 

D3 

C3 

; 

JMP 

MAKSPC 

[UND WEITER 





* 

[ VARIABLE ERSTELLEN + STRING KOPIEREN 

C3E6 

Li 

C 

5A 

C0 

» 

1 

TAKVAR 

LDX 

CQLOR 

|FARBE ZURUECK 

C3E9 

BE 

86 

02 


STX 

CURCOL. 


n 

U 

rr 

n 

AE 

SB 

C0 


LDX 

LENGTH 

[WENN NEUE LAENBE 0 

C3EF 

F0 

4B 



BEO 

C0NT29 

[KEINE VARIABLE 

C3F1 

20 

A3 

B 6 


JSR 

FRESTR 

[AUSWERTUNG DES 

C3F4 

AD 

3F 

C 0 


LDA 

VARADH 

[STRINBAUSDRUCKS 

C3F7 

85 

65 



STA 

*65 

[ZEIGER AUF 

C3F9 

AD 

5E 

C0 


LDA 

VARADL 

I STRINGDESCRIPTOR 

C3FC 

B5 

64 



STA 

*64 

C3FE 

AD 

58 

C0 


LDA 

LENGTH 


C401 

20 

75 

B4 


•1SR 

STRPOI 

[BERECHNET STRZEIG. 

C404 

B4 

FB 



STY 

*FB 

[ STRZEIBER KOPIEREN 

C406 

A0 

00 



LDY 

#*00 


C408 

91 

64 



STA 

<*64),Y 

;LAENGE 

C40A 

CB 




INY 


C40B 

BA 




TXA 



C40C 

91 

64 



STA 

(*64),Y 

;ADRESSE LGW 

C40E 

CB 




INY 


C40F 

A5 

FB 



LDA 

*FB 


C41 1 

91 

64 



STA 

(*64),Y 

;ADRESSE HIGH 

C413 

A0 

01 



LDY 

#*01 


C415 

Bl 

64 



LDA 

1*64),Y 


C417 

48 




PHA 



C41S 

CB 




INY 



C419 

Bl 

64 



LDA 

(*64>,Y 

;ADR DES STRING 

C41B 

B5 

65 



STA 

*65 

;NACH *64/*65 

C41D 

68 




PLA 



C4JE 

B5 

64 



STA 

*64 



5 STING IN VARIABLE EINLESEN 


C420 

AC 

5B 

C0 

f 

LDY 

LENGTH 

[ZAEHLER = LAENGE 

C423 

B 8 



READIN 

DEY 



C424 

Bl 

FD 



LDA 

<*FD>,Y 

[ZEICHEN LESEN 

C426 

29 

7F 



AND 

#*7F 

3 BILDSCHIRMCODE 

C42B 

C9 

20 



CMP 

#*20 

;NACH ASCII 

C42A 

90 

19 



BCC 

CQNT40 

3 WANDELN 

C42C 

C9 

40 



CMP 

#*40 


C42E 

90 

06 



BCC 

STOVAR 


C430 

C9 

60 



CMP 

M*60 


C432 

90 

15 



BCC 

C0NT41 


C434 

69 

3F 



ADC 

#*3F 

;UND NACH ADR AUS 

C436 

91 

64 


STOVAR 

STA 

(*64>,Y 

[*64/*65 SCHREIBEN 

C43B 

C0 

00 



CPY 

#*00 

;ALLES GELESEN 

C43A 

D0 

E7 



BNE 

READIN 

3 NEIN, WEITER 

C43C 

AE 

56 

C0 

C0NT29 

LDX 

CRSLIN 

; JA, CURSOR SETZEN 

C43F 

20 

0C 

E5 


JSR 

CURSOR 

[UND ZURUECK ZUR 

C442 

4C 

AE 

A7 


JMP 

INTERP 

[INTERPRETERSCHL. 

C445 

09 

40 


» 

CONT40 

ORA 

»*40 

(BILDSCHIRM 

C447 

D0 

ED 



BNE 

STOVAR 

[NACH 

C449 

09 

20 


C0NT41 

ORA 

»*20 

|ASCII 

C44B 

D 0 

E9 


I 

BNE 

STOVAR 






* 

; AUF NEUEN PRINT-BEFEHL PRUEFEN 

C44D 

20 

73 

00 

• 

8 

PRINT 

JSR 

CHRGET 

|ZEICHEN HOLEN 

C450 

C9 

Bl 



CMP 

#*B1 

[> f 

C452 

F0 

06 



DEO 

ACCPRI 

jJA, NEUER BEFEHL 

C454 

20 

A0 

AA 


JSR 

BPRINT 

[SONST BASIC-PRINT 

C457 

4C 

AE 

A7 

8 

JMP 

INTERP 

[ INTERPRETERSCHL. 





? 

8 

NEUER PRINT-BEFEHL 

C45A 

20 

9B 

B7 

5 

1 

ACCPRI 

JSR 

GETBYT 

;CURSORPOSITION 

C45D 

BA 




TXA 


[HOLEN, SIEHE 

C43E 

3B 




SEC 


iINPUT-BEFEHL 

C45F 

E9 

01 



SBC 

#*01 


C461 

C9 

19 



CMP 

#*19 

!> 25 

C463 

B0 

0F 



BCS 

CRSN02 


C465 

48 




PHA 



C466 

20 

FD 

AE 


JSR 

CKCOM 



C469 

20 

9E 

B7 


JSR 

GETBY 


C46C 

8 A 




TXA 



C46D 

38 




SEC 



C46E 

E9 

01 



SBC 

#*01 


C470 

C9 

28 



CMP 

#*28 

[> 40 

C472 

90 

03 



BCC 

CRS0K2 


C474 

4C 

48 

B2 

CRSN02 

JMP 

ILQUAN 


C477 

AB 



CRS0K2 

TAY 



C47S 

68 




PLA 



C479 

AA 




TAX 



C47A 

20 

0C 

ES 

i 

JSR 

CURSOR 

[CURSOR SETZEN 





f 

; FARBE 

HOLEN ODER TEXT AUSGEBEN 

C47D 

AD 

86 

02 

i 

LDA 

CURCOL 

(AKTUELLE FARBE 

C4B0 

GD 

5A 

C0 


STA 

COLOR 

;MERKEN 

C4B3 

20 

FD 

AE 


JSR 

CKCOM 

[KOMMA ? 

C486 

C9 

39 



CMP 

#*39 

3 ASCII < 57 7 

C4BB 

B0 

0D 



BCS 

PRICOM 

[NEIN, DANN PRINT 

C4BA 

C9 

2F 



CMP 

»*2F 

3 ASCII > 47 7 

C48C 

90 

09 



BCC 

PRICOM 

[NEIN, DANN PRINT 

C4BE 

20 

9E 

B7 


JSR 

GETBY 

[JA, BYTE-WERT 

C491 

8 E 

86 

02 


STX 

CURCOL 

(HOLEN + SPEICHERN 

C494 

20 

FD 

AE 


JSR 

CKCOM 

3 KOMMA 7 

C497 

20 

A0 

AA 

PR ICOM 

JSR 

BPRINT 

[BASIC PRINT-BEFEHL 

C49A 

AD 

5A 

C0 


LDA 

COLOR 

[FARBE WIEDER 

C49D 

BD 

86 

02 


STA 

CURCOL 

[ZURUECKSTELLEN UND 

C4A0 

4C 

AE 

A7 

; 

JMP 

INTERP 

[ INTERPRETERSCHL. 





8 


PIEPTON 

C4A3 

A2 

41 


8 

5 

SOUND 

LDX 

**41 

(WELLENFORM 65 

C4A5 

8 E 

04 

D4 


STX 

*D404 

[SETZEN 

C4A8 

A2 

90 



LDX 

**90 

[ZAEHLER SETZEN 

C4AA 

86 

02 



STX 

*02 

;UND HERUNTER 

C4AC 

CA 



LOOP 

DEX 


;ZAEHLEN 

C4AD 

D0 

FD 



BNE 

LOOP 


C4AF 

C 6 

02 



DEC 

*02 


C4B1 

F0 

05 



BEQ 

OFF 


C4B3 

A2 

FF 



LDX 

#*FF 


C4B5 

4C 

AC 

C4 


JMP 

LOOP 


C4B8 

A2 

00 


OFF 

LDX 

»*00 

[WELLENF. LOESCHEN 

C4BA 

BE 

04 

D4 


STX 

*D404 


C«E ~ 

W1^ 

CI 

NOVAR 

* 

RTS 

JMP 

RSTART 

;ZURUECK 





; ALTE 

VARIABLE 

INS FELD GEBEN 

C4C1 

A9 

FF 


* 

5 

VAR IN 

LDA 

#*FF 

[CURSOR NACH HOME 

C4C3 

4C 

75 

C3 


JMP 

HOME 


C4C6 

A0 

00 


CONTI 1 

LDY 

#*00 

;ZAEHLER = 0 

C4C8 

Bl 

47 


CONTI2 

LDA 

(*47),Y 

[ STRING—DESCRI PTOR 

C4CA 

99 

61 

00 


STA 

*61 ,Y 

3 NACH *61—*63 KOP. 

C4CD 

CB 




INY 


3 ZAEHLER +1 

C4CE 

C0 

03 



CPY 

**03 


C4D0 

D0 

F 6 



BNE 

CONTI2 


C4D2 

A5 

61 



LDA 

*61 

[LAENGE DES ALTEN 

C4D4 

CD 

58 

C0 


CMP 

LENGTH 

3 STR MIT DER DES 

C4D7 

90 

03 



BCC 

C0NT9 

[FELDES VERGLEICHEN 

C4D9 

AD 

SB 

C0 


LDA 

LENGTH 

[ZU LANG,DANN FELD- 

C4DC 

RD 

5D 

C0 

CONT9 

STA 

nilTNCJM 

ILAPNQF AI R 7AFHI.ER 

C4DF 

A0 

00 



LDY 

#*00 

C4E1 

C9 

00 



CMP 

#*00 

[FELD-LAENGE=0 7 

C4E3 

F0 

D9 



BEQ 

NOVAR 

[NICHTS INS FELD 

C4E5 

Bl 

62 


STROUT 

LDA 

<*62>,Y 

(VARIABLE LESEN UND 

C4E7 

C9 

20 



CMP 

#*20 

[LEERZEICHEN DURCH 

C4E9 

D0 

07 



BNE 

CONTIB 


C4EB 

AD 

5C 

C0 


LDA 

FIELDC 

[MARK IERUNGSZEICHEN 

C4EE 

91 

FD 



STA 

<*FD>,Y 

;ERSETZEN 

C4F0 

A9 

ID 



LDA 

#*1D 

[CURSOR RECHTS 

C4F2 

20 

D2 

FF 

CONT1B 

JSR 

BSOUT 

3 AUSGEBEN 

C4F5 

C 8 




INY 


C4F6 

18 




CLC 



C4F7 

CC 

5D 

C0 


CPY 

OUTNUM 

(GANZE VARIABLE 7 

C4FA 

B0 

03 



BCS 

FILSPC 

[JA,REST AUFFUELLEN 

C4FC 

4C 

E5 

C4 


JMP 

STROUT 

3 NEIN, WEITER 

C4FF 

AD 

sc 

C0 

FILSPC 

LDA 

FIELDC 

[RESTLICHE LAENGE 

C502 

CC 

58 

C0 

CONT4 

CPY 

LENGTH 

[MIT MARKIERUNBS- 

C505 

D 0 

06 



BCS 

ALLOUT 

3 ZEICHEN 

C507 

91 

FD 



STA 

<*FD),Y 

[AUFFUELLEN 

C509 

C 8 




INY 



C50A 

4C 

02 

CS 


JMP 

CONT4 


C50D 

AC 

5D 

C0 

ALLOUT 

LDY 

OUTNUM 

;UND CURSOR 

C510 

A9 

9D 


C0NT35 

LDA 

#*9D 

[WIEDER 

C512 

20 

D2 

FF 


JSR 

BSOUT 

;NACH HOME 

C515 

88 




DEY 


;BRINGEN 

C516 

C0 

00 



CPY 

#*00 

C51B 

D0 

F 6 



BNE 

C0NT35 


C51A 

4C 

96 

CI 


JMP 

RSTART 

[ZUR EINGABESCHL. 

Listing 

2. 

Das ausführlich kommentierte Quell-Code- 

Listing 

des » 

Exinput 64« 

(Schluß) 
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Tips und Tricks 


C 64 


Directory auf 
Knopfdruck 

Häufig steht man vor dem Problem, Pro¬ 
gramme direkt, also ohne SYS-Aufrufe, 
über einen Tastencode zu aktivieren. Wir 
zeigen Ihnen, wie man ein Directory auf 
dem Bildschirm ausgibt, ohne ein vorhan¬ 
denes Basic-Programm zu zerstören. 

as Programm »Directory auf Knopfdruck« (siehe 
Listing 1) kann, nachdem es mit Hypra-Ass assembliert 
wurde, mit dem Befehl SYS 49152 aktiviert werden. 
Den erzeugten Maschinencode zeigt Listing 2, das auch 
direkt mit dem MSE eingegeben werden kann. Solange kein 
Reset ausgelöst oder die RUN/STOP-Taste gedrückt wird, 
erscheint bei der Tastenkombination »CTRL-D« das Directory 
auf dem Bildschirm, ohne ein eventuell im RAM stehendes 
Basic-Programm zu zerstören. 

Der hier vorgestellte Lösungsweg, ein beliebiges Pro¬ 
gramm auf Tastendruck aufzurufen, hat den Vorteil, daß er 
allgemeingültig ist und nicht nur auf die Ausgabe des Direc- 
torys beschränkt ist. 

Im allgemeinen müßte das Betriebssystem geändert wer¬ 
den, um eine zusätzliche Tastaturabfrage einzubinden. Aber 
wir haben Glück, denn einige Routinen im Betriebssystem 
werden über einen sogenannten Sprungvektor aufgerufen. 
Alle zugänglichen Sprungvektoren, die sich ändern lassen, 
befinden sich in der dritten Page, also im Bereich von $311 bis 
$333, jeweils im Low-/High-Byte-Förmat. Der zum Einbinden 
einer Tastaturabfrage geeignetste Vektor ist der Interrupt¬ 
vektor, denn diese sogenannte Interrupt-Routine wird 60mal 
pro Sekunde angesprungen. Ein Sprungvektor, der in diese 
Routine verzweigt, befindet sich in den Speicherzellen 
$314/$315. Die Speicherzellen enthalten im Normalzustand 
den Wert $31/$EA. Das bedeutet, daß immer, wenn ein Inter¬ 
rupt ausgelöst wird, zu einer Routine verzweigt wird, die bei 
$EA31 liegt. Schreibt man nun in die Speicherzellen $314/ 
$315 einen anderen Wert, wird bei einem Interrupt nicht mehr 
zur Adresse $EA31, sondern zu der Adresse verzweigt, die in 
den Speicherzellen $314/315 steht, wobei die Adresse 
$314 das Low- und die Speicherzelle $315 das High-Byte der 
anzuspringenden, neuen Interrupt-Routine enthält. Damit 
sich der Vektor aber verändern läßt, muß zuerst der normale 
Interrupt gesperrt werden, denn sonst könnte folgendes pas¬ 
sieren: Angenommen, es wird ein Interrupt ausgelöst, nach¬ 
dem erst das Low-Byte hi die Adresse $314 geschrieben 
wurde, dann nimmt der Computer an, daß die neue Interrupt- 
Routine bei $EAOO plus dem in Adresse $314 stehendem 
Low-Byte liegt, verzweigt an diese Adresse und stürzt ab. 

Mit dem Maschinenbefehl »SEI« für SEt Interruptflag läßt 
sich nun der prozessorinterne Interrupt ausschalten. Dies 
wird in der Zeile 230 im Listing 1 realisiert. Die Zeilen 240 bis 
270 sorgen dafür, daß die Startadresse der neuen Interrupt- 
Routine in die entsprechenden Adressen kommt. Eine Be¬ 
merkung noch zu den Zeilen 240 und 270. Durch das »klei¬ 
ner«- beziehungsweise »größer«-Zeichen läßt sich eine 
16-Bit-Adresse (in diesem Fall »INTER«) in zwei 8-Bit-Zahlen 
splitten. Durch das »kleiner«-Zeichen erhält man das Low- und 
entsprechend für das »größer«-Zeichen das High-Byte. 

Der folgende »CLI«-Befehl (CLear Interruptflag) läßt nun 
den normalen Interrupt wieder zu. Nur wird jetzt, wenn ein 
Interrupt stattfindet, nicht mehr zur Adresse $EA31, sondern 
zur Routine »INTER« verzweigt. Die Aufgabe des Teilpro¬ 


gramms »INTER« ist es, die »CTRL«- und »D«-Taste abzufra¬ 
gen. Sind beide Tasten gleichzeitig gedrückt, wird nach »DIR« 
verzweigt, ansonsten in der Zeile 420 zum normalen Interrupt 
nach $EA31. Die Zeilen 370 und 380 beziehungsweise 400 
und 410 sperren auch den Interrupt, aber auf eine etwas 
andere Art. 

Sie werden sich vielleicht fragen, warum der Interrupt über¬ 
haupt gesperrt werden muß. Die Antwort auf diese Frage ist 
leicht zu geben. Die Bearbeitung der Routine »DIR« dauert 
länger als 1/60 Sekunde. Dadurch würde bereits ein neuer 
Interrupt ausgelöst, bevor der alte abgearbeitet wäre. Die Art, 
wie der Interrupt abgeschaltet wird, wurde mit Absicht so 
gewählt, da einige Routinen im Betriebssystem den Interrupt 
durch den CLI-Befehl wieder zulassen, so auch die Routine 
»CHROUT«, die ein Zeichen auf einem Gerät, hier dem Bild¬ 
schirm, ausgibt. Durch die Befehle »LDA #TIMERAUS« und 
»STA ICR« wird eigentlich nicht der Interrupt abgeschaltet, 
sondern der Timer gestoppt, der den Interrupt auslöst. Doch 
nun zum eigentlichen »DIR«-Programm. 

Die Zeilen 450 bis 550 entsprechen dem Basic-Befehl 
»OPEN 1,8,0,"$"«. Dabei liegt das Augenmerk auf der 
Sekundäradresse »0« und dem Dollarzeichen. Das Dollarzei¬ 
chen als Filename bewirkt, daß das Directory eingelesen wird 
und zwar einschließlich Track 18 Sektor 0. Durch die »0« als 
Sekundäradresse wird das Directory schon soweit aufberei¬ 
tet, daß nur noch die Zeichen, die sich nach einem 
»LOAD"$",8« tatsächlich im RAM befinden, zum Computer 
gesendet werden, inklusive Filetyp, Steuerzeichen, Leerzei¬ 
chen und Anzahl der Blöcke pro File. Leider enthält ein vom 
Floppy-Laufwerk gesendeter Directory-Eintrag auch noch 
Platzhalter für die Zeilenlinkadressen, die wir natürlich nicht 
brauchen und folglich ausblenden beziehungsweise über¬ 
lese, , müssen. Eine vom Floppy-Laufwerk gesendete Direc¬ 
tory-Zeile hat folgendes Format: 

LI LI AB SP "filename SP" SP FT 

LI = Linkbyte; AB = Anzahl der Blöcke pro File im Low/ 
High-Byte-Format; SP = Leerzeichen; FT = Filetyp im Klar¬ 
text. 

Das einzige, was zu tun bleibt, ist die Ausgabe »RETURN« 
am Ende jeder Directory-Zeile (Zeile 811/812). Außerdem 
muß die Information, die die Anzahl der Blöcke pro File ent¬ 
hält, in dezimale Schreibweise umgerechnet und auf dem 
Bildschirm ausgegeben werden. Das ist aber kein Problem, 
denn das Betriebssystem stellt eine solche Routine 
»INTOUT=$BDCD« zur Verfügung. Wenn sie aufgerufen 
wird, muß der Akku das High und das X-Register das Low- 
Byte der auszugebenden Zahl enthalten. Das Low-Byte wird 
in Zeile 590 an das X-Register übergeben. Das High-Byte 
dagegen wird in Zeile 630 durch das Unterprogramm 
»CHRIN« eingelesen und steht automatisch im Akku. 

Zum Programmablauf 

Die Zeilen 570 bis 620 überlesen 4 Byte beim ersten 
Durchlauf. Bei allen weiteren Durchläufen werden immer nur 
die ersten 2 Byte überlesen, die die Zeilenlinkadresse enthal¬ 
ten. Beim ersten Durchlauf wird neben der Zeilenlinkadresse 
auch die Startadresse ($0801) gesendet, die ebenfalls aus¬ 
geblendet werden muß, darum 4 Byte. Bei einem Sprung auf 
das Label »ROWOUT« enthält das Y-Register die Anzahl der 
Byte, die überlesen werden sollen plus 1. Wird die Schleife 
in Zeile 620 verlassen, enthält das X-Register das Low-Byte 
der Zahl, die die Anzahl der Blöcke pro File kennzeichnet. 
Das High-Byte wird in Zeile 630 eingelesen und an den Akku 
übergeben. Die nächste Schleife, die bei dem Label 
»NEXTCHR« beginnt, gibt den Rest eines Directory-Eintrags 
auf dem Bildschirm aus. Der »CMP«-Befehl in Zeile 730 über¬ 
prüft, ob eine »0«, die das Ende des Eintrags kennzeichnet, 
gesendet wurde oder nicht. Bei einer »0« wird nach 
»LASTCHR« verzweigt, ein »RETURN« ausgegeben und zum 
Label »ROWOUT« gesprungen. (ah) 

33 ®' 



152 



C 64 


Tips und Tricks 


10 

-.EQ 

IRQVEKLO = *314 

20 

-.EQ 

IRQVEKHI = *315 

30 

-.EO 

SHIPTFLAG = *281 

40 

-.EQ 

TIHERAUS = *80 

50 

-.EO 

TIMEREIN - 129 

60 

-.EO 

ICR = *DC0E 

70 

-.EQ 

INTERRUPTALT - ; 

80 

-.EQ 

SETNAM - »FFBD 

90 

-.EO 

SETLFS “ »FFBA 

100 

-.EQ 

OPEN - *FFC0 

1 10 

-.EQ 

CHKIN = *FFC6 

120 

-.EO 

CHRIN - »FFCF 

130 

-.EQ 

INTOUT - »BDCD 

140 

-.EO 

CHRQUT = *FFD2 

150 

-.EO 

CLOSE = *FFC3 

151 

-.EQ 

CLRCHN - *FFCC 

160 

-.EO 

STATUS - *90 

170 

-.EQ 

REITEN - *FB 

180 

-.EO 

TASTENCODE » *C! 

190 

-1 


200 

“1 


210 

-.BA 

*C000 

220 

“I 


221 




222 

223 

224 
230 

240 

250 

260 

270 

280 

290 

300 

301 

302 


-S* INTERRUPTVEKTOR NEU SETZEN * 

#*#*#****•****»***#»****#*#*##*# 

SEI 

LDA M<<INTER) 

STA IRQVEKLO 
LDA MXINTER) 

STA IRQVEKHI 
CLI 
RTS 
“5 

-;#####«#####»###»#*»*########»»»# 

NEUE INTERRUPTROUTINE * 


Programm : direktory.obj c000 c085 


C000 

: 

78 

a9 

0d 

Bd 

14 

03 

a9 

C0 

c3 

C00B 

: 

Bd 

15 

03 

58 

60 

a5 

c5 

c9 

ca 

C010 

z 

12 

d0 

14 

ad 

Bd 

02 

c9 

04 

5d 

C018 

: 

d0 

0d 

«9 

80 

Bd 

0e 

de 

20 

e6 

C020 

z 

2a 

ce 

a9 

Bl 

Bd 

0 e 

de 

4c 

9a 

C028 

3 

31 

ea 

a9 

01 

a0 

C0 

a 2 

B4 

fc 

C030 

: 

20 

bd 

ff 

a9 

01 

a 2 

0B 

a 0 

ea 

C03S 

: 

00 

20 

ba 

ff 

20 

C0 

ff 

a 2 

44 

c 040 

3 

01 

20 

c6 

ff 

aO 

05 

B4 

fb 

3f 

C04B 

3 

20 

cf 

ff 

aa 

a4 

fb 

88 

d0 

93 

C050 

: 

f 5 

20 

cf 

ff 

*4 

70 

d0 

23 

al 

C05B 

3 

20 

cd 

bd 

a9 

20 

20 

d2 

ff 

52 

C060 

Z 

20 

cf 

ff 

85 

fb 

c9 

00 

f0 

08 

C06B 

3 

0B 

a5 

fb 

20 

d2 

ff 

4c 

60 

65 

C070 

: 

C0 

«9 

0d 

20 

d2 

ff 


03 

02 

C078 

t 

4c 

46 

C0 

20 

cc 

ff 

a9 

01 

91 

C0B0 

3 

20 

c3 

ff 

60 

24 

ff 

ff 

ff 

d0 


LIsting 2. »Directory auf Knopfdruck« muß mit 
dem MSE eingegeben werden 


303 

****###*»«#*##**###**###-*##**### 

304 





310 

-INTER 

LDA 

TASTENCODE 


320 

- 

CMP 

Ml 8 

jIST DIE TASTE >>D<< GEDRUECKT? 

330 

- 

BNE 

INTERE 

;WENN NEIN DANN ZUM NORMALEN INTERRUPT 

340 

- 

LDA 

SHIFTFLAG 


350 

- 

CMP 

#4 

;IST >>CTRL<< GEDRUECKT? 

360 

- 

BNE 

INTERE 

;WENN NEIN DANN ZUM NORMALEN INTERRUPT 

370 

- 

LDA 

MTIMERAUS 

;TIMER AUSSCHALTEN/INTERRUPT SPERREN 

380 

— 

STA 

ICR 


390 

- 

JSR 

DIR 

;UND ZUM UNTERPROGRAMM DIR 

400 

- 

LDA 

MTIHEREIN 

;TIMER EINSCHALTEN/INTERRUPT ZULASSEN 

410 

- 

STA 

ICR 


420 

—INTERE 

JMP 

INTERRUPTALT 

430 





440 

— s 




441 

-;**#***#**#***•»#*****#*#***#*»*** 

442 


DIRECTORY 

• 

443 

—i» 

AUSGEBEN 

* 

444 

##*#*****###*###*##*#####*#**#** 

445 

» 




450 

-DIR 

LDA 

Ml 

; LAENGE DES FILENAMENS 

460 

- 

LDY 

M> (NAME) 


470 

- 

LDX 

M<(NAME) 


480 

- 

JSR 

SETNAM 

iFILENAMENPARAMETERSET ZEN 

490 

- 

LDA 

Ml 

I LOGISCHE FILENUMMER - 1 

500 

- 

LDX 

MB 

;GERAETEADRESSE - 8 

510 

- 

LDY 

M0 

;SEKUNDAERADRESSE = 8 

520 

- 

JSR 

SETLFS 

(LOBISCHE FILENUMMER UND SEKUNDAERADR. 

330 

— 

JSR 

OPEN 


540 

- 

LDX 

Mi 

I LOGISCHE FILENUMMER 

550 

- 

JSR 

CHKIN 

; EINGABEGERAET SETZEN 

560 

- 

LDY 

M5 

; DIE ERSTEN 5 ZEICHEN UEBERLESEN 

570 

-ROWOUT 

STY 

RETTEN 


5B0 

- 

JSR 

CHRIN 

SEINGABE EINES ZEICHENS 

590 

- 

TAX 


1LO-BYTE BLOCKANZAHL INS X-REGISTER 

600 

- 

LDY 

RETTEN 


610 

- 

DEY 



620 

- 

BNE 

ROWOUT 


630 

- 

JSR 

CHRIN 

I HI-BYTE BLOCKANZAHL IN DEN AKKU 

640 

- 

LDY 

STATUS 

;IST FILEENDE SCHON ERREICHT? 

650 

- 

BNE 

ENDE 

;WENN JA DANN FERTIG 

670 

- 

JSR 

INTOUT 

jANZAHL DER BLOECKE AUSGEBEN (X/AKKU) 

690 

- 

LDA 

M" H 

;BLANK AUSGEBEN 

700 

- 

JSR 

CHROUT 


710 

-NEXTCHR 

JSR 

CHRIN 

;NAECHSTES ZEICHEN HOLEN 

720 

- 

STA 

RETTEN 

;UND RETTEN 

730 

- 

CMP 

M0 

!IST FILEEINTRAG AUSGEGEBEN? 

740 

- 

BEQ 

LASTCHR 

; WENN JA DANN RETURN AUSGEBEN 

790 

- 

LDA 

RETTEN 

;ANSONSTEN MUSS NOCH DAS LETZTE ZEICHE 

800 

- 

JSR 

CHROUI 

jAUSGEGEBEN WERDEN 

810 

- 

JMP 

NEXTCHR 


81 1 

-LASTCHR 

LDA 

M 13 

; »RETURN<< AUSGEBEN 

Bl 2 

- 

JSR 

CHROUT 


Bl 3 

— 

LDY 

M*3 

.3 ZEICHEN UEBERLESEN 

B1 4 

- 

JMP 

ROWOUT 


B20 

-ENDE 

JSR 

CLRCHN 

; EIN- UND AUSGABEKANAELE 

030 

- 

LDA 

Ml 

; UND LOGISCHES FILE SCHLIESSEN 

840 

- 

JSR 

CLOSE 


850 

- 

RTS 



B60 

— ! 




B70 

NAME 

. TX 

, **" 



w- 


Listing 1. »Directory 
auf Knopfdruck«. 

Der Quelltext wurde 
mit Hypra-Ass erstellt. 






153 




















Tips und Tricks 


C 64 


Tips und 
Tticks 

zu Hypra-Ass 

Hypra-Ass, ein Assembler der Spitzen¬ 
klasse beherrscht alles, was zum Program¬ 
mieren in Maschinensprache erforderlich 
ist. Hier wollen wir Ihnen anhand vieler Bei¬ 
spiele zeigen, was in ihm steckt und was er 
wirklich leistet. 

H ypra-Ass ist einer der leistungsfähigsten Assembler 
die zur Zeit auf dem Markt sind. Eine seiner hervor¬ 
stechendsten Eigenschaften ist der integrierte Editor 
mit einer formatierenden LIST-Routine. Aber gerade durch 
diese Eigenschaft weicht die Bedienung vom normalen 
Basic-Editor ab. Dadurch traten bei vielen Lesern Schwierig¬ 
keiten auf, die hier im einzelnen behandelt werden. 

Im Gegensatz zum Basic-Editor kann unter Hypra-Ass eine 
Zeile nicht dadurch gelöscht werden, daß nur die Zeilennum¬ 
mer eingegeben und anschließend RETURN gedrückt wird. 
Bei Hypra-Ass ist unbedingt darauf zu achten, daß hinter der 
Zeilennummer ein Minuszeichen eingegeben wird. Drückt 
man nun die RETURN-Taste ist die Zeile auch verschwunden. 
Da aber dieses Minuszeichen hinter der Zeilennummer mei¬ 
stens vergessen wird, ist es empfehlenswert, nicht nur Zei¬ 
lenbereiche, sondern auch einzelne Zeilen mit dem Editor- 
Befehl »/D zeilennummer« zu löschen, bis auf die Zeile »0«, 
die sich mit dem »/D«-Befehl nicht löschen läßt. In diesem Fall 
geben Sie bitte »0-« < RETURN> ein. 

Ein kleiner Fehler tritt beim Sortieren der Symboltabelle auf. 
Hypra-Ass stürzt ab, wenn die Symboltabelle genau 36, 73, 
109 (und so weiter) Variablen oder Label enthält. Der Fehler 
liegt in den Speicherzellen $1EB8 bis S1EBB. Hier wurden 
zwei Branch-Befehle vertauscht. Es muß richtig lauten: 

1EB8 9OD0 BCC 1EA8 
1EBAD0 04 BNE1EC0 

Diese Änderung kann unmittelbar mit einem Monitor in die 
entsprechenden Speicherzellen geschrieben und anschlie¬ 
ßend gespeichert werden. Sollten Sie keinen Monitor haben, 
dann geben Sie bitte den folgenden Quelltext ein: 

10 - BA $C000 
;STARTADRESSE = $0000 
20- LDV #0 

30 - LBL LDA TAB.Y 

KORREKTUREN VORNEHMEN 
40- STA $1EB8,Y 

50 - INY 

60- CPY #4 

70 - 8NE LBL 

80 -.EQ SOURCESTART = S1FD8 ;UND DIE KORRIGIERTE 
90 -.EQ NAMLEN = 12 ;VERSION SPEICHERN 


100- 

LDA #1 

110- 

LDX #8 

120- 

STA $FE 

130- 

STX $FF 

140- 

LDA #8 

150- 

JSR $FFBA 

160- 

LDA #NAMLEN 

170- 

LDX # <(NAME) 

180- 

LDY # >(NAME) 


190- 

JSRSFFBD 

200- 

LDA # $FE 

210- 

LDX #< (SOURCESTART) 

220- 

LDY #> (SOURCESTART) 

230- 

JMPSFFD8 

240-; 


250-NAME 

.TX " HYPRA-ASS.V1 * 

260-TAB 

,BY $9O,$D0,$DO,$O4 


Nach dem Assemblieren wird mit SYS 49152 < RETURN > 
Hypra-Ass geändert und unter dem neuen Namen »Hypra- 
Ass.VI« auf Diskette gespeichert. 

Der »/A«-Befehl zur automatischen Zeilennumerierung rea¬ 
giert auch recht sensibel. Wird mit diesem Befehl gearbeitet, 
darf der Cursor mit den entsprechenden Steuertasten auf 
keinen Fall auf eine andere Zeile gesetzt und RETURN 
gedrückt werden. Sollte das versehentlich doch einmal pas¬ 
sieren, läßt sich die so entstandene, ewas seltsam ausse¬ 
hende Zeile mit dem »/D«-Befehl problemlos löschen. 

Diskettenbefehle können mit dem Editorbefehl */@« zum 
Floppy-Laufwerk gesendet werden. Hinter den Editorbefehl 
werden dann die Diskettenbefehle unmittelbar angehängt. 
So formatiert der Befehl »/@N: NEWDISK, ND« eine neue 
Diskette. 


Der Editor 


Eine feine Sache ist auch das Arbeiten mit dem »/P«-Befehl, 
der dazu dient, Arbeitsseiten beziehungsweise Arbeitsberei¬ 
che anzulegen. Durch diesen Befehl, auf den sich die mei¬ 
sten Editor-Befehle beziehen, ist es möglich, jedem zusam¬ 
menhängenden Quelltextteil (Unterprogramme oder Unter- 
progi cmmblöcke) einen Arbeitsbereich zuzuordnen. Möchte 
man dann in der Page 3 etwas ändern oder nachschauen, 
LISTet der Befehl»/3« nur diesen Bereich und nicht das kom¬ 
plette Listing wie bei dem »/E«-Befehl. Legt man nun die ein¬ 
zelnen Arbeitsbereiche gleich von vornherein so an, daß sie 
jeweils einen Zeilenbereich von zum Beispiel 5000 Zeilen 
überdecken, dürfte für die einzelnen Quelltextteile genügend 
Platz vorhanden sein, so daß beim Durchnumerieren der ein¬ 
zelnen Arbeitsbereiche keine Überlappungen auftreten kön¬ 
nen. Die Arbeitsbereiche selbst dürfen sich aber durchaus 
überlappen. So läßt sich zum Beispiel ein Arbeitsbereich von 
0 bis 5000, ein zweiter von 10000 bis 15000 und ein dritter 
von 0 bis 15000 anlegen. 

Bei dem Assembler selbst sind bisher keine Fehler 
bekannt. Deshalb möchte ich an dieser Stelle auf einige 
Dinge eingehen, mit denen viele Leser Schwierigkeiten hat¬ 
ten. Da wäre zum Beispiel das unmittelbare Erzeugen des 
Objektcodes auf Diskette mit dem ».OB«-Pseudo-Opcode. 

Der Pseudo-Opcode ».OB "filename,P,W"« muß am 
Anfang des Quelltextes stehen und zwar in der ersten bezie¬ 
hungsweise zweiten Zeile (nach dem ».LI«-Pseudo zur Aus¬ 
gabe des Assembler-Listings). In dem Zusammenhang sei 
auch erwähnt, daß es unmöglich ist, den Objektcode und 
gleichzeitig das Assembler-Listing mit dem Befehl ».LI 
2,8,2, "filename.U.W"« auf Diskette zu erzeugen. Der Grund 
ist der, daß zwei Kanäle zum Schreiben geöffnet werden 
müßten und das ist nicht möglich. Zu dem ».OB«-Pseudo 
gehört unmittelbar ein zweiter Pseudo ».EN«, der das mit »file- 
name« gekennzeichnete File schließt. Dazu muß dieser 
Pseudo am Ende des Quelltextes stehen. Sollten mit dem 
».AP« mehrere Quelltexte verkettet werden, muß der »,EN«- 
Pseudo am Schluß des letzten Quelltextes auftauchen. 

Bei der Anwendung von Makros gab es auch einige 
Schwierigkeiten. Wird zum Beispiel von einem Makro (Ord¬ 
nung 1) zweimal ein weiteres Makro (Ordnung 2) aufgerufen, 
meldet Hypra-Ass einen »label twice error«, vorausgesetzt, 
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im Makro zweiter Ordnung befindet sich ein Label. Zum Bei¬ 
spiel würde folgendes Programm zu einer solchen Fehlermel¬ 
dung führen: 

10-.BA $C000 
20 -.MA MAKI 

;MAKRODEFINITION 1. ORDNUNG 
30- ... MAK2 

;MAKROAUFRUF 2. ORDNUNG 
40 - ... MAK2 
50 -.RT 

60-.MA MAK2 
70-LBL NOP 
80 -.RT 

90 - ... MAKI 

Dabei ist Maki das Makro 1. Ordnung und Mak2 das Makro 
2. Ordnung. Alle Label in Makros zweiter oder dritter Ordnung 
sind untereinander global. Das heißt, daß in Makros zweiter 
Ordnung nur einmal das Label mit dem Namen »LBL« definiert 
werden dürfte. 

Im Augenblick wird an einer Erweiterung gearbeitet, die 
diesen Mißstand beseitigt. Denn gerade beim intensiven 
Arbeiten mit Makros sind Makros zweiter und sogar dritter 
Ordnung unabdingbar. Ganz deutlich sieht man dies an dem 
Artikel »Wichtige Makros für Hypra-Ass« in dieser Ausgabe. 
Dort wurde ein Makro mit dem Namen »INCW (adresse)« 
definiert. Würde man die dort stehende 16-Bit-Addition er¬ 
setzen durch: 

INC ADRESSE 

BNE LBL 

INC ADRESSE+1 

LBL 

könnte dieses Makro von keinem anderen Makro aus zweimal 
aufgerufen werden, weil durch das Label »LBL« ein »label 
twice error« erscheinen würde. 

Der gleiche Fehler erscheint natürlich auch dann, wenn ein 
anderes Makro aufgerufen wird, das »LBL« als Label oder 
Variable benutzt. Denn die Ordnungszahl, die den beiden 
Labein »LBL« zugewiesen wird, ist identisch. 

Bedingte Assemblierung 


Auch mit der bedingten Assemblierung wissen nur die wenig¬ 
sten etwas anzufangen, obwohl sie gerade im Zusammen¬ 
hang mit Makros eine große Rolle spielt. Dies soll an einem 

kleinen Beispiel demonstriert werden: 


des Akkumulators erhalten bleiben, wird für RETTEN eine 1, 
ansonsten eine beliebige andere Zahl eingegeben. Anhand 
des Übergabeparameters RETTEN erkennt der Assembler, 
ob das erzeugte Maschinenprogramm den Maschinenbefehl 
»PHA« beziehungsweise »PLA« enthalten soll oder nicht. Die 
Befehle zur bedingten Assemblierung zeigen also einzig und 
allein eine Wirkung beim Assemblieren. Durch sie wird 
bestimmt, welche Teile des Quelltextes im erzeugten Maschi¬ 
nenprogramm stehen und welche unter bestimmten Bedin¬ 
gungen übersprungen werden sollen. Schauen Sie sich nun 
noch einmal die Zeilen 20 und 120 an. Sie finden dort in der 
bedingten »,IF«-Abfrage den Operator »=«, der wie alle ande¬ 
ren Operatoren auch in Ausrufezeichen einzufassen ist. 
Durch dieses Ausrufezeichen erkennt Hypra-Ass, daß es 
sich bei dem Operator »=« um eine Rechenvorschrift aus 
dem Quelltext heraus handelt. Alle Operatoren können außer 
bei der bedingten Assemblierung zum Beispiel auch bei der 
unmittelbaren Adressierung angewendet werden. Ein kleines 
Beispiel soll die Wirkung dieser Operatoren bei der unmittel¬ 
baren Adressierung verdeutlichen: 

20 -.EQ VARIABLEI = 10 

30 -.EQ VARIABLE2 = 20 

40 - LDA # (VARIABLEI !0! VARIABLE2) 

Der Akkumulator wird mit einer Zahl geladen, die mit der 
Variablen »VARIABLEI« und »VARIABLE2« wie im Basic 
geORt wird. Das Ergebnis ist folglich 30. 

Viele Maschinensprache-Anfänger verwechseln die 
Befehle zur bedingten Assemblierung mit normalen Basic- 
Befehlen. Deshalb möchte ich an einem kleinen Beispiel zei¬ 
gen, was nicht mit der bedingten Assemblierung funktioniert: 

10 -,ba scooo 

2G INC $D020 

30 -.GO 20 

Was nicht funktioniert 


Das Programm sollte die Bildschirmrahmenfarbe laufend 
um 1 incrementieren. Wird der Assembler jedoch gestartet, 
ersetzt er den Befehl ».GO 20« nicht durch den Befehl 
»JMP adresse«. Vielmehr versucht er den gesamten Spei¬ 
cher von $0000 bis unendlich mit dem Befehl »INC $D020« 
zu füllen, denn es fehlt jegliche Abbruchbedingung. Nur mit 
einer Abbruchbedingung ist der ».GO«-Befehl sinnvoll. Sollte 
das Maschinenprogramm zehnmal hintereinander den Befehl 
»INC $D020« enthalten, könnte das so aussehen: 


io 

20 

30 

40 

50 

60 

70 

80 

90 

100 

110 

120 

130 

140 

150 


- MA ADW (ADR1.ADR2,SUMME,RETTEN) 


-.IF RETTEN ! = ! 1 


-.El 


PHA 


NUR WENN RETTEN 
= 1, WIRD 

PHA IN DAS MASCHI¬ 
NENPROGRAMM 
ASSEMBLIERT 


CLC 

LDA ADR1 
ADC ADR2 
STA SUMME 
LDA ADR1 + 1 
ADC ADR2 + 1 
STA SUMME + 1 

-.IF RETTEN ! = ! 1 ;NUR WENN RETTEN 

= 1, WIRD 

PLA ;PLA IN DAS 

MASCHINENPROGRAMM 
-.El ; ASSEMBLIERT 


-.RT 


Dieses Makro addiert (ADR1,ADR1 + 1) + (ADR2,ADR2 + 1) 
und speichert das Ergebnis in den Speicherzellen 
(SUMME,SUMME + 1). ADR1, ADR2 und SUMME können 
beliebige Speicherzellen oder Variablen sein. Soll der Inhalt 



10 

-.LI 1,3 


20 

-.BA SCOOO 


30 

-.EQ A = 0 


40 

-.EQ A = A + 1 

50 

- 

INC SD020 

60 

-.IF A !<! 11 


70 

-.GO 40 


80 

-.El 


90 


JMP SCOOO 


Der Assembler überprüft in Zeile 60, ob die Variable »A« 
kleiner 11 ist. Trifft das zu, wird in Zeile 70 durch den »,GO«- 
Befehl zur Zeile 40 verzweigt und der Befehl »INC $D020« 
ein weiteres Mal assembliert. Sobald »A« gleich 10 ist, ver¬ 
zweigt der Assembler in die Zeile 90, übersezt den Befehl 
»JMP SCOOO« und beendet den Assembliervorgang. 

Sollte Ihnen der Umgang mit Makros und der bedingten 
Assemblierung noch nicht klar sein, empfehle ich Ihnen den 
Artikel »Assemblerbedienung leicht gemacht (2)« in der 64’er 
Ausgabe 1/85. In diesem Artikel wird ausführlich auf den 
Gebrauch von Makros und eben der bedingten Assemblie¬ 
rung eingegangen. 

(ah) 
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Wichtige 
Makros zum 
Assembler 
Hypra-Ass 

Der beschränkte Befehlssatz des 6502- 
Prozessors macht Maschinenprogramme 
unübersichtlich und fehleranfällig. Wir zei¬ 
gen Ihnen hier, wie sich mit Hypra-Ass der 
Maschinen-Befehlssatz durch Makros er¬ 
weitern läßt. Aber nicht nur das ist mög¬ 
lich, Sie können sich auch Ihre eigene, 
ganz persönliche Sprache basteln. 

B esonders dem Maschinensprache-Anfänger dürfte 
das Wort »Makro« gänzlich unbekannt sein. Denn 
weder das im C 64 implementierte noch irgendein 
anderes Basic kennt die Definition eines Makros. Das ist 
wahrscheinlich auch der Grund dafür, warum Makros nur sel¬ 
ten angewendet werden. Sie spielen jedoch gerade beim 
6502- beziehungsweise 6510-Prozessor eine wichtige 
Rolle. Durch Makros läßt sich nämlich der bescheiden ausge¬ 
fallene Befehlssatz des Prozessors um wichtige Befehle 
erweitern. Es werden durch Makros prinzipiell keine neuen 
Maschinenbefehle geschaffen, sind aber Makros einmal defi¬ 
niert, lassen sie sich aufrufen wie ganz normale Maschinen¬ 
befehle. Was sind nun eigentlich Makros? Dies soll an einem 
kleinen Beispiel erklärt werden. 

Angenommen, Sie möchten in einem Maschinenprogramm 
20 verschiedene 16-Bit Adressen inkrementieren, dann 
müßte Ihr Programm zwangsläufig zwanzigmal folgende 
Befehlsfolge enthalten: 

INC ADRESSE 
BNE T.BL 
INC ADRESSE+1 

LBL 

Diese 20 Befehlsfolgen machen aber das Programm un¬ 
übersichtlich und vor allen Dingen fehleranfällig. Genau so gut 
ließe sich auch ein Makro mit dem Namen »INCW (adresse)« 
für INCWord definieren, das dann anstelle der Befehlsfolgen 
20mal im Quelltext erscheint. Das Makro selbst würde wie 
folgt aussehen: 

10 -.MA INCW (ADRESSE) 

20 - INC ADRESSE 

30 - BNE LBL 

40 - INC ADRESSE+1 

50 -LBL 
60 -.RT 

Aufgerufen wird das Makro im Quelltext nun durch den 
neuen Befehl»... INCW (adresse)«. 

Gefolgt von dem Makronamen und in Klammern den Über¬ 
gabeparametern, die durch Kommata getrennt werden, leitet 
der ».MA«-Pseudo-Opcode die Definition eines Makros ein. 
Dies geschieht in Zeile 10. Der Pseudo-Opcode ».RT« in Zeile 
60 schließt die Definition des Makros ab. Alle im Makro ste¬ 
henden Label sind lokal. Das heißt, daß dem Programm außer¬ 
halb des Makros die internen Label unbekannt sind. Würde 


dies nicht so sein, dann würde der Assembler den zweiten 
Makroaufruf mit der Fehlermeldung »label twice error« ahn¬ 
den. Was macht der Assembler, wenn er auf einen Makroauf¬ 
ruf stößt? Er assembliert in den Objektcode, wie man das 
erzeugte Maschinenprogramm auch nennt, die Befehlsfol¬ 
gen, die im Makro definiert wurden. Das heißt, daß letztend¬ 
lich im erzeugten Maschinenprogramm wieder zwanzigmal, 
um bei dem Beispiel zu bleiben, die oben stehenden Befehls¬ 
folgen auftauchen. 

Im Listing sind die wichtigsten Makros aufgeführt. Neben den 
»Befehlserweiterungen« ist noch eine interessante Gruppe 
von Makros definiert worden, die die strukturierte Program¬ 
mierung durch »Repeat...Until«- und »While...Endwhile«- 
Schleifen unterstützt. Zu beachten ist jedoch, daß die Schlei¬ 
fen nicht verschachtelt werden dürfen. Schleifenkonstruktio¬ 
nen wie 

REPEAT 


REPEAT 


UNTIL 

UNTIL 

sind veboten. Die einzelnen Makros haben folgende Wirkung: 
TXY : Das Y-Register wird mit dem Inhalt des X-Registers ge¬ 
laden. 

TYX: Das X-Register wird mit dem Inhalt des Y-Registers ge¬ 
laden. 

PHX: Das X-Register wird auf dem Stack abgelegt. 

PHY : Das Y-Register wird auf dem Stack abgelegt. 

PLX: Das X-Register wird vom Stack geholt. 

PLY: Das Y-Register wird vom Stack geholt. 

Die folgenden vier Makros definieren einen Userstack, der an 
eine beliebige Stelle gelegt werden kann. Dazu muß im Haupt¬ 
programm eine globale Variable mit dem Namen »USER« in 
der Zeropage angelegt werden. Anschließend muß in die 
Adresse, die die Variable repräsentiert, die Startadresse des 
Stacks geschrieben werden. Das könnte so aussehen: 

10 -.GL USER = 3 

20 - LDA #0 ; L0-BYTE 

STARTADRESSE USERSTACK 

30 - STA USER 

40 - LDA #$C0 ;HI-BYTE 

STARTADRESSE USERSTACK 

50 - STA USER+1 

Hier wurde ein Userstack angelegt, der bei Adresse $C000 
beginnt. Der Stackpointer, also der Zeiger, der auf die aktuelle 
Stackadresse zeigt, steht in der Zeropage in den Speicher¬ 
zellen 3 und 4. 

PUSHA: Der Inhalt des Akkumulators wird auf dem Userstack 
abgelegt. 

PUSHAY: Der Inhalt des Akkumulators und der Inhalt des 
Y-Registers werden auf dem Userstack abgelegt. 

PULLA: Der Akkumulator wird vom Userstack geholt. 
PULLAY: Der Akkumulator und das Y-Register werden vom 
Userstack geholt. 

ADW (adresse): 16-Bit Addition. Der Inhalt einer beliebigen 
Adresse wird zum Inhalt des Akkumulators (Low-Byte) und 
zum Inhalt des Y-Registers (High-Byte) addiert. Das Ergebnis 
steht anschließend im Akkumulator (Low-Byte) und im Y- 
Register (High-Byte). 

ADMW (adr1,adr2,summe): 16-Bit Addition. Der Inhalt von 
adrl und adrl + 1 wird zum Inhalt der Adresse adr2 und 
adr2 +1 addiert und das Ergebnis in der Adresse summe und 
summe+1 abgelegt. 

SBCW (adresse): 16-Bit Subtraktion. Der Inhalt von adresse 
und adresse+1 wird vom Inhalt des Akkumulators (Low-Byte) 
und vom Inhalt des Y-Registers (High-Byte) abgezogen. Das 
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Ergebnis steht anschließend im Akkumulator (Low-Byte) und 
im Y-Register (High-Byte). 

SBCMW (adr1,adr2,diff): 16-Bit Subtraktion. Vom Inhalt adrl 
undadrl + 1 wird der Inhalt von adr2 undadr2 + 1 abgezogen. 
Das Ergebnis wird in der Adresse diff und diff+1 abgelegt. 
INCW (adresse): Der Inhalt von adresse und adresse+1 wird 
inkrementiert. Das Ergebnis steht in adresse und adresse +1. 
DECW (adresse): Der Inhalt von adresse und adresse + 1 
wird dekrementiert. Das Ergebnis steht in adresse und 
adresse+1. 

LDAY (adresse): Der Akkumulator wird mit dem Inhalt von 
adresse und das Y-Register mit dem Inhalt von adresse+1 
geladen. 

STAY (adresse): Der Inhalt des Akkumulators wird nach 
adresse und der Inhalt des Y-Registers nach adresse + 1 
geschrieben. 

LDAYI (wert): Der Akkumulator und das Y-Register wird mit 
»wert« unmittelbar geladen. Dabei steht das Low-Byte im 
Akkumulator und das High-Byte im Y-Register. 

Die folgenden Makros unterstützen die strukturierte Pro¬ 
grammierung. 


REPEAT, EXITREPEAT, UNTIL (Übergabe,bedingung): Die 

Schleife wird so lange fortgesetzt, bis die Speicherzelle 
»Übergabe« den Wert »bedingung« enthält. Beispiel: 


10 - 

LDX #255 

20 - 

... REPEAT 

30 - 

DEX 

40 - 

STX $FB 

50 - , 

... UNTIL ($FB,0) 

Das X-Register wird solange dekrementiert, bis es den Wert 

»0« enthält. 


WHILE (Übergabe,bedingung), EXITWHILE, ENDWHILE: 

Die Schleife wird solange fortgesetzt, bis der Inhalt der Spei¬ 
cherzelle »Übergabe« gleich »bedingung« ist. Beispiel: 

10 - 

LDX #255 

20 - 

... WHILE ($FB,0) 

30 - 

DEX 

40 - 

STX $FB 

50 - 

... ENDWHILE 


Solange der Inhalt der Speicherzelle SFB ungleich Null ist, 
wird das X-Register dekrementiert. 

(ah) 


READY. 

20 

-!* 

WE1TERE VERSCHIEBEBEFEHLE * 

30 




40 

-s 



50 

-i * 

-> Y 


60 

-.MA 

TXY 


70 

— 


PHA 

80 

— 


TXA 

90 

— 


TAY 

100 

- 


PLA 

110 

-.RT 



120 

-t 



130 

-i V 

-> X 


140 

-.MA 

TYX 


150 

- 


PHA 

160 

— 


TYA 

170 

— 


TAX 

180 

— 


PLA 

190 

-.RT 



200 




210 

x- 

-REGISTER AUF DEN STACK 

220 

-.MA 

PHX 


230 

-.ED 

RETTEN - »FC 

240 

— 


STA RETTEN 

250 

— 


TXA 

260 

— 


PHA 

270 

— 


LDA RETTEN 

280 

-.RT 



290 




300 

Y-REGISTER AUF DEN STACK 

310 

-.MA 

PHY 


320 

-.EQ 

RETTEN = »FC 

330 

— 


STA RETTEN 

340 

— 


TYA 

350 

— 


PHA 

360 

— 


LDA RETTEN 

370 

-.RT 



380 

-? 



590 

-1 X 

-RFGIHTFR VOM STACK HOLEN 

400 

-.MA 

PLX 


410 

-.EQ 

RETTEN - »FC 

420 

- 


STA RETTEN 

430 

— 


PLA 

440 

— 


TAX 

450 

— 


LDA RETTEN 

460 

-.RT 



470 

-» 



480 

-i V 

-REGIBTER VUM STACK HOLEN 

490 

-.MA 

PLY 


500 

-.EQ 

RETTEN - »FC 

510 

- 


STA RETTEN 

520 

— 


PLA 

530 

- 


TAY 

540 

— 


LDA REITEN 

530 

-.RI 



560 

“1 



5/0 

-« DLN AKKU AUF USERSTACK 

580 

-.MA 

PUBHA 


590 

— 


... PHY 

600 

— 


LDY «0 

610 

- 


STA (USER),Y 

4M 

- 


... DECW(USER) 

630 

— 


... PLY 

640 

-.RT 



650 




660 

-(AKKU UND 

Y-REGISTER AUF USERSTACI 

670 

-.MA 

PUSHAY 

680 

- 


PHA 

690 

— 


TYA 

700 

- 


... PUSHA 

710 

- 


PLA 

720 

- 


... PUSHA 

730 

-.RT 



740 

-i 



750 

-; AKKU VON USERSTACK 

760 

-.MA 

PULLA 


770 

- 


... INCW(USER) 

780 

- 


... PHY 


790 

— 


LDY H0 

B00 

— 


LDA (USER),Y 

Bl 0 

- 


... PLY 

820 

-.RT 



830 

“1 



840 

— X AKKU UND 

Y-REGISTER VON USERSTACK 

850 

-.MA 

PULLAY 

860 

- 


... PULLA 

870 

- 


TAY 

880 

- 


... PULLA 

890 

-.RT 



900 

-i 



910 

-1 *»***»****#*###»*****»#*»****«** 

920 

—; « 

16-BIT BEFEHLE * 

930 


940 

— • 



950 

—■ A/Y + ADRESSE - A/Y AKKU-LO 

960 

970 

-.MA 

ADW (ADRESSE) 

cLc 

980 

— 


ADC ADRESSE 

990 

— 


PHA 

1000 

— 


TYA 

1010 

— 


ADC ADRESSE+1 

1020 

— 


TAY 

1030 

- 


PLA 

1040 

-.RT 



1050 




1060 

-| ADIERE 

ADR1 + ADR2 - SUMME 

1070 

-.MA 

ADMW 

(ADR1 V ADR2,SUMME) 

1080 

— 


PHA 

1090 

— 


CLC 

1100 

- 


LDA ADR1 

1110 

— 


ADC ADR2 

1120 

- 


STA SUMME 

1130 

- 


LDA ADR1+1 

1140 

- 


ADC ADR2+1 

1150 

- 


STA SUMME+1 

1160 

— 


PLA 

1170 

-.RT 



1180 




1 190 

-i A/V - ADRESSE - A/Y AKKU-LO 

1200 

-.MA 

SBCW 

(ADRESS) 

1210 

— 


SEC 

1220 

- 


SBC ADRESSE 

1230 

— 


PHA 

1240 

- 


TYA 

1250 

- 


BBC ADRESSE+1 

1260 

- 


TAY 

12/0 

- 


PLA 

1280 

-.RT 



1290 

”1 



1300 

-t ADR1 - 

ADR2 - DIFFERENZ 

1310 

-.MA 

SBCMW 

(ADR 1,ADR2,DIFF) 

1320 

- 


PHA 

1330 

- 


SEC 

1340 

- 


LDA ADR1 

1350 

- 


SBC ADR2 

1360 

- 


STA DIFF 

1370 

- 


LDA ADR1+1 

1380 

— 


SBC ADR2+1 

1390 

- 


STA DIFF+1 

1400 

- 


PLA 

1410 

-.RT 



1420 

-1 



1430 

-j ADRESSE 

- ADRESSE + 1 

1440 

-.MA 

INCW 

(ADRESSE) 

1450 


PHA 

1460 

— 


LDA ADRESSE 

1470 

— 


CLC 

1480 

- 


ADC Hl 

1490 

— 


STA ADRESSE 

1500 

— 


LDA ADRESSE+1 

1510 

- 


ADC W0 

1520 

- 


STA ADRE9SE+1 

1530 

— 


PLA 

1540 

-.RT 




1590 - 
1600 - 
1610 - 
1620 - 
1630 - 
1640 - 
1650 - 
1660 - 
1670 FU¬ 


LDA ADRESSE 

SEC 

SBC *1 

STA ADRESSE 

LDA ADRESSE+1 

SBC #0 

STA ADRESSE+1 
PLA 


16B0 

1690 ADRESSE -> A/Y AKKU=LQ 
1700 -.MA LDAY (ADRESSE) 

1710 - LDY ADRESSE+1 

1720 - LDA ADRESSE 

1730 -.RT 
1740 

1750 A/Y -> ADRESSE AKKU-LO 
1760 -.MA STAY (ADRESSE) 

1770 - STA ADRESSE 

17B0 - STY ADRESSE+1 

1790 -.RT 
1B00 -j 

1810 -j WERT=16BIT -> A/Y 
1020 -.MA LDAYI (WERT) 

1830 - LDA H< (WERT) 

1840 - LDY #>(WERT) 


1850 -.RT 


1860 -j *«*********•«****#•###**#■*#•#** 


1870-s« BEFEHLE ZUR STRUKTURIERTEN * 
1080 PROGRAMMIERUNG * 


1890 ********»»******•**•««»**•**••*» 


1900 -» 

1910 -.MA REPEAT 


1920 

-ACE1 

.GL 

ACE0=ACE1 

1930 

-.RT 



1940 

-j 



1950 

-.MA EXITREPEAT 

1960 

- 

JMP 

BCE0 

1970 

-.RT 



1980 

-* 



1990 

-.MA UNTIL 

(UEBERGABE, BEDINGUNG) 

2000 

- 

PHA 


2010 

- 

LDA 

UEBERGABE 

2020 

- 

CMP 

HDEDINGUNG 

2030 

- 

BEO 

LBL1 

2040 

- 

PLA 


2050 

- 

JMP 

ACE0 

2060 

-LBL1 

PLA 


2070 

-.GL BCE0-I 

LBL1 


20B0 

-.RT 



2090 

-| 



2100 

-.MA WHILE 

(UEBE RGABE,BE DINGUNG) 

2110 

-CCE0 

.GL 

CCE0-CCE0 

2120 

- 

PHA 


2130 

— 

LDA 

UEBERGABE 

2140 

— 

CMP 

HBEDINGUNG 

2150 

— 

BNE 

LBL1 

2160 

— 

JMP 

CCE1 

2170 

-LBL1 

PLA 


2180 

-.RT 



2190 

- j 



2200 

-.MA EXITWHILE 


2210 

- 

PHA 


2220 

— 

JMP 

CCE1 

2230 

-.RT 



2240 




2250 

-.MA ENDWHILE 


2260 

- 

JMP 

CCE0 

2270 

—CCE1 

.GL 

CCE1-CCE1 

2280 

— 

PLA 


2290 

-.RT 




1550 -; 

1560 -; ADRESSE = ADRESSE - 1 
1570 -.MA DECW (ADRESSE) 

1580 - PHA 


Listing. Die wichtigsten Makros zum Assembler 
»Hypra-Ass« 
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Tips&TVicks 

ausführlich 

erklärt 

Die folgenden Programmbeispiele sollen 
vor allem dem Anfänger den Einstieg in die 
Maschinensprache des C 64 erleichtern. 

Z u ihrem Verständnis sollte man wenigstens ungefähr 
mit dem Befehlssatz der 6510-CPU und mit der Spei¬ 
cherorganisation des C 64 vertraut sein. Die Beispiele 
stammen aus den verschiedensten Anwendungsgebieten. 
Ihnen allen gemeinsam ist: 

- eine überschaubare Kürze 

- Formulierung als Hypra-Ass-Quelltext 

- eine ausführliche Beschreibung der Wirkungsweise. 

1. Ein allererster Gehversuch mit Hypra-Ass 

Zu diesem und zu allen folgenden Programmen benötigen 
Sie den Hypra-Ass. Er wird wie ein Basic-Programm geladen 
und mit RUN initialisiert. Jedes weitere RUN startet jetzt einen 
Assemberlauf, ist aber zunächst noch wirkungslos, da noch 
nichts im Textspeicher des Assemblers steht. Geben Sie nun 
folgende vier Zeilen ein: 

10 - .BA $0000 
20 - LDA #1 
30 - STA $400 
40 - RTS 

Dabei dürfen die Minus-Zeichen nach den Zeilennummern 
nicht vergessen werden (Eigenart von Hypra-Ass). Auch das 
Leerzeichen nach den Minus-Zeichen ist wichtig. Sie werden 
feststellen, daß der Assember die Zeilen nach Drücken der 
RETURN-Taste formatiert. Listen Sie die vier Zeilen auch 
einmal probeweise mit 

LIST (unformatiert) und 
/ E (formatiert) 

Das Programm ist schnell erklärt: 

Mit .BA $C000 wird dem Assembler die Startadresse 
(BAsisadresse) des Programms mitgeteilt. .BA ist ein 
Pseudobefehl. Ein solcher Befehl steuert die Arbeitsweise 
des Assemblers, bewirkt aber keine Erzeugung eines 
Maschinenbefehls. 

LDA # 1 lädt den Akkumulator mit 1, dem Bildschirmcode 
des Buchstabens A. 

STA $400 speichert den Akkumulatorinhalt, also die 1 an 
die Speicherstelle $400. $400 ist die Startadresse des 
Bildschirm-RAMs und entspricht der linken oberen Bild¬ 
schirmecke. Dort muß also ein »A« erscheinen. 

RTS (ReTurn from Subroutine) bedeutet Rücksprung aus 
einem Unterprogramm. Mit RTS müssen Programme abge¬ 
schlossen sein, die mit JSR (Jump to SubRoutine) oder SYS 
(von Basic aus) aufgerufen werden. Dies dürfte für die 
überwiegende Mehrheit aller Maschinenprogramme der Fall 
sein. Ausnahmen sind: 

Programme., die von einem Monitor aus gestartet werden. 
Sie sollten mit einem BRK (Break) abgeschlossen sein. 

Programme, die durch Interrupts aktiviert werden, werden 
normalerweise durch RTI (ReTurn from Interrupt) abge¬ 
schlossen. 


Mit RUN wird der Assembler gestartet. Er erzeugt ein 6 
Byte kurzes Maschinenprogramm ab $C000 und gibt in einer 
Abschlußmeldung den belegten Speicherbereich zusam¬ 
men mit der Assemblierzeit bekannt. Das Maschinenpro¬ 
gramm kann nun mit 

SYS $C000 oder SYS 12 * 4096 
gestartet werden. (Wenn Hypra-Ass aktiv ist, versteht der C 
64 auch Hex-Zahlen). Es müßte ein »A« in der linken oberen 
Bildschirmecke erscheinen. Sollte das nicht der Fall sein, so 
kann das zwei Ursachen haben: 

1. Das »A« wurde nach oben weggescrollt, weil Sie den SYS- 
Befehl zu weit unten auf dem Bildschrim eingetippt haben. 

2. Sie besitzen eine alte Version des C 64, bei der das Farb- 
RAM mit der Hintergrundfarbe vorbesetzt wird. 

Im zweiten Fall ergänzen Sie das Programm durch: 

35 - STA $D800 

Dieser Befehl speichert die immer noch im Akkumulator (im 
folgenden nur Akku genannt) stehende 1 an die Startadresse 
des Farb-RAMs. Dadurch erscheint das »A« in weißer Farbe. 

Ergänzen Sie Ihr kleines Programm einmal durch den 
Pseudobefehl 

5 - .LI 1,3,0 

und assemblieren Sie mit RUN. Der Assembler erzeugt jetzt 
ein Listing, dessen Zeilen von links nach rechts wie folgt 
aufgebaut sind: 

- Speicheradresse des folgenden Maschinenbefehls 

- Der Code des Maschinenbefehls. Da es Maschinen¬ 
befehle mit ein, zwei oder drei Byte gibt, sind diese 
Einträge unterschiedlich lang. 

- Ein Doppelpunkt und die ursprüngliche Quelltextzeile. Bei 
Pseudobefehlen, die ja keinen Code erzeugen, entfällt der 
Teil bis einschließlich zum Doppelpunkt. 

Dao Assemblerlisting ist bei der Fehlersuche mit einem 
Monitor nützlich, da es zu jedem Maschinenbefehl seine 
Adresse enthält. Mit dem Pseudobefehl: 

.li 1,4,0 

erhält man ein Druckerlisting. Angenehm dabei ist, daß es bei 
ausgeschaltetem Drucker automatisch auf den Bildschrim 
umgeleitet wird. 

Die abgedruckten Listings enthalten allerdings keine 
Speicheradressen mit zugehörigem Maschinencode. Diese 
Information ist zum Studieren der Programme uninteressant 
und zum Eintippen der Listings nicht erforderlich. Die Listings 
wurden mit dem Editorbefehl /E (formatiertes Listen) ge¬ 
wonnen, nachdem vorher die Ausgabe durch 
OPEN 4,4:CMD 4 

auf den Drucker umgeleitet wurde. 

2. Eine einfache Programmschleife 
Das folgende kleine Programm (Listing 1) schreibt 240mal 
den Buchstaben »A« auf den Bildschirm. Zur Arbeitsweise: 
Akku A wird wieder mit dem Bildschirmcode des Buchsta¬ 
bens A geladen. Das X-Register übernimmt zwei Aufgaben: 
Es zählt Schleifendurchläufe und liefert Werte zur Adreß¬ 
verschiebung. X wird mit 0 vorbesetzt. In Zeile 1280 ist 


100 -1 




110 - 

PROGRAMMSCHLEIFE 


120 -| 

240 

MAL "A" 


130 - 

AUF 

BILDSCHIRM SCHREIBEN 

140 -| 




150 - 


.BA >0000 

| PROGRAMM-STARTADRESSE 

160 - 


LDA 11 

i BILDSCHIRMCODE VON "A" 

170 - 


LDX »0 

i SCHLEIFENZAEHLER 

1B0 -LOOP 

STA 4400.X 

I ZEICHEN AUF BILDSCHIRM SCHREIBEN 

190 - 


INX 

|X HOCHZAEHLEN 

200 - 


CPX «240 

|X MIT 240 VERGLEICHEN 

210 - 


BNE LOOP 

I FALLS UNGLEICH, 6EHE NACH "LOOP" 

220 - 


RTS 

SFALLS X«240, DANN PROGRAMMENDE 

READY. 

Listing 1. 

Programmschleife 
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LOOP ein Label (auch SYMBOL oder Sprungmarke). LOOP 
steht für die Adresse des STA-Befehls, die man an anderen 
Programmstellen durch den Namen LOOP ansprechen kann, 
ohne daß man den Wert dieser Adresse kennt. Den 
Assemblerprogrammierer interessieren absolute Adressen 
normalerweise auch gar nicht, es sei denn, es handelt sich 
um systemspezifische Adressen, wie zum Beispiel die 
Adressen der Video-Chip-Register. Eine derartige Zu¬ 
ordnung einer Programmadresse zu einem Label nennt man 
implizite Definition. 

Die Zieladresse des STA-Befehls in Zeile 180 ergibt sich 
durch die Summe aus $400 und X. Da X am Anfang 0 gesetzt 
worden ist, wird also eine 1 an die Stelle $400 gespeichert. 
INX erhöht X um Eins. CPX # 240 vergleicht X mit der Zahl 
240. Bei Ungleichheit wird das Zero-Flag im Statusregister 
auf 0 gesetzt. Auf dieses Zero-Flag bezieht sich dann der 
bedingte Sprung BNE LOOP. BNE springt dann, wenn der 
vorige Vergleich Ungleichheit ergeben hat. (Daher auch der 
Name BNE = Branch if Not Equal = verzweige, wenn 


100 
110 
120 
130 
140 
150 
160 
170 
180 
190 
200 
210 - 
220 - 
230 - 

240 - 

READY. 


BLOCKVERSCHIEBUNG 
(MAXIMAL 255 BYTE) 


.BA *C000 ;PROGRAMMSTART 

.E0 GUELLE=*400|BLOCKSTART 
.EG ZIEL=*400+240 
•EG LAENGE=240 jBL0CKLAENGE 
-J X LAEUFT RUECKWAERTS VON LAENGE BIS 1 
LDX »LAENGE 

-LOOP LDA QUELLE-1,X 

STA ZIEL-1,X 
DEX 

BNE LOOP 
RTS 


X:=X-1 

FALLS XOO, NACH LOOP 
SONST ENDE 


Listing 2. Blockverschiebung 


100 




» 



110 

BLOCKVERSCHIEBUNG 

120 

-j OHNE EINSCHRAENKUNGEN 

130 







140 


.BA 

»C000 jPROGRAMMSTART 

150 

“ 

.EG 

V0N=*A09E 

160 


.EG 

BIS=*A327 

170 

- 

.EG 

ZIEL=*400 

180 

- 

• EQ 

ZEIGER1“*FB 

190 

“ 

.EQ 

ZEIGER2=IFD 

200 

-! 



210 


LDA 

»<(VON) 

220 

- 

STA 

7EIGER1 

230 

- 

LDA 

#>(VON) 

240 


STA 

ZEIGERU1 

250 

“ 

LDA 

*< (ZIEL) 

260 

- 

STA 

ZEIGER2 

270 

- 

LDA 

# >(ZIEL) 

280 

- 

STA 

ZEIGER2+1 

290 

- 

LDY 

»0 

300 

-LOOP 

LDA 

(ZEIGERIM 

310 


STA 

(ZEIGER2) ,Y 

320 

-| ZEIGER1 

MIT 

"BIS" VERGLEICHEN 

330 

- 

LDA 

ZEI8ER1 

340 

“ 

CMP 

•<(BIS) 

350 


BNE 

WEITER 

360 

-i L0W-BYTES STIMMEN UEBEREIN, HI6H-BYTES VERGLEICHEN 

370 

- 

LDA 

ZEI GER 1 * 1 

380 

- 

CMP 

»XBISI 

390 

- 

BEQ 

ENDE 

400 

-s 

BEIDE ZEIGER INKREMENTIEREN 

410 

-WEITER 

INC 

ZEIGER1 

420 


BNE 

WEITER2 

430 


INC 

ZEI GER 1 + 1 

440 

-WEITER2 

INC 

ZEIGER2 

450 

- 

BNE 

LOOP 

460 

- 

INC 

ZEIGER2+1 

470 

- 

JMP 

LOOP 

480 

-ENDE 

RTS 


READY. 



Listing 3. Blockverschiebung ohne Einschränkung 


ungleich). Beim nächsten Schleifendurchlauf wird die 1 aus 
dem Akku an die Adresse $4012 gespeichert. X wird solange 
inkrementiert, bis 240 erreicht ist. In diesem Fall springt BNE 
nicht und das Programm endet mit RTS. Bei den 240 Schlei¬ 
fendurchläufen werden nacheinander die Adressen $400 
bis $400+239 angesprochen. Programmschleifen wie 
diese benützt man oft zum Löschen eines Speicherbereichs. 
(Akku mit 0 vorbesetzt.) 

3. Blockverschiebung (maximal 255 Byte) 

Das Programm (Listing 2) arbeitet mit einer ähnlichen 
Schleife wie das vorige. In den Zeilen 150, 160 und 170 wer¬ 
den Label explizit definiert. Dies geschieht mit dem Pseudo¬ 
befehl .EQ. 

Die explizite Definition eines Labels ist praktisch dasselbe 
wie die Zuweisung eines Wertes an eine Variable. Hier wer¬ 
den die Anfangsadressen des ursprünglichen Blocks und 
des verschobenen Blocks sowie die Blocklänge definiert. X 
läuft hier rückwärts von LAENGE bis O. Dadurch kann der 
CPX-Befehl eingespart werden. DEX setzt nämlich auto¬ 
matisch das Zero-Flag, wenn nach dem Dekrement X den 
Wert O hat. BNE LOOP springt also nur solange nach LOOP, 
solange X größer als 0 ist. Mit den vorliegenden Werten für 
QUELLE, ZIEL und LAENGE kopiert das Programm die Bild¬ 
schirmzeilen 1 bis 6 auf die Zeilen 7 bis 12. 

Programme zur Blockverschiebung wie dieses oder zur 
Blockfüllung wie das vorige sind nur für Blocklängen bis maxi¬ 
mal 255 Byte geeignet, da das X-Register nur 8 Bit lang ist. 
Wenn man größere Speicherbereiche auf diese Weise verar¬ 
beiten will, muß man mehr Aufwand treiben. 

4. Blockverschiebung (ohne Einschränkungen) 

Das Programm (Listing 3) ist sicher nicht die kürzeste 
Lösung des Problems, es demonstriert dafür aber ohne ver- 
wirröridL Ticks die Adressierungsart »Indirekt Indiziert«. 

Beispiel: LDA (ZEIGER),Y 

Bei dieser Adressierungsart enthalten zwei aufeinanderfol¬ 
gende Speicherstellen der Zero-Page eine Adresse in der 
üblichen Reihenfolge Low-Byte - High-Byte. Im Programm 
wird nicht diese Adresse selbst angegeben, sondern die 
Adresse der ersten der beiden Zero-Page-Speicherstellen 
(hier ZEIGER genannt). Diese Technik nennt man indirekte 
Adressierung, was im Assemblertext durch die runden 
Klammern um die Zero-Page-Adresse zum Ausdruck kommt. 
Zu der aus der Zero-Page stammenden Adresse wird noch 
Y addiert, daher »indiziert«. Da man diese zusätzliche 
Indizierung oft nicht braucht, setzt man das Y-Register 
vorher auf O. 

Das Programm verwendet für den Blocktransfer zwei 
Zeiger (= Zero-Page-Speicherstellenpaare). Sie werden mit 
der Startadresse des Quell- beziehungsweise des Zielblocks 
initialisiert und nach jedem Byte-Transfer hochgezählt, bis 
der Zeiger in den Quellblock (ZEIGER1) das Ende des 
Quellblocks (Adresse BIS) erreicht hat. 

Das Inkrementieren eines 16-Bit Wertes verläuft nach dem 
Schema: 

INC ZEIGER ;Low-Byte inkrementieren 
BNE Weiter ;falls ungleich 0, dann fertig 
INC ZEIGER+1;Übertrag ins High-Byte 
WEITER (Programmfortsetzung) 

Spezifisch für den Hypra-Ass ist, daß man mit 

< (Adresse) beziehungsweise > (Adresse) 

das Low- bezeihungsweise High-Byte einer Adresse 
(beziehungsweise eines Labels) gezielt ansprechen kann. 
Von dieser Möglichkeit wird im Programm häufig Gebrauch 
gemacht. So bedeutet zum Beispiel: 

LDA # < (VON) 

Lade den Akkumulator mit dem Low-Byte des Wertes VON, 

Mit den im Program definierten Adressen VON, BIS und 
ZIEL kopiert das Programm einen Teilbereich aus dem Basic- 
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Interpreter direkt auf den Bildschrim. Im Groß-/Kleinschrift- 
modus (Commodore-Shift drücken) kann man dann Basic- 
Schlüsselwörter sowie Texte von Fehlermeldungen lesen. 

5. Verwendung von Betriebssystem-Funktionen und 
Mechanismen zur Parameterübergabe 

Ein Betriebssystem ist unter anderem dazu da, 
Standarddienste wie Ein- und Ausgabe zur Verfügung zu 
stellen, damit diese nicht jedesmal mühsam und fehleranfällig 
neu programmiert werden müssen. Die Standardfunktionen 
des Betriebssystems (oft »Kernel« genannt) sind im Pro¬ 
grammierhandbuch von Commodore hinreichend erläutert. 
Viele weitere nützliche Routinen findet man beim Studium 
eines kommentierten ROM-Listings. 

Die Parameterübergabe an Maschinensprache-Unterpro¬ 
gramme gestaltet sich leider nicht so systematisch wie bei 
den meisten höheren Programmiersprachen. Es werden 
mehrere Möglichkeiten bunt gemischt angewendet. 

1. Man schreibt Parameter in vereinbarte Speicherstellen. 
Aus diesen holt sich dann das aufgerufene Programm die 
Parameter. 

2. Wenn nur Ein- bis Drei-Byte-Parameter benötigt werden, 
kann man diese auch in den Registern A, X und Y über¬ 
geben. Auf diese Weise werden die meisten Kernel- 
Funktionen mit Parametern versorgt. 

Dieser Mechanismus steht übrigens auch von Basic aus 
zur Verfügung: Man schreibt Registerparameter per 
POKE an speziell dafür vorgesehene Speicherstellen: 
Akku A 780 ($30C) 

Index X 781 ($30D) 

Index Y 782 ($30E) 

Status-Register 783 ($30f) 

Das Maschinenprogramm (Listing 4) wird nun mit SYS 
aufgerufen. Der Basic-Interpreter besetzt erst die Re¬ 
gister mit den Inhalten dieser Speicherstellen und bringt 
dann in das Unterprogramm. Nach der Rückkehr werden 
die (neuen) Registerinhalte wieder in denselben Speicher¬ 
stellen abgelegt, wo sie für eine eventuelle Inspektion 
durch das Basic-Programm zur Verfügung stehen. 


100 

i 




110 

-1 VERWENDUNG DER BETRIEBSSYSTEM- 

120 

ROUTINEN GET1N UND CHROUT 

130 

-1. 




140 

* 

,BA 

IC000 


150 

- 

• E0 

GETIN-IFFE4 

160 

“ 

• EU 

CHR0UT*$FFD2 

170 


.EU 

ZAEHLER-IFE 

1B0 

- 

.E0 

MAXLENM0 

1ZEILENLAENGE 

190 

- 

.EQ 

PROMPT-63 


200 

- 

■ EQ 

ESCAPE-BB 

(FLUCHTSYMBOL "X" 

210 

- 

■ EQ 

SPACE-32 


220 


.EQ 

CR-13 

1CARRIAGE RETURN 

230 

-1 




240 

-NEWLINE LDA 

•MAULEN 

IZAEHLER INITIALISIEREN 

230 

- 

STA 

ZAEHLER 


260 


LDA 

• CR 


270 


JSR 

CHROUT 

i ZEILENVORSCHUB 

200 

- 

LDA 

•PROMPT 


290 


JSR 

CHROUT 

iPROMPT-ZEICHEN AUSGEBEN 

300 

- 

LDA 

•SPACE 


310 


JSR 

CHROUT 


320 

-WAIT 

JSR 

SETIN 

1 AUF EINGABE WARTEN 

330 

- 

CMP 

• 0 


340 

- 

SED 

WAIT 


350 

“ 

CMP 

•ESCAPE 

I BEI ESCAPE-ZEICHEN PROGRAMMENDE 

360 


BEQ 

ENDE 


370 

“ 

CMP 

ICR 

!BEI CR NEUE ZEILE 

300 


BEO 

NEWLINE 


390 


JSR 

CHROUT 

j EINGABEZEICHEN WIEDER AUSGEBEN 

400 

“ 

DEC 

ZAEHLER 


410 


BNE 

WAIT 

; NAECHSTE EINGABE 

420 


BEQ 

NEWLINE 

SZEILENLAENGE ERREICHT 

430 

-ENDE 

RTS 



READY. 




Listing 4. 

Verwendung von Betriebssystemroutinen 


3. Man kann Parameter auch über den Stack übergeben. 
Diese Methode ist wegen des kleinen Stackbereichs der 
6510-CPU (256 Byte) nur bedingt brauchbar und wird 
deshalb auch kaum praktiziert. 

4. Durch geschickte Verwendung von Unterprogrammen in 
Basic-ROM kann man Parameter direkt hinter den SYS- 
Befehl schreiben. Diese Methode ist 

- komfortabel, weil keine umständlichen POKEs nötig 
sind 

- schnell, weil der Interpreter weniger zu tun hat 

- flexibel, weil als Parameter auch ganze arithmetische 
oder Stringausdrücke geschrieben werden können. 

Diese Methode wird in den Programm-Listings 5 bis 8 
verwendet. 

Das folgende Programm (Listing 4) nutzt die Funktionen 
GEHN und CHROUT. GEHN liefert den ASCII-Code einer 
gedrückten Taste im Akku. Falls keine Taste gedrückt 
wurde, wird 0 zurückgegeben. GEHN entspricht damit 
genau dem GET-Befehl in Basic. 

CHROUT gibt ein Zeichen, dessen ASCII-Code im Akku 
stehen muß, auf dem Bildschrim aus. Es entspricht dem 
Basic-Befehl (man beachte das Semikolon): 

PRINT CHR$(A); 

Das Programm gibt einen Prompt aus und erwartet an¬ 
schließend Eingaben. Unter einem Prompt versteht man ein 
(beliebig zu vereinbarendes) Zeichen am linken Bildschirm¬ 
rand, das dem Benutzer mitteilt, daß Eingaben von ihm er¬ 
wartet werden. Bei interaktiven Programmen (wie zum 
Beispiel Monitore, Editore) sind Prompts sehr nützlich, da 
der Benutzer daran eindeutig erkennen kann, in welchem 
Programm er gerade ist. Das vorliegende Programm gibt die 
Einnnl. ezeichen sofort wieder aus, ohne sie weiter zu 
verarbeiten. Nach maximal zehn Zeichen wird automatisch 
ein Zeilenvorschub ausgeführt und ein weiterer Prompt 
ausgegeben. Das Programm ist eine Endlosschleife, die man 
mit der Eingabe von »X« verlassen kann. 

6. Verwendung von Interpreter-Routinen zur 
Parameterübergabe 

Diese Interpreter-Routinen werden in den folgenden Pro¬ 
grammbeispielen eingesetzt: 

CHKKOM liest aus dem laufenden Basic-Text ein Komma. 
($AEFD) Steht an der aktuellen Stelle kein Komma, wird 
das Programm mit SYNTAX ERROR abgebro¬ 
chen. Kommata sind nötig, um Parameter von¬ 
einander abzugrenzen. 

FRMNUM wertet einen beliebigen arithmetischen Aus- 
($AD8A) druck aus. Das Ergebnis wird im Fließkomma- 
Akkumulator 1 (kurz FAC) abgelegt. Der FAC 
besteht aus den Speicherstellen $61-$66, Die 
Bedeutung der einzelnen Byte ist hier nicht 
relevant. 

GETADR wandelt den Inhalt des FAC in ein 2-Byte-lnteger- 
($B7F7) Format um, sofern diese Zahl im Bereich 0 ... 

65535 liegt. Ansonsten wird ein ILLEGAL 
QUANTITY ERROR ausgegeben. Die Integer¬ 
zahl steht in den Speicherstellen $14/$15 und 
zusätzlich im Registerpaar Y/A. Mit der Kombi¬ 
nation FRMNUM und GETADR kann man also 
16-Bit-Größen aus Basic-Programmen über¬ 
nehmen. 

XBYTE wertet ebenfalls arithmetische Ausdrücke aus 
($B79E) und wandelt das Ergebnis in 8-Bit-lntegerformat, 
sofern es im Bereich 0 ... 255 liegt. Das Byte- 
Ergebnis wird im X-Register übergeben. 

USR () ist eine Basic-Funktion, mit der man Werte von 
Maschinenprogrammen an Basic zurückgeben 
kann. USR wertet einen in Klammern stehenden 
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Ausdruck aus und übergibt ihn in den FAC. Es 
wird ein Maschinenprogramm aufgerufen, des¬ 
sen Startadresse in $311/$312 steht. (USR- 
Vektor). Das Maschinenprogramm kann dann im 
FAC einen Wert an Basic zurückgeben. 

Das folgende Listing (Listing 5) ist der Programmkopf zu 
den vier nachfolgenden Beispielen. Diese können mit dem 
Kopf zusammen assembliert werden. Der Kopf enthält eine 
Sprungliste. Dadurch werden Einsprungstellen ($C000, 
$C003, etc.) für die vier aufgeführten Programme fixiert, 
unabhängig davon, wo die Programme dann später tatsäch¬ 
lich im Speicher stehen. Diese Technik ist zum Beispiel 


100 

-1 


110 

*1 

EINIGE ALLGEMEIN NÜTZLICHE 

120 

-1 

HASCH INENSPRACHE-UNTERPRQGRAHNE 

130 

-1 

EUER DEN AUFRUF DURCH 

HO 

-J 

BASIC-PROGRAMME 

130 

-i 


160 

-| 

EINFACHE PARAHETERUEBERGABE: 

170 

-» 

SYS STARTADRESSE,PARAMETERLISTE 

180 

-1 


190 

“1 


200 


.BA SC000 

210 

“1 

EINSPRUNGPUNKTE UND UNTERROUTINEN 

220 

-1 

DES BASIC-INTERPRETERS 

230 


■ EQ CHKK0M=$ftEFD; PRUEFT AUF K0MNA 

240 

- 

.ED FRMNUMMADBAi BERECHNET NUMERISCHEN AUSDRUCK IN FAC 

250 

- 

.EQ QETADR-*B7F7;NANDELT FAC IN INTEGERFORMAT ($14/1151 

260 

- 

.ED XBYTE°IB79E;HOLT B-YTE-NERT NACH X 

270 

- 

.EQ PL0T=<*FFF0 ;CURSOR SETZEN 

2B0 

- 

.EQ PRINT»*AAA0;BASIC-PRINT 

290 

- 

.EQ SETLFS'fFFBA;FILEPARAMETER SETZEN 

300 

- 

.EQ SAVEMFFD8 

310 

-1 


320 

■1 

SPRUNGLISTE 

330 

-1 


340 


JMP PRINTAT 

350 

- 

JHP DEEK 

360 

- 

JMP DOKE 

370 

- 

JHP SAV 

READY. 

G*6FI 

Listing 5. Einfache Parameterübergabe aus Basic- 

Programmen 


sinnvoll, wenn mehrere Leute zusammen an einem größeren 
Programm arbeiten. Ein Programmierer kann seinen Kollegen 
bereits feste Einsprungstellen für Routinen, an denen er 
noch arbeitet oder die noch gar nicht existieren, zur Ver¬ 
fügung stellen. 

PRINT AT 

Das Programm (Listing 6) ermöglicht eine freie und 
schnelle Cursorpositionierung zusammen mit einer Druck¬ 
ausgabe. Mit der Definition 

PR=123*4096 :REM Startadresse 

kann mit 

SYSPR,Zeile,Spalte,Printliste 
alles ausgeben werden, was auch mit PRINT ausgegeben 


300 

390 -i. 

400 PRINT AT 

410 -| AUFRUF: SYSPR,ZEILE,SPALTE,PRINTLISTE 

420 -j. 


430 

-PRINTAT 

JSR 

CHKKOM 

|1. KOMMA 

440 

- 

OSR 

XBYTE 

(ZEILE NACH X 

450 

- 

TXA 


460 

- 

PHfl 


(AUF STACK ZWISCHENSPEICHERN 

470 

- 

JSR 

CHKKOM 

i2. KOMMA 

4B0 

- 

JSR 

XBYTE 

;SPALTE NACH X 

490 

- 

TXfl 



500 

- 

TAY 


(SPALTE NACH Y 

510 

- 

PIA 


520 

- 

T fl X 


(ZEILE NACH X 

530 

- 

CLC 



540 

- 

JSR 

PLOT 

j CURSORPDS ITION SETZEN 

550 

- 

JSR 

CHKKOM 

;3.KOMMA 

560 

- 

JMP 

PRINT 

(WEITER MIT BASIC-PRINT 


READY. 

Listing 6. PRINT AT-Befehl selbstgemacht 


570 -i 

580 .... 

590 -| DEEK (16-BIT-PEEK) 

600 -S DER USR VEKTOR (*311/1312) 

610 -i MUSS AUF DIESES PROGRAMM ZEIGEN 
620 -( AUFRUF: USR(ADRESSE) 


630 

640 

-!. 

-DEEK 

JSR GETADR 

(FAC NACH INTEGER (*14/15) 

650 


LDY #0 

660 

- 

SEI 


670 

- 

LDA (* 14) , Y 

(LOW-BYTE 

6B0 

- 

STA *63 

(FAC MANTISSE 

690 

- 

INY 


700 

- 

LDA (*14),Y 

(HIßH-BYTE 

710 

- 

CLI 


720 

- 

STA *62 

(FAC MANTISSE 

730 

- 

LDX 4*90 

(FAC EXPONENT 

740 

- 

SEC 

(NICHT INVERTIEREN 

750 


JMP *8C49 

(FAC KOMPLETT MACHEN 


Listing 7. Eigener DEEK-Befehl 


werden kann. Man lasse sich einmal von der Geschwindig¬ 
keit des folgenden Programms beeindrucken: 

10 FOR 1=1 T0 24:SYSPR, I,I,"A":NEXT 
20 FOR 1=1 TO 24:SYSPR,-I,I,"B":NEXT 

Das Assemberlisting zu PRINT AT bedarf keiner großen 
Erläuterung. PLOT ist eine Kernel-Funktion, mit der man die 
Cursorposition auf dem Bildschirm setzen kann. Parameter 
sind Zeilen- und Spaltennnummern in den Registern X und Y. 
Das Programm PRINT AT ist eigentlich nicht mehr als eine 
geschickte Kombination der Routinen PLOT und PRINT. 

DEEK (Doppelbyte-PEEK) 

Dieses Programm (Listing 7) ist eine Abänderung der 
PEEK-Routine. DEEK liefert einen 16-Bit-Speicherinhalt an 
Basic zuiück. DEEK wird durch 

X=USR(Adresse) 

aufgerufen. Mit Adresse ist die Adresse des Low-Bytes 
gemeint. Da USR einen Wert zurückgibt, darf es nicht isoliert 
dastehen, sondern muß als rechte Seite einer Zuweisung 
oder als Funktionsargument eingesetzt werden. Vor dem 
ersten Aufruf muß der USR-Vektor auf die Startadresse des 
Programms gestellt werden: 

POKE 785,3 :REM LOW-BYTE $03 
POKE 786,192 :REM HIGH-BYTE $C0 

Im Assemblerlisting steckt eine Besonderheit: Die Zugriffe 
auf die beiden zu lesenden Bytes (LDA ($14),Y) sind durch 
ein SEI/CLI-Paar eingerahmt. SEI sperrt die CPU für Inter¬ 
ruptanforderungen. Dadurch wird garantiert, daß die beiden 
Lesezugriffe nicht durch ein Interruptprogramm, welches 
eines oder beide Bytes ändern könnte, unterbrochen 
werden können. CLI löst die Interruptsperre wieder. 

DOKE (Doppelbyte-POKE) 

Um in Basic-Programmen 16-Bit-Größen (zum Beispiel 
Adressen, Vektoren) in den Speicher zu schreiben, muß man 
sie vorher erst umständlich in High- und Low-Byte zerlegen, 
um dann beide Byte POKEn zu könen. Dazu wird meistens 
die Sequenz: 

HI=INT(X/256) 

LO=X-256*HI 
POKE AD,LO 
POKE AD+1,HI 
verwendet. 

Wenn man bedenkt, daß jeder Befehl interpretiert werden 
muß und daß jede Rechenoperation (auch »+1«) in voller 
Fließkomma-Genauigkeit durchgeführt wird, versteht man, 
daß dazu viel Rechenzeit nötig ist. Das kleine Maschinen¬ 
programm (Listing 8), das keiner Erläuterung mehr bedarf 
(FRMNUM, GETADR und CHKKOM sind bekannt) zeigt, wie 
es einfacher geht: 

SYSD0,AD,Y 
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Aufgerufen wird es durch: 

SYSSAV,Dateiname, gn, s a, e a 
Dabei kann bei »Dateinamen« ein Name oder ein String¬ 
ausdruck in Anführungszeichen stehen. 

»gn« ist die Gerätenummer (8 oder 9) 

»sa« und »ea« sind Start- und Endadresse des 
abzuspeichernden Bereiches. Zum Programm selbst: 

Die Routine bei $E257 beschafft sich den Filenamen aus 
dem Basic-Text und stellt ihn der später folgenden SAVE- 
Routine zur Verfügung. Mit SETLFS kann man dem 
Betriebssystem eine logische Filenummer (im Akku), eine 
Gerätenummer (in X) und eine Sekundäradresse (in Y) 
bekanntgeben. Die Parametrisierung der Kernel-SAVE- 
Routine ist etwas komplizierter: 

X Endadresse Low-Byte 

Y Endadresse High-Byte 

A Zeiger auf das untere Byte eines Zero-Page-Byte- 

paares, welches die Startadresse enthält. 

Die SAVE-Routione kehrt mit gesetztem Carry-Flag 
zurück, falls beim Speichern ein Fehler aufgetreten ist. Das 
Programm bei $E0F9 sorgt dann für eine ordentliche 
Fehlermeldung. 


(Natürlich muß man DO einmal vorher definieren: 
DO=1 2*4096 + 6). Auch bei DOKE werden die beiden 
kritischen STA-Befehle durch ein SEI/CLI-Paar untrennbar 
gemacht. Mit DOKE kann man daher sogar den Interrupt- 
Vektor ändern. Versucht man dies dagegen mit Hilfe zweier 
POKEs, kann es passieren, daß ein Interrupt gerade dann 
auftritt, nachdem das Low-Byte aber noch nicht das High- 
Byte geändert worden ist. Der Interrupt führt dann auf eine 
unbestimmte Adresse, was meistens einen Programmab¬ 
sturz nach sich zieht. 

DEEK und DOKE können natürlich auch verschachtelt ein- 
gesetz werden. So kann man mit 

SYSDO,A2,USR(Al) 

einen 16-Bit-Wert von der Stelle AI nach A2 kopieren. 
Speichern beliebiger Speicherbereiche auf Diskette 

Das Programm (Listing 9) realisiert das Gegenstück zum 
Basic-Befehl: 

LOAD "Name",8,1 


Multiplikation 

Das Programm (Listing 10) multipliziert zwei Byte-Werte 
miteinander und liefert ein 16-Bit-Produkt. Es ist aber trotz 
seiner Kürze nicht ganz einfach zu verstehen. Die beiden zu 
multiplizierenden Faktoren seien mit 

Multiplikator MR und Mulitplikand MD 
bezeichnet. Für das Resultat ist es natürlich gleichgültig, 
welcher Faktor als MR und welcher als MD an das Programm 
übergeben wird. MR kann man sich, wie jede binäre Größe, 
folgendermaßen vorstellen: 

MR=MR(7)*128+MR(6)*64 + ... + MR(1)*2 + MR(0)*1 
Dabei bezeichnet zum Beispiel MR(6) das Bit Nummer 6 
von MR in der üblichen Zählweise von 0 bis 7 und von rechts 
nach links. Das Produkt MR*MD kann man nun so berech¬ 
nen: 

Addiere folgende Teilprodukte: 

MD#128, falls MR(7)=1, sonst 0 

MD#64, falls MR(6)=1, sonst 0 

MD#2, falls MR(1)=1, sonst 0 

MD, falls MR(0)=1, sonst 0 

Die Teilprodukte erhält man einfach durch Links¬ 
verschieben von MD: 

MD#128 durch 7-maligen Links-Shift 
MD#64 durch 6-maligen Links-Shift 
Zu addieren ist nur dann etwas, wenn das entsprechende 
Bit in MR= 1 ist. Wenn man MR mit dem ROL-Befehl achtmal 


1000 -1 

1010 -1 . 

1020 -| SAV 



1030 -| SPEICHERE BELIEBI 8 EN 

BEREICH AUF DISK 

1040 AUFRUF 

SYSSAV,DATEINAME,GERAETENUMMER,STARTADRESSE,ENDADRESSE 

1050 -[. 



1060 -SAV 

JSR CHKK0M 

‘ 11. KOMMA 

1070 - 

JSR «E257 

|FILENAMEN HOLEN UND SETZEN 

1080 - 

JSR CHKK0M 

I 2. KOMMA 

1090 - 

JSR XBYTE 

(GERAETENUMMER NACH X 

1100 - 

LDY HO 

(SEKUNDAERADRESSE 

1110 - 

JSR SETLFS 

|FILEPARAMETER SETZEN 

1120 - 

JSR CHKK0M 

(3. KOMMA 

1130 - 

JSR FRMNUM 

;STARTADRESSE 

1140 - 

JSR GETAOR 

}NACH *14/15 UND V/A 

1 150 - 

PHA 

(HIGH-BYTE 

1160 - 

TYA 

1170 - 

PHA 

j LOH-BYTE 

1180 - 

JSR CHKK0M 

(4. KOMMA 

1190 - 

JSR FRMNUM 

{ENDADRESSE 

1200 - 

JSR GETADR 

(NACH 114/15 UND Y/A 

1210 - 

PHA 


1220 - 

TYA 


1230 - 

TAX 


1240 - 

PLA 


1250 - 

TAY 

(ENDADRESSE L0N IN X, HIGH IN V 

1260 - 

PLA 

|STARTADRESSE L0N-BYTE 

1270 - 

STA IH 


1280 - 

PLA 

(STARTADRESSE HIGH-BYTE 

1290 - 

STA *15 

(STARTADRESSE IN 114/15 

1300 - 

LDA UM 

(ADRESSE DER STARTADRESSE 

1310 - 

JSR SAVE 


1320 - 

BCC SAVENDE 

{KEIN FEHLER 

1330 - 

JHP IE0F9 

(FEHLERAUSGANG 

13X0 -SAVENDE 

RTS 


READY. 

Listing 9. Speichern 
bereichen 

von beliebigen Speicher- 


100 

-f 

110 

-j 

120 


130 


140 

- j 

ISO 

-5 

160 

-j 

170 


1 B 0 

-; 

190 

“1 

200 


210 

- 

23t- ~ 

240 

- 

250 

-M 

260 

- 

270 

- 

280 

- 

290 

- 

300 

- 

310 

- 

320 

-M 

330 

- 

340 

- 


MULTIPLIKATION B MAL 8 BIT 

MD MULTIPLIKAND (BLEIBT ERHALTENI 
MR MULTIPLIKATOR (WIRD UEBERSCHRIEBEN) 

DAS 16-BIT-PRDDUKT STEHT IN: 

MR (HIGH-BYTE) UND 
A (LOK-BYTE) 


.BA IC000 
,EQ HD=IFD 
,EQ MR=*FE 
LDA *0 
LDX 08 
ASL 

ROL MR 

BCC HULNEXT 

CLC 

ADC MD 

BCC MULNEXT 

INC HR 

DEX 

BNE MULL00P 
RTS 


IVORBESETZUNS DES PRODUKTS 
;ZAEHLER (8 DURCHLAEUFE) 
i PRODUKT IN A UEBER 
;MR NACH LINKS SCHIEBEN 
iHOECHSTES BIT IN MR»0 
jFALLS HOECHSTES 8 IT IN HR»!, 

)MD ZUM TEILPRODUKT ADDIEREN 
(KEIN UEBERTRAB 

(UEBERTRA 6 NACH MR 8 ERUECKSICHTIGEN 
(HEITER, FALLS ZAEHLER NOCH NICHT 0 


READY. Listing 10. Mulitplikation 8 mal 8 Bit 


760 -| 

770 -j.-.. 

780 -| DOKE (16-BIT-POKE) 

790 -j AUFRUF: SYSDO,ADRESSE,WERT 

800 -j. 


810 

-DOKE 

JSR CHKK0M 

jl. KOMMA 


820 

- 

JSR FRMNUM 

(ADRESSE NACH FAC 


830 

- 

JSR GETADR 

(FAC NACH INTEGER 

($14/15 

B40 

- 

LDA $14 



850 

- 

STA $9E 

(ADRESSE NACH $9E/9F 

860 

- 

LDA $15 



870 

- 

STA $9F 



880 

- 

JSR CHKK0M 

(2.KOMMA 


890 

- 

JSR FRMNUM 

(WERT NACH FAC 


900 

- 

JSR GETADR 

(FAC NACH INTEGER 

($14/15 

910 

- 

LDY #0 



920 

- 

SEI 



930 

- 

LDA $14 

(WERT LOW-BYTE 


940 

- 

STA ($9E) , Y 



950 

- 

INY 



960 

- 

LDA $15 

(WERT HIGH-BYTE 


970 

- 

STA ($9E),Y 



980 

- 

CLI 



990 

- 

RTS 




READY. 

Listing 8. Eigener DEEK-Befehl 
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nach links schiebt, so durchwandern alle 8 Bit nacheinander 
das Carry-Flag und letzteres kann leicht abgefragt werden. 
Der Trick des Programms besteht nun darin, daß das 
Berechnen von Teilproduktsummen mit dem Linksschieben 
von MR kombiniert wird. Zunächst wird die Zwischensumme 
in A mit 0 vorbesetzt. MR wird nach links geschoben. Das 
höchstwertige Bit von MR steht jetzt im Carry-Flag. Ist es 1, 
so wird MD zum Akku addiert. Eigentlich müßte jetzt der Akku 
um sieben Positionen nach links geschoben werden, da zum 
ersten Teilprodukt der Faktor 128 gehört. Diese 
Verschiebung ergibt sich aber automatisch im Verlauf der 
nächsten sieben Schleifendurchläufe. 

Sowie MR nach links geschoben wird, werden rechts in MR 
Bits frei, die dann von den von rechts kommenden höherwer¬ 
tigen Bits der Zwischensumme belegt werden. Nach 8 
Schleifendurchläufen ist schließlich MR nach links verdrängt 
worden. An seiner Stelle steht nun das High-Byte des Pro¬ 
dukts. Das Low-Byte des Produkts steht im Akku, während 
MD unverändert geblieben ist. 


100 -I.. 

110 -I SCHIEBEREGISTER-FOLGEN 
120 -! ALS PSEUDO-ZUFALLSZAHLEN 


130 

- 

1 . 



140 

- 


.BA «C000 


150 

- 


.EQ SR-IFD 

|SCHIEBEREGISTER (2 BYTE) 

160 

- 


.ED ZAEHLER=«FB[(2 BYTE) 

170 



•ED DELAY=«FA 

;PAUSENLAENGE 

180 

- 

1 



190 

- 


JMP MAIN 

1 ZUM HAUPTPROGRAMM 

200 

- 

1 



210 


; NAECHSTE ZUFALLSZAHL 


220 

- 

1 in 

CARRY :« SR( 6 ) EOF 

: SR(9) 

230 

- 

1 12 ) 

SR NACH LINKS SCHIEBEN 

240 

- 

I 13) 

SR (0) := CARRY 


250 

- 

1 



260 

_] 

SHIFT 

LDA SR+1 


270 

- 


AND #2 

iSR(9) ISOLIEREN 

2 Q 0 

- 


ASL 


290 

- 


ASL 


300 



ASL 

; IN BITPOSITION 6 

310 

- 


ASL 

;BRINGEN 

320 

- 


ASL 


330 

- 


EOR SR 

jLIEFERT SR( 6 ) EOR SR19) 

340 

- 


ASL 


350 



ASL 

5 RESULTAT INS CARRY-FLA 6 (SCHRITT (1) 

360 

- 


ROL SR 

;SCHRITT 12) UND <31 

370 

- 


ROL SR+1 


380 

- 


RTS 


390 

- 

1 



400 

- 

) VERZOEGERUNGSSCHLEIFE 


410 

- 

; 



«20 

-• 

PAUSE 

LDX DELAY 


430 

- 

PAUSEI 

DEX 


440 

- 


BNE PAUSE 1 


430 

- 


RTS 


460 

- 

I 



470 

- 

1 HAUPTPR08RANM 



«00 -[ SCHIEBEREGISTER-FOLGE DER LAENGE 1023 ERZEUGEN 

«SO -| BI LOSCHIRNZEICHEN IN DER REIHENFOLGE DIESER ZUFALLSZAHLEN 

300 -j INVERTIEREN (D.H. BIT 7 INVERTIEREN) 

310 -| 

520 -) SR HIT ZUFAELLI6EH STARTMERT VORBESETZEN 


530 

-MAIN 

LDA 

«DC04 

ICIAI 1 TIMER A, LOK-BYTE 

540 

- 

0RA 

• 1 

1 DARF NICHT 0 SEIN 

330 

- 

STA 

SR 


560 

- 

LDA 

MFF 


370 

- 

STA 

ZAEHLER 


380 

- 

LDA 

• «03 


390 

- 

STA 

ZAEHLER*1 

|ZAEHLER-«3FF-1023 

600 

-LOOP 

JSR 

SHIFT 

[NAECHSTE ZUFALLBZAHL 

610 

- 

LDA 

SR. 1 


620 

- 

PHA 


[MERKEN 

630 

- 

AND 

• 3 

[HIGH-BYTE AUF 2 BIT BEGRENZEN 

640 

- 

0RA 

• 4 

|SR*SR*»400 

630 

- 

8TA 

SR+1 

660 

- 

LDY 

• 0 


670 

- 

LDA 

(SR) ,Y 

|ZEICHEN VOM BILDSCHIRM 

6B0 

- 

EOR 

• •GO 

[BIT 7 INVERTIEREN 

690 

- 

STA 

(BR) ,Y 

[ZURUECK ZUM BILDSCHIRM 

700 

- 

PLA 


: sr.i 

710 

- 

STA 

SR+1 

;HIEDERHERSTELLEN 

720 

- 

JSR 

PAUSE 


730 

- 

DEC 

ZAEHLER 


740 

- 

BNE 

LOOP 


750 

- 

DEC 

ZAEHLER«1 


760 

- 

BPL 

LD0P 


770 

- 

LDA 

»400 

[ERSTES BILDSCHIRMZEICHEN 

780 

- 

EOR 

• «80 

iINVERTIEREN 

790 

- 

STB 

• 400 


800 

- 

RTS 




Listing 11. Schieberegister-Folgen als Pseudo- 
Zufallszahlen 



Erwähnenswert sind hier noch die Befehle ASL und ROL: 
Beide schieben nach links und bei beiden wird Bit 7 ins Carry- 
Flag geschoben. Der Unterschied: 

ASL besetzt Bit 0 mit 0 

ROL besetzt Bit 0 mit dem alten Inhalt des Carry-Flags. 

Mit ASL (ohne Adreßteil) wird also der Akku arithmetisch 
verdoppelt, während mit ROL MR zusätzlich der Übertrag aus 
dieser Verdoppelung in Bit 0 von MR gelangt. 
Schieberegister-Folgen als Pseudo-Zufallszahlen 

Das Programm (Listing 11) zeigt eine interessante Anwen¬ 
dung von Schieberegistern. Wenn man ein Schieberegister 
(SR) an den »richtigen« Bitpositionen »anzapft« und das 
Exklusiv-Oder-Produkt dieser Bits an den SR-Eingang zu¬ 
rückführt, erhält man eine Folge von Bits, die vollkommen 
zufällig zu sein scheint. Die Folgen sind zwar periodisch, sie 
wiederholen sich also nach einer gewissen Zeit, die Perio¬ 
denlänge kann aber beliebig lang gemacht werden. Macht 
man eine so erzeugte 0-1-Folge mit einem Lautsprecher hör¬ 
bar, so klingt diese wie weißes Rauschen. 

Die folgende Tabelle enthält geeignete Anzapfstellen für 
Schieberegister unterschiedlicher Länge. 


Refllsterlänoe 

Rückkopplung 

Periodenlange 

2 

0+1 

3 

3 

1+2 

7 

4 

2+3 

15 

5 

2 + 4 

31 

6 

4+6 

63 

7 

5+6 

127 

8 

1 +2+3+7 

255 

9 

4 + 8 

511 

10 

6+9 

1023 

11 

8 + 10 

2047 

12 

1+9 + 10 + 11 

4095 

13 

0 + 10+11 + 12 

8191 

14 

1+11 + 12 + 13 

16383 

15 

13+14 

32767 

16 

10+12 + 13+15 

65535 


*+« steht hiei i,, .EOR< 


Die angegebenen Periodenlängen sind die bei der jewei¬ 
ligen Registerlänge maximal möglichen. Die Schieberegister¬ 
folgen haben die angenehme Eigenschaft, daß die Register¬ 
werte alle Zahlen von 1 bis zur Periodenlänge in quasi¬ 
zufälliger Reihenfolge durchlaufen. Man darf ein solches 
Schieberegister allerdings nicht mit lauter Nullen vorbe¬ 
setzen, da es dann seinen Zustand nicht mehr ändert 
(0 EOR 0 =0). 

Der Kern des folgenden Programms ist die kleine Routine 
SHIFT. Die beiden Zero-Page-Speicherstellen SR und SR+1 
bilden ein 16-Bit-Schieberegister. Rückgekoppelt wird es an 
den Positionen 6 und 9. Es werden quasi nur 10 Bit von den 
16 vorhandenen ausgenutzt. SHIFT erzeugt bei wieder¬ 
holtem Aufruf eine Folge mit der Periode 1023. 

Das Hauptprogramm wendet nun diese Folge in grafisch 
reizvoller Weise an. Zunächst wird das Low-Byte des 
Schieberegisters mit einem zufälligen Wert (ungleich 0) vor¬ 
besetzt. Dieser Wert stammt aus dem ständig laufenden 
Timer A in CIA Nummer 1. SHIFT wird nun 1023 mal aufgeru¬ 
fen und erzeugt dadurch alle Zahlen von 1 bis 1023 in quasi¬ 
zufälliger Reihenfolge. Diese Zahlen werden als Adressen 
relativ zum Bildschirm-RAM verwendet. Bei den adressierten 
Bytes wird jeweils Bit 7 invertiert, was eine Reversdarstellung 
der Bildschirmzeichen bewirkt. Das Programm MAIN bewirkt 
also nichts anderes als eine Invertierung des gesamten Text¬ 
bildschirms. Da dies aber in zufälliger Abfolge geschieht, ist 
der Effekt sehr auffallend. Über die Variable DELAY 

($FA) = 250) kann man das 
Tempo der Invertierung be¬ 
einflussen. Das anschlie¬ 
ßende Basic-Programm 
(Listing 12) erzeugt einen 
Flimmereffekt, indem es eine 
einfache Zufallsgrafik mit 
dem Programm MAIN inver¬ 
tiert. (Thomas Krätzig/aw) 

163 


10 POKE 250,1 
20 PRINT CHRI(147) 

30 F0R I«1024 TO 2024 

40 POKE 1,127*INT(RND(0)*2)»120 

50 NEXT I 

60 SYS 12*4096 

70 GET A*:IF AS*"’ THEN 60 

REAOY. 

Listing 12. Basic-Hilfs- 
programm zu Listing 11. 
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C 64 




Superhirn, 

einmal 

andersherum 


Beispiel: 

Nehmen wir die Kombination »3436«. Nach Programm- 
Start beginnt Superhirn II wie üblich mit seiner Startkombina¬ 
tion »1234«. 

Der Computer hat die »3« richtig als Zahl und Position; die 
»4« stimmt nur als Zahl. 

Also wird eingegeben: 

1234 - der Vorschlag des Computers. 

1 < RETURN > - für die richtige »3«. 

1 < RETURN > - für die »4« an falscher Position. 


Lassen Sie den C 64 Ihre Kombination her¬ 
ausfinden. Nach einem perfekten Algorith¬ 
mus kann der C 64 Ihre Zahlenfolge in 
maximal sechs Versuchen berechnen. 

B eim Spiel Superhirn geht es darum, einen von einem 
Mitspieler ausgedachten Farbcode zu erraten. Man 
probiert verschiedene Farbcodes aus; der Mitspieler 
gibt nach einer versuchten Kombination Information über 
deren Richtigkeit. 

Es gibt schon einige Superhirn-Programme, die eine Kom¬ 
bination wählen, die dann der menschliche Mitspieler erraten 
muß. 

Superhirn II geht den anderen Weg: Der Mensch denkt sich 
eine Kombination aus, die dann der Computer erraten muß! 
Superhirn II findet jede Kombination garantiert (siehe 
Kasten). 

Die Farben werden durch Zahlen symbolisiert. Es gibt 
sechs »Farbzahlen«, nämlich die Ziffern 1,2,3, 4,5 und 6. Für 
die Farben gibt es vier Positionen 

Bedienungsanleitung: 

Geben Sie Superhirn II bitte mit dem MSE ein (Listing 1) und 
starten Sie es mit »SYS 13312«. 

Sie antworten, indem Sie zuerst die Anzahl der richtigen 
Farbziffern an der richtigen Position eingeben und dann mit 
»RETURN« abschließen. Dann geben Sie die Anzahl der rich¬ 
tigen Farbziffern an der falschen Position ein und bestätigen 
wiederum mit »RETURN«. 

Superhirn II gibt dann seinen neuen Lösungsvorschlag aus; 
Sie antworten wieder wie oben. Das Programm ist beendet, 
wenn 

- das Programm die richtige Kombination gefunden hat 
(es meldet sich mit »OK«) 

- oder wenn Sie eine unmögliche Antwort gegeben haben 
(das Programm meldet sich mit »ERROR«), 


Jetzt sucht der Computer einen neuen Lösungsvorschlag. 
Verfolgen wir die Eingaben bis zum Ende ... 

2211 - der 2. Versuch des Computers. 

0 < RETURN > - keine richtige Position/richtige Ziffer. 

0 < RETURN > - keine falsche Position/richtige Ziffer. 
4333 - der 3. Versuch des Computers. 

1 < RETURN > - für die richtige »3«. 

2 < RETURN > - für die »3« und »4«. 

3344 - der 4. Versuch des Computers. 

1 < RETURN > - diesmal stimmt die erste »3«. 

2 < RETURN > - dafür sind »3« und »4« vertauscht. 

3435 - der 5. Versuch des Computers. 

3 < RETURN > - bis auf die fehlende »6« richtig. 

0 < RETURN > - die »5« ist falsch. 

3436 - der 6. Versuch des Computers. 

4 < RETURN > - die Kombination ist gefunden. 

OK - Sie befinden sich wieder im Basic. 

Das Programm kann mit »SYS 13312« wieder gestartet 
werden. 

Hinweise: 

Die Eingabe unlogischer Daten führt zur Ausgabe von 
»ERROR«. Sie haben dann entweder eine offensichtlich fal¬ 
sche cingabe gemacht (zum Beispiel bei der Eingabe einer 
»6« für die Anzahl der richtigen Ziffern - es kann ja nur höch¬ 
stens »4« als korrekte Eingabe Vorkommen!) oder eine 
logisch falsche Eingabe. 

Was ist eine logisch falsche Eingabe? Nehmen wir unser 
Beispiel von oben: 

Geben Sie nach dem 6. Versuch des Computers nicht die 
(richtige!) »4« ein, sondern »0« und nochmal »0«, antwortet 
Ihnen der Computer mit »ERROR«. Warum? 

Nun gibt es einfach keine Ziffernkombination mehr, die 
allen Ihren Eingaben gerecht werden kann. Folglich müssen 
Sie einen Eingabe-Fehler gemacht haben. 

Geben Sie in unserem Beispiel nach dem 3. Versuch des 
Computers nicht »1« und »2« (was nach Wahl unserer Ziffern¬ 
kombination »3436« die einzig korrekte Eingabe ist), son- 


Programm i superhirn ii 3400 360c 


3400 

i 

a9 

93 

20 

d2 

ff 

a9 

01 

Bd 

42 

340B 

i 

3e 

03 

8 d 

52 

03 

8 d 

5c 

03 

Ba 

3410 

I 

Bd 

66 

03 

Bd 

70 

03 

Bd 

53 

3f 

3410 

i 

03 

0 a 

Bd 

5d 

03 

0 a 

Bd 

67 

bS 

3420 

i 

03 

0 a 

Bd 

71 

03 

a9 

df 

a0 

fB 

3428 

i 

35 

20 

le 

ab 

20 

ac 

35 

C0 

28 

3430 

i 

ff 

dH 

Ml 

60 

4c 

3b 

35 

ad 

b3 

3430 

i 

52 

03 

29 

20 

d0 

06 

0 e 

52 

74 

3440 

I 

03 

4c 

3b 

35 

a9 

01 

Bd 

52 

5c 

3448 

i 

03 

ad 

5c 

03 

29 

20 

d0 

06 

7c 

3450 

i 

0 e 

5c 

03 

4c 

3b 

35 

a9 

01 

dd 

3458 

8 

Bd 

Sc 

03 

ad 

66 

03 

29 

20 

ad 

3460 

1 

dB 

06 

0 e 

66 

03 

4c 

3b 

35 

6 a 

3468 

I 

*9 

01 

8 d 

66 

03 

ad 

70 

03 

27 

3470 

1 

29 

20 

dB 

06 

0 e 

70 

03 

4c 

a7 

3478 

1 

3b 

35 

a9 

6 b 

a0 

a3 

20 

1 » 

09 

3480 

1 

ab 

60 

a9 

00 

9d 

84 

03 

ad 

2 b 

3488 

: 

32 

03 

3d 

52 

03 

*0 

03 

fe 

b7 

3490 

8 

84 

03 

ad 

5c 

03 

3d 

5c 

03 

le 

3498 

8 

f0 

03 

fe 

B4 

03 

ad 

66 

03 

97 


34aB 

8 

3d 

66 

03 

f0 

03 

fe 

84 

03 

2 f 

34aB 

8 

ad 

70 

03 

3d 

70 

03 

f0 

03 

df 

34b0 

I 

fe 

84 

03 

60 

ad 

52 

03 

Bd 

52 

34bB 

8 

3f 

03 

ad 

5c 

03 

8 d 

40 

03 

13 

34c0 

8 

ad 

66 

03 

Bd 

41 

03 

ad 

70 

d7 

34cB 

1 

03 

Bd 

42 

03 

bd 

52 

03 

8 d 

18 

34d0 

8 

43 

03 

bd 

5c 

03 

Bd 

44 

03 

43 

34dB 

8 

bd 

66 

03 

8 d 

45 

03 

bd 

70 

7f 

34e0 

8 

03 

8 d 

46 

03 

•9 

00 

8 d 

49 

ff 

34b8 

8 

03 

a 0 

06 

a9 

00 

Bd 

47 

03 

82 

34f 0 

8 

Bd 

48 

03 

8 a 

48 

•9 

03 

aa 

e7 

34f B 

8 

5e 

3f 

03 

90 

03 

ee 

47 

03 

94 

3500 

8 

5b 

43 

03 

90 

03 

ee 

48 

03 

a 2 

3508 

1 

ca 

10 

ed 

68 

aa 

ad 

47 

03 

9b 

3510 

: 

38 

•d 

48 

03 

30 

0 d 

ad 

49 

66 

351B 

8 

03 

18 

6 d 

48 

03 

Bd 

49 

03 

54 

3520 

I 

4c 

2 d 

35 

•ad 

49 

03 

18 

6 d 

ee 

3528 

8 

47 

03 

Bd 

49 

03 

88 

d0 

bb 

ad 

3530 

8 

ad 

49 

03 

38 

fd 

84 

03 

9d 

95 

3538 

1 

9B 

03 

60 

ac 

3« 

03 

20 

02 

cl 

3540 

8 

34 

bd 

84 

03 

dd 

7a 

03 

f0 

74 

3548 

8 

03 

4c 

37 

34 

20 

b4 

34 

bd 

ba 

3550 

3 

9B 

03 

dd 

Be 

03 

f0 

03 

4c 

0 f 


3558 

i 

37 

34 

ca 

d0 

el 

ae 


03 

08 

3560 

i 

e8 

ad 

52 

03 

9d 

52 

03 

Bd 

a7 

3568 

8 

43 

03 

ad 

5c 

03 

9d 

5c 

03 

bB 

3570 

8 

Bd 

44 

03 

ad 

66 

03 

9d 

66 

58 

3578 

1 

03 

Bd 

45 

03 

ad 

70 

03 

9d 

99 

35B0 

I 

70 

03 

Bd 

46 

03 

aB 

00 

a9 

27 

35BB 

8 

00 

aa 

18 

cB 

b9 

42 

03 

4a 

4b 

3590 

I 

e8 

90 

fc 

Ba 

18 

69 

30 

20 

lf 

359B 

1 

d2 

tf 

C0 

04 

dB 

e9 

ee 

3a 

af 

35a0 

8 

03 

20 

ac 

35 

C0 

ff 

d0 

01 

d6 

35a8 

8 

60 

4c 

37 

34 

a9 

0 d 

20 

d2 

ac 

35b0 

8 

ff 

20 

Cf 

ff 

ae 

3e 

03 

3B 

0C 

35bB 

1 

b9 

30 

c9 

04 

d0 

0 a 

a9 

64 

79 

35c0 

8 

a 0 

a3 

20 

le 

ab 

a0 

ff 

60 

7a 

35c 8 

: 

9d 

7a 

03 

a9 

0 d 

20 

d2 

ff 

b5 

35d0 

s 

20 

cf 

ff 

38 

e9 

30 

9d 

Be 

92 

35d8 

: 

03 

a9 

0 d 

70 

d2 

ff 

60 

31 

08 

35e0 

i 

32 

33 

34 

00 

a9 

00 

85 

6 a 

3e 

35eS 

: 

85 

6 c 

a9 

04 

85 

6 b 

a9 

34 

51 

35f 0 

s 

85 

6 d 

a 0 

00 

bl 

6 a 

91 

6 c 

el 

35f B 

8 

cB 

d0 

f 9 

a5 

6 b 

c9 

07 

f0 

5e 

3600 

8 

07 

e6 

6 b 

e6 

6 d 

1B 

90 

ea 

e2 

3608 

8 

4c 

00 

34 

ff 





61 


Listing 1. Das MSE-Listing zu »Superhirn II«. Bitte beachten Sie die Eingabehinweise auf Seite 110 


164 











C 64 


Tips und Tricks 


dem »2« und »2«, kann Fehleingabe natürlich nicht mit einem 
»ERROR« beantwortet werden, weil nämlich jetzt noch 
Ziffernkombinationen vorhanden sind, die nicht im Wider¬ 
spruch zu Ihren bis dahin gemachten Eingaben stehen. 

Zum Programm: 

Den Quelltext des Programms entnehmen Sie Listing 2. 
Die Eingabe-Routine liest nur das erste Zeichen jeder Zeile 
- es macht also keinen Unterschied, ob man als Antwort »1« 
oder »123456« eingibt, da die restlichen Zeichen nicht 
berücksichtigt werden. 

Das Programm ist leicht auf zum Beispiel 10 Positionen 
erweiterbar - man muß jedoch folgendes beachten: Die 
Abstände zwischen den Registern POS1 CWEISSE müs¬ 
sen vergrößert werden, da möglicherweise neun Versuche 
nicht zum Ziel führen. 

Auch die Anzahl der möglichen Ziffern kann leicht von 
sechs auf acht erweitert werden. Möchte man mehr als acht 
Ziffern, muß man mit 16-Bit-Zahlen arbeiten, was größere 
Umschreibarbeiten zur Folge hat. 

Kombinations-Codierung: 

Es bleibt noch die Frage, in welcher Art und Weise die Kom¬ 
binationen gespeichert werden. Nehmen wir dazu doch wie¬ 
der unsere Kombination aus dem Beispiel, also »3436«. 

In POS1, POS2, POS3 und POS4 steht immer die aktuelle 
Kombination, die der Computer gerade als Lösungsversuch 
ausgegeben hat. 

Ist das Problem gerade bei der Lösung angelangt, dann 
steht nicht etwa in POS1 die »3«, in POS2 die »4«, in POS3 
wieder die »3« und in POS4 die »6« - sondern die Kombina¬ 
tion ist folgendermaßen festgehalten: 


und die Anzahl der Weißen (= richtige Ziffer/falsche Position) 
zu bestimmen. 

Der Lösungsversuch des Computers in der x-ten Runde 
steht genauso codiert in POS1+X, POS2+X, POS3+Xund 
POS4+X. 

(A. Reiser/H. Bauschke/og) 


Das Programm gibt den ersten Lösungsvorschlag aus. Nach der 
Eingabe des menschlichen Mitspielers wird eine Ziffernkombination 
gesucht, die logisch richtig ist in bezug auf alle vorher gemachten 
Eingaben. 

Dabei werden alle Ziffernkombinationen von »1111« bis »6666« ge¬ 
testet. 

ist die aktuelle Ziffernkombination logisch richtig, gibt sie der Compu¬ 
ter aus. 

Das Programm beginnt bei der nächsten Suche nach der Lösung bei 
der zuletzt ausgegebenen Ziffernkombination; es muß also nicht wieder 
bei »1111« anfangen. 

Hat der menschliche Gegner nicht mit »4« bei richtiger Position/rich¬ 
tige Farbe geantwortet und ist das Programm bei »6666« angelangt, 
kann es sich nur um eine falsche Eingabe handeln - es wird »ERROR« 
ausgegeben. 

Wie beurteilt das Programm nun, ob es in seiner Schleife von »1111« 
bis »6666« gerade bei einer logisch richtigen oder logisch falschen Zif¬ 
fernkombination ist? 

Dazu benutzt der Algorithmus folgenden Trick: Es wird angenommen, 
daß die zu prüfende Ziffernkombination die richtige ist. Dann werden alle 
bis dahin getätigten Eingaben mit dieser Kombination verglichen. Es 
wird also nach der Anzahl der richtigen Ziffer/richtige Position und nach 
der Anzahl richtige Ziffer/falsche Position gesucht. Das Ergebnis wird 
festgehalten und mit den Eingaben, die Sie gemacht haben, verglichen. 

Stimmen diese Werte sämtlich überein, kann es sich bei der zu prüfen¬ 
den Kombination um die Lösung handeln - sie muß es aber nicht sein! 

Trifft nun das Programm auf eine solche Lösungsmöglichkeit, gibt es 
diese au.:-. ius. 

Ist die Prüfung negativ ausgefallen, das heißt, es gab mindestens eine 
Abweichung von der tatsächlichen Eingabe des menschlichen Mitspie¬ 
lers, wird in der großen Schleife weitergesucht - so lange, bis die Kombi¬ 
nation gefunden ist. 


POS1 - 
POS2 - 
POS3 - 
POS4 - 


2 hoch (3-1) 
2 hoch (4-1) 
2 hoch (3-1) 
2 hoch (6-1) 


Dl irrh Hipic-Q narcitolli inn ict r»c cnätor loir-htor mönlir'h Hio 


Anzahl der Schwarzen (= richtige Ziffer/richtige Position) So findet das Programm die Kombination 


105: 

3400 


TU "SLJPERH1RN II" 

480l 

3413 

8D 

70 

03 

STA 

1 lOl 

3400 

•GPT 00,PI 








I20i 

3400 

* 

» *3400 








121: 


1 



4851 




1 


I22i 


i VARIABLEN-DEKLARA TION 


486i 




I 

. VERSUCH 

123i 


I 



4B71 




1 


125i 

006A 

ALT 

#6A | 

ZERUPAGE ADRESSEN FUER 

490« 

3416 

SD 

53 

03 

STA 

1261 

006C 

NEU 

*6C : 

VER8CHIEBE-ROUT1NE 

500i 

3419 

OA 



ASL 

130i 

FFD2 

CHRÜUT 

*FFD2 


500» 

341A 

BD 

3D 

03 

STA 

140i 

FF CF 

CHRIN 

*FFCF 


510l 

34 ID 

OA 



ASL 

150i 

AB1E 

STROUT 

«AB1E 


BIO* 

341E 

SD 

67 

03 

STA 

1601 

0352 

P0S1 

850 i 

SPEICHER FUER 

5201 

3421 

OA 



ASL 

170i 

035C 

P0B2 

860 | 

KOMBINATIONEN 

520: 

3422 

HD 

71 

03 

STA 

1001 

0366 

P0S3 

870 


54ÖI 

3425 

A9 

DF 


LDA 

1901 

0370 

P0S4 

8B0 


550« 

3427 

AO 

35 


LDY 

200i 

037A 

SCHWARZE 

890 t 

EINGABEN MITSPIELER 

3601 

3429 

20 

IE 

AB 

JSR 

2lOi 

0384 

CSCHWARZE 

900 | 

ERRECHNETE EINGABEN 

570« 

342C 

20 

AC 

35 

JSR 

2201 

038E 

WEI SSE 

910 j 

< SIEHE ALGORITHMUS > 

572« 

342F 

CO 

FF 


CPV 

230i 

0398 

CWEISSE 

920 | 








2401 

033E 

RUNDE 

B30 









243i 
2301 
2601 
270i 
280« 
290i 
300i 
310i 
3201 
330 t 
340i 
3601 
370« 
372i 
374i 
3801 
390: 
470: 

473: 
4BG: 
4 BÖ: 
400t 


033F 

0340 

0341 

0342 

0343 

0344 

0345 

0346 

0347 

0348 

0349 


| DIVERSE 
CP0S1 
CP0S2 
CP093 
CPDS4 
CV1 
CV2 


HILFSREGISTER 

831 

832 

833 

834 

835 

836 


3400 A9 93 
3402 20 D2 
3405 A9 01 


CV3 

- 837 


640« 

3437 

AD 

52 

03 

GRLODP 

LDA 

PUS1 

CV4 

«= 838 


650« 

S43A 

29 

20 



AND 

M 7.00100000 

Hi 

■= 839 


660« 

34 3C 

DO 

06 



BNE 

MASSN1 

H2 

- 840 


6/0« 

343E 

OE 

52 

03 


ASL 

P0S1 

MIN 

- B41 


680« 

3441 

4C 

3B 

35 


JMP 

LILOGP 

| 



6901 

3444 

A9 

01 


MA3SN1 

LDA 

Ml 

« PROGRAMM-START 


700« 

3446 

BD 

52 

03 


STA 

PUB1 

1 



710« 

3449 

AD 

5C 

03 

TE9T2 

LDA 

P0S2 


LDA 4147 


720« 

344C 

29 

20 



AND 

M 7.00100000 

FF 

JSR CHRGUT 

« BILDSCHIRM LOESCHEN 

730« 

344E 

DO 

06 



BNE 

MASSN2 


LDA Ml 


740« 

3450 

OE 

5C 

03 


ASL 

PÜS2 

03 

STA RUNDE 

s RUNDE INITIALISIER! 

7501 

3433 

4C 

3B 

35 


JMP 

LILOOP 

03 

STA P0S1 


760« 

3456 

A9 

01 


MASSN2 

LDA 

Hl 

03 

STA POS2 


770« 

345B 

BD 

5C 

03 


STA 

P0S2 

03 

STA PQS3 


780« 

345B 

AD 

66 

03 

TEST3 

LDA 

P0S3 


574i 
576i 
580i 
6001 
610: 
620i 


3431 DO 01 

3433 60 

3434 4C 3B 


I SCHLEIFE INITIALISIERT 
AUF 1111 


1234 ABSPEICHERN UND AUSGEBEN 

P0S1+1 

A 

P0S2+1 

A 

P0S3+1 

A 

P0B4+1 
M< TEXT 
#>TEXT 
STROUT 
ANTWORT 

M*FF i KOMBINATION 

GEFUNDEN JA/NE IN 


BNE LO | NEIN - ALSO BUCHEN 

Ff TS t JA - ZURUECK INS BASIC 

LO JMP LILOOP 

I 

I GROSSE SCHLEIFE - * 1111’ BIS '6666 
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790« 

345E 

29 

20 



AND 

**400100000 

1902« 







800« 

3460 

DO 

06 



BNE 

MASSN3 

1904 s 





LOGISCH-RICHTIGE KOMBINATION 

010« 

3462 

OE 

66 

03 


ASL 

P0S3 

1906« 







820» 

3465 

4C 

3B 

35 


JMP 

LI LOOP 

1910« 

355D 

AE 

3E 

03 

LDX 

RUNDE 

030« 

3468 

A9 

01 


MASSN3 

LDA 

Ul 

1920« 

3560 

E8 



INX 


040« 

346A 

DD 

66 

03 


STA 

P093 

1930« 

3561 

AD 

52 

03 

LDA 

P0S1 

850« 

346D 

AD 

70 

03 

TEST4 

LDA 

P0S4 

1940« 

3564 

9D 

52 

03 

STA 

P0S1,X 

860« 

3470 

29 

20 



AND 

*•400100000 

1940« 

3567 

BD 

43 

03 

STA 

CV1 

Ö/Ol 

3472 

DO 

06 



BNE 

MASSN4 

1950« 

356A 

AD 

SC 

03 

LDA 

P0S2 

080« 

3474 

OE 

70 

03 


ASL 

P0S4 

I960« 

356D 

9D 

5C 

03 

STA 

P0S2,X 

890« 

3477 

4C 

-P 

33 


JMP 

LILOOP 

1960« 

3370 

HD 

A4 

03 

STA 

CV2 

900« 

34 7 A 

A9 

6B 


MASSN4 

LDA 

M«6B 

1970. 

3573 

AD 

66 

03 

LDA 

P0S3 

900« 

347C 

AO 

A3 



LDY 

*#A3 | KOMBINATION NICHT 

1900« 

3576 

9D 

66 

03 

STA 

P0S3,X 








GEFUNDEN 

1980« 

3579 

BD 

45 

03 

STA 

CV3 








1990« 

357C 

AD 

70 

03 

LDA 

PQG4 

910« 

347E 

20 

IE 

AB 


JSR 

BTROUT « 'ERROR' AUSGEBEN 

2000« 

357F 

9D 

70 

03 

STA 

POS4,X 

930« 

3481 

60 




RTS 

; UND ZURUECK INS BASIC. 

2000« 

3502 

BD 

46 

03 

STA 

CV4 


932 « 

933» 
9341 


! UNTERPROGRAMM ANZAHL SCHWARZE ERMITTELN 
I 


940« 

3482 

A9 

00 


BLACKS 

LDA 

*0 

950« 

54G4 

9D 

84 

03 


STA 

CSCHWARZE.X 

960« 

3487 

AD 

52 

03 

POS IV 

LDA 

P0S1 

970« 

340A 

3D 

52 

03 


AND 

P0S1,X 

980» 

34BD 

FO 

03 



BEO 

P092V 

990« 

340F 

FE 

84 

03 


INC 

CSCHWARZE.X 

1000« 

3492 

AD 

5C 

03 

P0S2V 

LDA 

P0S2 

1010« 

3495 

3D 

5C 

03 


AND 

P0S2.X 

1020« 

3498 

FO 

03 



BEO 

P0S3V 

1030« 

349A 

FE 

84 

03 


INC 

CSCHWARZE,X 

1040« 

349D 

AD 

66 

03 

P0S3V 

LDA 

POS 3 

1050« 

34A0 

3D 

66 

03 


AND 

P0S3.X 

1060« 

34A3 

FO 

03 



BEO 

P0B4V 

1070 s 

34A5 

FE 

04 

03 


INC 

CSCHWARZE,X 

lOBOi 

34A0 

AD 

70 

03 

P0S4V 

LDA 

P0S4 

1090« 

54AB 

3D 

70 

03 


AND 

POS4,X 

1100« 

34AE 

FO 

03 



BEQ 

BF IN 

1110* 

34B0 

FE 

84 

03 


INC 

CSCHWARZE,X 

1120« 

34B3 

60 



BF IN 

RTS 


1122» 








1124« 





t UNTERPROGRAMM ANZAHL WE1 

1126« 





i 



1130« 

34B4 

AD 

52 

03 

WHITES 

LDA 

P0S1 

1140« 

34B7 

BD 

3F 

03 


STA 

CPÜS1 

1150« 

34BA 

AD 

5C 

03 


LDA 

P0S2 

1160« 

34BD 

QD 

40 

03 


STA 

CP0S2 

1170« 

34CO 

AD 

66 

03 


LDA 

P0S3 

1180s 

34C3 

8D 

41 

03 


STA 

CP0S3 

1 190« 

34 C6 

AD 

70 

03 


LDA 

P0S4 

1200« 

34C9 

8D 

42 

03 


STA 

CP0S4 

1210: 

34CC 

BD 

52 

03 


LDA 

P0S1,X 

1220: 

34CF 

8D 

43 

03 


STA 

CV1 

1230« 

34D2 

BD 

5C 

03 


LDA 

P092,X 

1240: 

34D5 

QD 

44 

03 


STA 

CV2 

1250» 

34D9 

BD 

66 

03 


LDA 

P0S3.X 

1260 t 

34DB 

8D 

45 

03 


STA 

CV3 

1270» 

34DE 

BD 

70 

03 


LDA 

P0S4,X 

1280: 

34E1 

8D 

46 

03 


STA 

CV4 

1290» 

34 E 4 

A9 

00 



LDA 

*0 

1300« 

34E6 

BD 

49 

03 


STA 

MIN 

1310« 

34E9 

AO 

06 



LDY 

M6 

1330: 

34EB 

A9 

00 


LOS 

LDA 

*0 

1340« 

34ED 

8D 

47 

03 


STA 

Hl 

1350: 

34F0 

0D 

48 

03 


STA 

H2 

1400« 

34F3 

8A 




TXA 


1400« 

34F4 

48 




PHA 


1400« 

34F5 

A9 

03 



LDA 

*3 

1400« 

34F7 

AA 




TAX 


1410« 

34F8 

5E 

3F 

03 

LI 

LSR 

CP0S1,X 

1420« 

34FB 

90 

03 



BCC 

L2 

1430« 

34FD 

EE 

47 

03 


INC 

Hl 

1440« 

3500 

5E 

43 

03 

L2 

LSR 

CV1 ,X 

1450« 

3303 

90 

03 



BCC 

L3 

1460« 

3505 

EE 

48 

03 


INC 

H2 

1470« 

3508 

CA 



L3 

DEX 


1480« 

3309 

10 

ED 



BPL 

LI 

1490« 

3S0B 

68 




PLA 


1490« 

350C 

AA 




TAX 


1600: 

350D 

AD 

47 

03 

MINFIND 

LDA 

Hl 

» o «■ 

JOIO 

so 




sec 


1620« 

3511 

ED 

48 

03 


SBC 

H2 

1630« 

3314 

30 

OD 



BMI 

H2GR0SS 

1640« 

3516 

AD 

49 

03 

HlGROSS 

LDA 

MIN 

1630« 

3519 

18 




CLC 


1660« 

351A 

6D 

48 

03 


ADC 

H2 

1670« 

351D 

QD 

49 

03 


STA 

MIN 

1680« 

3520 

4C 

2D 

35 


JMP 

YKLEINER 

1690« 

3523 

AD 

49 

03 

H2BROSS 

LDA 

MIN 

1700« 

3526 

18 




CLC 


1710« 

3327 

6D 

47 

03 


ADC 

Hl 

1720« 

332A 

8D 

.i'.' 

03 


STA 

MIN 

1730» 

352D 

88 



YKLEINER 

DEY 


1740« 

352E 

DO 

BB 



BNE 

LOS 

1750« 

3530 

AD 

49 

03 


LDA 

MIN 

1760« 

3533 

38 




SEC 


1770« 

3534 

FD 

04 

03 


SBC 

CSCHWARZE.X 

1780« 

3537 

9D 

90 

03 


STA 

CWEISSE.X 

1790« 

353A 

60 



WF IN 

RTS 



6*6R on 


1792» 

1794« 


I KLEINE SCHLEIFE - KOMBINATION 
LOGISCH-RICHTIG (J/N) 


20B0 
2090 
2090 
2093 
2095 
2100 
2110 
2120 
2130 
2140 
2140 
2140 
2130 
2160 
2170 
2190 
2200 
2202 
2204 
2206 
2210 
2212 
2214 
2216 
2220 
2220 
2230 
2240 
2250 

2250 

2252 

2254 

2256 

2256 

2256 

2250 

2259 

2260 
90 - : 
2260: 
2270 
2280 
2280 
2280 
2290 
2300 
2300 
231C 

2311 

2312 
2320 
2320 
3000 
3005 
3010 
3100 
3100 
3100 
3110 
3110 
3120 
3120 
3130 
3140 
3140 
3170 
3100 
3190 
3200 
3210 
3220 
3220 
3230 
3230 
3240 


L6 


L7 


3585 AO 00 
3587 A9 00 

3589 AA 
358A 18 
35BB C8 
358C B9 42 03 
35BF 4A 

3590 E8 

3591 90 FC 

3593 8A 

3594 18 

3595 69 30 

3597 20 D2 FF 
359A CO 04 
359C DO E9 
359E EE 3E 03 
35A1 20 AC 35 
35A4 CO FF 
35A6 DO 01 
35A8 60 

35A9 4C 37 34 L8 
I 


LDV 
LDA 
TAX 
CLC 
1 NY 
LDA 
LSR 
INX 
BCC 
TXA 
CLC 
ADC 
JSR 
CPY 
BNE 
INC 
JSR 
CPY 
BNE 
RT9 
JMP 


CVl-l.Y 

A 


*#30 

CHROUT 

*4 

L6 

RUNDE 

ANTWDRT 

**FF 

L8 

GRLOOP 


35AC 
33AE 
35B1 
35B4 
35B7 
35 B8 
35BA 
35BC 
33BE 
35C0 
35C2 
35C5 
35C7 
35C8 
35CB 

35CD 
35D0 
35D3 
35D4 
‘35D6 
35 D9 
3SDB 
35DE 


A9 OD 
20 D2 FF 
20 CF FF 
AE 3E 03 
38 

E9 30 
C9 04 
DO OA 
A9 64 
AO A3 
20 IE AB 
AO FF 
60 

9D 7A 03 
A9 OD 
20 D2 FF 
20 CF FF 
38 

E9 30 
9D BE 03 
A9 OD 
20 D2 FF 
60 


; UNTERPROGRAMM ANTWORT HOLEN 
I 

ANTWORT LDA **0D 

JSR CHROUT 
CHRIN 
RUNDE 


JSR 

LDX 

SEC 

SBC 

CMP 

BNE 

LDA 

LDY 

JSR 

LDY 

RTS 

STA 

LDA 

JSR 

JSR 

SEC 

SBC 

STA 

LDA 

JSR 

RTS 


35DF 31 32 33 
35E3 00 


35E4 

35E6 

3SE8 

35EA 

33EC 

35EE 

33F0 

33F2 

35F4 

35F6 

33F8 

35F9 

35FB 

3SFD 

35FF 

3601 

3603 

3605 

3606 
3608 


A9 00 
85 6A 
85 6C 
A9 04 
85 6B 
A9 34 
bb /.n 
AO 00 
Bl 6A 
91 6C 
CB 

DO F9 
A5 6B 
C9 07 
FO 07 
E6 6B 
E6 6D 
18 

90 EA 
4C 00 34 


I 

I ’1234' 

* 

TEXT .ASC 

• BYT 
I 

; VERSCHIEBEN 
I 

LDA 
STA 
STA 
LDA 
STA 
LDA 
OTA 
LDY 
LDA 
STA 
INY 
BNE 
LDA 
CMP 
BEO 
INC 
INC 
CLC 
BCC 

AUFGEHTS JMP 


L10 
L11 


*#30 

*4 

L9 

*#64 

*#A3 

STROUT 

**FF 

SCHWARZE,X 
#*0D 
CHROUT 
CHRIN 

*#30 

WEIBSE.X 

**0D 

CHROUT 


"1234" 

0 

NACH #3400 

MO 

ALT 

NEU 

*#04 

ALT»1 

N*34 

NH I- 1 

*0 

(ALT),Y 
(NEU),Y 

LU 

ALT»1 

*#07 

AUFGEHTS 
ALT* 1 
NEU» 1 


L10 

#3400 


I PROGRAMM-START 


Listing 2. Der Quell-Code des »Superhirn II« 
(Schluß) 


1796« 

1800« 353B AE 
1810« 353E 20 
1820« 3541 BD 
1830« 3544 DD 
1840« 3547 FO 
1845« 3549 4C 
1850« 354C 20 
1860« 354F BD 
1070« 3552 DD 
1000« 3555 FO 
1885« 3557 4C 
1890« 355A CA 
1900« 355B DO 


3E 03 LILOOP 

02 34 LISTART 
84 03 
7A 03 
03 

37 34 
B4 34 L4 
90 03 
BE 03 
03 

37 34 

L5 

El 


LDX RUNDE 
JSR BLACKS 
LDA CSCHWARZE.X 
CMP SCHWARZE,X 
BEO L4 
JMP GRLOOP 
JSR WHITEB 
LDA CWEISSE.X 
CMP WEISSE,X 
BEO L5 
JMP GRLOOP 
DEX 

BNE LISTART 


Anmerkung: Ursprünglich war das Programm 
als »Bildschirmseite« konzipiert. Die Verschiebe¬ 
routine ab Zeile 3000 wurde benötigt, um das 
Programm aus dem Bildschirmspeicher an 
seinen »Arbeitsplatz« zu bringen. 
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Ein schneller 

»Drawline«- 

Algorithmus 

Im folgenden wird eine Möglichkeit vor¬ 
gestellt, schnell und einfach eine Strecke, 
die durch ihre beiden Endpunkte gegeben 
ist, zu plotten. Als Ausgabegerät können 
Bildschirm, Drucker und Plotter eingesetzt 
werden. 

D er Algorithmus wird in einer Basic- (Listing 1) und einer 
Assembler-Version (Listing 2) für einen 6510-Mikro- 
prozessor mit den Adressen für den Commodore 64 
beschrieben. Die Programme können, da sie im Aufbau ein¬ 
fach sind und erklärt werden, ohne große Probleme für 
andere Systeme beziehungsweise andere Sprachen umge¬ 
wandelt werden. Das Maschinenprogramm (Listing 3) geben 
Sie bitte mit dem MSE ein. 

Ein Rasterbildschirm setzt sich aus einzelnen Punkten, die 
gesetzt oder auch gelöscht sein können, zusammen. Der 
Abstand der Punkte voneinander ist in der Richtung der Ach¬ 
sen immer gleich und jeweils eine Schrittweite groß (Bild 1). 


Um eine Gerade zwischen den Punkten PO und PI zu ziehen, 
muß daher schrittweise berechnet werden, welcher Punkt 
der Ideallinie (Bild 2) am nächsten ist und daher gesetzt wer¬ 
den muß. 

Geschwindigkeitsvorteile 
durch einfache Berechnungen 


Für diese Berechnungen gibt es verschiedene Möglich¬ 
keiten, doch sind sie meistens mit Multiplikationen und Divi¬ 
sionen in der Approximationsschleife verbunden und daher 
weder schnell noch einfach zu programmieren. Der hier vor¬ 
gestellte Algorithmus verwendet dagegen nur eine Division 
und in der Schleife nur mehr Addition, Subtraktion und eine 
Vergleichsoperation. Da die Schleifenoperationen außerdem 
nur mehr an Integerzahlen durchzuführen sind, ist er beson¬ 
ders schnell, und er läßt sich auch einfach programmieren. 
Zur Erklärung soll eine Gerade mit einer Steigung zwischen 0 
und 1(0 bis 45 Grad) betrachtet werden. 

Wie man in Bild 2 unschwer erkennen kann, ist der Abstand 
der Punkte PO und PI entlang der X-Achse gleich der Anzahl 
der zu setzenden Punkte. DX = XI - XO, das heißt, es sind DX- 
Approximationen durchzuführen, um die Gerade zu zeich¬ 
nen. Für jeden folgenden Punkt ist als XO und IX (= 1) zu erhö¬ 
hen, während YO gleichbleibt (IY = 0) oder ebenfalls um 1 
(IY =1) erhöht wird. Der Abstand der beiden Punkte entlang 
der Y-Achse ist demnach: DY = Y1 - YO. Es bleibt also nur 
mehr festzustellen, wann IY = 0, beziehungsweise IY = 1 zu 
sein hat. Dazu wird vor Beginn der Schleife ein Approxima- 


S 46 R onunci 


Name 

2001 

3032 

Ad re 

8032 

ssen 

VC20 

C64 

610710 

Beschreibung 

CHKCOM 

CE11 

CDF8 

BEF5 

CEFD 

AEFD 

9730 

Prüle ob nächstes Zeichen im 
Basic-Text ein Komma ist, wenn 
nicht gebe »SYNTAX ERROR, aus 

GETCOR 

D6C4 

D6C6 

C921 

D7EB 

B7EB 

B4E5 

Holt die Koordinaten eines Punktes 
aus dem Basic-Text. Die Routine 
wertet auch Ausdrücke aus. Oie 
X-Koordinate wird als 2-Byte-Wert 

In XO, die Y-Koordinate als Byte im 
X-Register übergeben. 

XO 

0066 

0014 

0014 

0014 

0014 

0011 

Hier wird die X-Koordlnale von 
GETCOR abgelegt. 

PLOT 







Diese Routine ist keine Betriebs¬ 
systemroutine. Sie übernimmt die 
Koordinaten von XO und dem 
X-Register. 


Tabelle 1. Benützte Subroutinen und Übergabe¬ 
speicherzellen 


Name 

Beschreibung 

XO, YO 

Koordinaten des ersten Punktes 

XI, Y1 

Koordinaten des zweiten Punktes 

CT 

Schleifenzähler 

IX 

Inkrement oder Dekrement für XO (-1,0,+1) 

IY 

Inkrement oder Dekrement für YO (-1,0,+1) 

AX 

wie IX für Steigungen > 1 

AY 

wie IY für Steigungen > 1 

DX 

Entfernung der Punkte entlang der X-Achse 


(= Anzahl der Punkte) 

DY 

Entfernung der Punkte entlang der Y-Achse 

OF 

Approximationsvariable zur Bestimmung ob Y0 gleichbleibt 


Tabelle 2. Die verwendeten Variablen 





Y1 

Y0 










’1 



DX = XI - X0 

DY = Y1 - Y2 

DX = DY 

AX = 1 

IX = AX 

Ajr = 1 

IY = Ay 









1- 












































































P 

y 

ay 











äX 










XÖ X 

Bild 1. Eine Strecke mit 
dem Bildschirm 

der Steigung 1 dargestellt auf 
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berechnet werden. 
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tionswert OF berechnet. Da beim Idealfall für eine Steigung 
von 1 (Bild 1) IY = IX, das heißt, immer 1 ist, und DX = DY ist, 
wird OF = DX/2. 

Zu OF wird für jeden neuen Punkt DY addiert. Solange OF 
kleiner als DX bleibt, bleibt IY = 0, wird OF gleich oder größer, 
so wird IY = 1, das heißt, YO um 1 erhöht. Damit diese 
Abfrage auch für die folgenden Punkte möglich ist, muß OF 
um DX vermindert werden. 

Rasterpunkte optimieren 


Wenn DX-Punkte gesetzt worden sind, sind alle Punkte der 
Geraden berechnet und die Schleife kann verlassen werden. 

Soweit also für eine Gerade mit positiver Steigung zwi¬ 
schen 0 und 45 Grad. Wie sieht es aber aus, wenn zum Bei¬ 
spiel XI kleiner XO ist? Nun, dann wird eben IX = -1, XO also 
für jeden Approximationsschritt um 1 erniedrigt. Und wie 
sieht es für eine Steigung größer 1 aus? Auch dieses Problem 
läßt sich einfach lösen. Es werden für die Rechnung einfach 
die beiden Achsen vertauscht. 

Der Ablauf beider Programme ist im Nassi-Shneiderman- 
Diagramm (Bild 3) dargestellt. Zum leichteren Vergleich sind 
alle Variablenbezeichnungen in den Programmen identisch. 

Die Basic-Version gibt nur die Koordinaten der berechne¬ 
ten Punkte aus, da hierfür keine »Setze-Punkt«-Routine 
geschrieben wurde. Man kann aber die Wirkungsweise des 
Algorithmus schön verfolgen. 

Das Assemblerprogramm ist, wie schon oben gesagt, für 
den C 64 geschrieben mit einer möglichen Auflösung vor* 
320 x 200 Punkten. Dadurch können die Werte für Y iin 
einem Byte untergebracht werden, während für X zwei Byte 
benöiigt werden. OF, DX und der Schleifenzähler CT benöti¬ 
gen deshalb ebenfalls 2 Byte. Die Länge der Werte muß beim 
Umstricken für ein anderes System berücksichtigt werden, 
da alle durchzuführenden Operationen dementsprechend 
1 oder 2 Byte lang sind. 

In dieser Assemblerversion werden nur 2 Subroutinen aus 
dem Betriebssystem verwendet. Sie sind in Tabelle 1 
beschrieben. Zusätzlich sind die Adressen für die anderen 
Commodore Computer angegeben. Die Subroutine »PLOT« 
muß, wenn sie sich im Betriebssystem wie bei den Commo- 
doresystemen nicht findet, extra geschrieben werden. Für 
den C 64 findet man im 64'er geeignete Programme. Die Rou¬ 
tine CHKCOM überprüft, ob das nächste Zeichen des Basic- 
textes (oder Eingabepuffers) ein Komma ist. Ist dies nicht der 
Fall, kehrt das Unterprogramm nicht zurück, sondern gibt 
»syntax error« aus und bricht das Programm ab. Beim Vorfin¬ 
den eines Kommas wird das dem Komma folgende Zeichen 
in den Akku geholt. Ist dieses Zeichen eine Ziffer, dann wird 
übrigens das Carryflag auf »1« gesetzt. GETCOR holt zuerst 
eine Integerzahl (Übergabe in $14 und $15), prüft anschlie¬ 
ßend auf Komma, und holt dann das folgende Byte aus dem 
Text. Die Übergabe erfolgt im X-Register. Diese Routine ist 
wie geschaffen für die Eingabe von Koordinaten, da auch For¬ 
meln und Variablenwerte übernommen werden. 

Kein Problem: Variablen 


ln Tabelle 2 sind alle verwendeten Variablen aufgeiistet und 
beschrieben. Aufgerufen wird diese Version mit SYS 
aaaa,X0,Y0,X1,Y1, wobei aaaa die Startadresse der Routine, 
XO/YO und X1/Y1 die Koordinaten der beiden Punkte sind. 
Für die Koordinaten können auch Ausdrücke verwendet wer¬ 
den, da die Betriebssystemroutine »GETCOR« auch Aus¬ 
drücke auswertet. 

(Michael Bauer/og) 
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100 

REM DRAWLINE 

<006> 

360 

IF Y1=>Y0 

THEN D2=Y1—Y0S GOTO 390 

<206> 

110 

REM DIESE ROUTINE BERECHNET DIE KOORDI 


370 

D2=Y0-Y1 


<00B> 


NATEN 

< 151 > 

380 

S2=-l 


<072> 

120 

REM DER PUNKTE AUF EINER STRECKE, DIE 


390 

IF D1«=>D2 

THEN 470 

<220> 


DURCH 

< 124> 

400 

N1=D1:REM 

VERTAUSCHE Dl UND D2 

<225> 

130 

REM DIE ENDPUNKTE GEGEBEN IST. MIT EIN 


410 

D1=D2 


< 117> 


ER GE- 

<028> 

420 

D2=N1 


< 136> 

140 

REM EIGNETEN 'SETPOINT’-ROUTINE KANN D 


430 

S1=A1 


<037> 


ER 

<09B> 

440 

A1=0 


< 121 > 

150 

REM BILDSCHIRM ODER EIN PLOTTER ANGEST 


450 

A2=S2 


<123> 


EUERT 

<1B4> 

460 

S2=0 


<221 > 

160 

REM WERDEN. DIE GRENZEN DER WERTE EUER 


470 

D3=Dl/2 


< 137> 


X UND 

<093> 

480 

N1=1:REM SCHLEIFENZAEHLER 

<014> 

170 

REM Y ENTSPRECHEN DEN WERTEN FUER DEN 


490 

GOTO 580:REM PLOTTE URSPRUNGSPUNKT 

<057> 


HI-RES 

< 165> 

500 

X0=X0+A1 


<018> 

180 

REM BILDSCHIRM DES COMMODORE 64. 

< 165> 

510 

Y0=Y0+A2 


<066> 

190 

REM 

<252> 

520 

D3=D3+D2 


<050> 

200 

REM DAS ORIGINAL DIESES PROGRAMMES STA 


530 

N1=N1+1 


< 158> 


MMT VON 

< 131 > 

540 

IF D3<=D1 

THEN 580 

<255> 

210 

REM MIKE HIGGINS ERSCHIENEN IN BYTE 19 


550 

D3=D3—Dl 


<206> 


81 IM 

<129> 

560 

X0-X0+R1 


<09B> 

220 

REM HEFT 8 AUF DEN SEITEN 414 - 416 

<084> 

570 

Y0-Y0+S2 


< 146> 

230 

REM 

<036> 

5B0 

PRINT X0, 

Y0 

< 102> 

240 

REM 

<046> 

590 

IF D1«>N1 

THEN 500 

< 118> 

250 

INPUT"KOORDINATEN 1. PUNKT";X0,Y0 

<024> 

600 

END 


<094> 

260 

IF X0>319 OR Y0>199 THEN 250 

< 15B> 





270 

IF X0<0 OR Y0<0 THEN 250 

<010> 





280 

INPUT"KOORDINATEN 2. PUNKT"jXl.Yl 

<203> 





290 

IF XI >319 OR Y1 > 199 THEN 280 

<224> 





300 

IF X1<0 OR Y1<0 THEN 280 

<251 > 





310 

REM SETPAR 

<244> 





320 

Sl=0sS2=l:Al=l:A2=0 

<070> 





330 

IF X1=>X0 THEN D1=X1—X0:GOTO 360 

< 158> 





340 

Al=-1 

<208> 





350 

D1=X0—XI 

<203> 

Listing 1. Das Basic-Programm »Drawline« 



- ; ■: | • 

PROGRAMM : DRAM 


C000 

1 

4C 

2D 

C0 

4C 

44 

C0 

4C 

5B 

CF 

C14B 

8 

20 

FD 

AE 

20 

C008 


C0 

4C 

78 

C0 

4C 

92 

C0 

4C 

19 

CI 50 

3 

A0 

40 

A9 

00 

C010 

3 

95 

C0 

4C 

80 

CI 

4C 

83 

CI 

38 

C158 

: 

85 

FE 

A9 

FD 

C01B 


4C 

AB 

CI 

4C 

AB 

CI 

4C 

CE 

4A 

CI 60 

8 

20 

FD 

AE 

20 

C020 

3 

CI 

4C 

Dl 

CI 

4C 

60 

CI 

4C 

1B 

CI 68 

3 

85 

B9 

A9 

00 

C02B 


48 

CI 

4C 

70 

CI 

AD 

11 

D0 

El 

C170 

3 

AD 

5B 

C3 

8D 

C030 

3 

BD 

5B 

C3 

AD 

1B 

D0 

8D 

5C 

08 

C17B 

8 

C3 

8D 

1B 

D0 

C038 

3 

C3 

A9 

3B 

BD 

11 

D0 

A9 

1B 

BF 

C1B0 

8 

A9 

00 

2C 

A9 

C040 

3 

BD 

18 

D0 

60 

A0 

00 

A9 

20 

0A 

CI 88 

: 

FD 

AE 

20 

9E 

C04B 

8 

B4 

FD 

85 

FE 

9B 

91 

FD 

CB 

AC 

CI 90 

8 

EE 

BE 

4B 

C3 

C050 

3 

D0 

FB 

E6 

FE 

A5 

FE 

C9 

40 

Bl 

CI 98 

3 

ac 

4C 

C3 

A0 

C030 

1 

DB 

F2 

60 

20 

FD 

AE 

20 

9E 

D0 

C1A0 

1 

Uü 

04 

IS 

B4 

C060 

c 

B7 

A0 

00 

A9 

04 

84 

FD 

B5 

04 

CI AB 

3 

A9 

00 

2C 

A9 

C06B 

I 

FE 

SA 

91 

FD 

CB 

D0 

FB 

E6 

A0 

C1B0 

8 

FD 

AE 

20 

8A 

C070 

1 

FE 

A5 

FE 

C9 

08 

D0 

F2 

60 

CD 

C1BB 

8 

20 

0B 

CI 

B0 

C07B 

I 

A0 

00 

A9 

20 

84 

FD 

85 

FE 

D3 

C1C0 

1 

BC 

4C 

C3 

A2 

C0B0 

8 

Bl 

FD 

49 

FF 

91 

FD 

CB 

D0 

50 

CI CB 

8 

00 

BC 

4B 

C3 

C0B8 

8 

F7 

E6 

FE 

A5 

FE 

C9 

40 

D0 

47 

C1D0 

8 

2C 

A9 

80 

85 

C090 

3 

EF 

60 

A9 

00 

2C 

A9 

B0 

85 

37 

CI DB 

1 

B0 

El 

8E 

4B 

C09B 

1 

97 

20 

FC 

C0 

B0 

F3 

8A 

4A 

00 

C1E0 

8 

BC 

51 

C3 

20 

C0A0 

1 

4A 

4A 

A8 

B9 

2F 

CI 

BD 

57 

56 

C1E8 

8 

86 

FD 

BC 

4C 

C0AB 

8 

C3 

B9 

16 

CI 

8D 

58 

C3 

BA 

C5 

C1F0 

8 

84 

14 

8D 

4D 

C0B0 

1 

29 

07 

18 

6D 

57 

C3 

SD 

57 

89 

C1F8 

8 

85 

15 

A0 

01 

C0BB 

8 

C3 

A5 

14 

29 

FB 

BD 

59 

C3 

61 

C200 

8 

53 

C3 

BC 

51 

C0C0 

3 

18 

A9 

00 

6D 

57 

C3 

85 

FD 

00 

C20B 

8 

C3 

BC 

35 

C3 

C0C8 

8 

A9 

20 

6D 

58 

C3 

85 

FE 

18 

7C 

C210 

8 

AD 

4D 

C3 

C5 

C0D0 

3 

A5 

FD 

6D 

59 

C3 

85 

FD 

A5 

A6 

C21B 

8 

IE 

AD 

4C 

C3 

C0D8 

1 

FE 

65 

15 

85 

FE 

A5 

14 

29 

3F 

C220 

8 

38 

A5 

14 

ED 

C0E0 

8 

07 

49 

07 

AA 

A9 

01 

CA 

30 

Dl 

C228 

3 

C3 

A5 

15 

ED 

C0EB 

3 

03 

0A 

D0 

FA 

A0 

00 

24 

97 

4D 

C230 

8 

C3 

BC 

56 

C3 

C0F0 

8 

10 

05 

49 

FF 

31 

FD 

2C 

11 

AB 

C238 

8 

AD 

4C 

C3 

E5 

C0F8 

8 

FD 

91 

FD 

60 

20 

FD 

AE 

20 

36 

C240 

8 

AD 

4D 

C3 

E5 

C100 

3 

EB 

B7 

E0 

CB 

B0 

0C 

A5 

15 

44 

C248 

3 

A5 

FD 

CD 

4B 

CI 08 

8 

C9 

01 

90 

07 

D0 

04 

A4 

14 

3F 

C250 

3 

AD 

4B 

C3 

E5 

CI 10 

3 

C0 

40 

60 

A4 

14 

60 

00 

01 

E3 

C25B 

3 

8C 

53 

C3 

4C 

CI 18 

8 

02 

03 

05 

06 

07 

08 

0A 

0B 

8D 

C260 

3 

C3 

8D 

4E 

C3 

C120 

3 

0C 

0D 

0F 

10 

11 

12 

14 

15 

95 

C26B 

s 

24 

AD 

4F 

C3 

CI 28 

1 

16 

17 

19 

1A 

1B 

IC 

IE 

00 

5F 

C270 

8 

IC 

AE 

4E 

C3 

CI 30 


40 

80 

C0 

00 

40 

80 

C0 

00 

EC 

C278 

: 

4F 

C3 

AD 

56 

CI 38 

3 

40 

80 

C0 

00 

40 

80 

C0 

00 

F4 

C280 

3 

AD 

53 

C3 

8D 

CI 40 


40 

B0 

C0 

00 

40 

80 

C0 

00 

FC 

C288 

3 

56 

C3 

BC 

53 


— 

C000 C34B 


D4 

El 

A2 

00 

FD 

C290 

8 

4A 

8D 

4D 

C3 

AD 

4F 

C3 

6A 

A6 

85 

FD 

A9 

20 

AA 

C29B 

3 

BD 

4C 

C3 

4C 

31 

C3 

AD 

56 

5A 

20 

DQ 

FF 

60 

10 

C2A0 

3 

C3 

30 

0E 

18 

65 

14 

85 

14 

37 

D4 

El 

A9 

61 

F4 

C2AB 

8 

A5 

15 

69 

00 

85 

15 

4C 

BE 

E2 

20 

D5 

FF 

60 

A6 

C2B0 

3 

C2 

38 

A5 

14 

E9 

01 

85 

14 

5F 

11 

D0 

AD 

5C 

74 

C2B8 

8 

A5 

15 

E9 

00 

85 

15 

1B 

AD 

IF 

20 

44 

E5 

60 

9E 

C2C0 

8 

4B 

C3 

6D 

55 

C3 

BD 

4B 

C3 

50 

80 

85 

97 

20 

3C 

C2CB 

8 

1B 

AD 

4C 

C3 

6D 

4E 

C3 

BD 

B6 

B7 

E0 

CB 

B0 

BF 

C2D0 

8 

4C 

C3 

AD 

4D 

C3 

69 

00 

BD 

B5 

86 

FD 

A0 

3F 

6A 

C2DB 

8 

4D 

C3 

EE 

51 

C3 

D0 

03 

EE 

99 

01 

8C 

4D 

C3 

80 

C2E0 

8 

52 

C3 

AD 

4D 

C3 

CD 

50 

C3 

9C 

14 

4C 

FA 

CI 

33 

C2EB 

8 

90 

47 

D0 

0B 

AD 

4F 

C3 

CD 

31 

80 

85 

97 

20 

64 

C2F0 

8 

4C 

C3 

B0 

3D 

38 

AD 

4C 

C3 

9B 

AD 

20 

F7 

B7 

B9 

C2FB 

3 

ED 

4F 

C3 

BD 

4C 

C3 

AD 

4D 

64 

C2 

8D 

4D 

C3 

BB 

C300 

8 

C3 

ED 

50 

C3 

BD 

AD 

C3 

AD 

F4 

C7 

B6 

FD 

A0 

Al 

C30B 

8 

54 

C3 

30 

0E 

18 

65 

14 

85 

14 

F0 

D7 

A9 

00 

CE 

C310 

8 

14 

A5 

15 

69 

00 

B5 

15 

4C 

82 

97 

20 

FC 

C0 

92 

C318 

3 

27 

C3 

38 

A5 

14 

E9 

01 

85 

B3 

C3 

BD 

52 

C3 

FF 

C320 

8 

14 

A5 

15 

E9 

00 

85 

15 

1B 

3A 

FC 

C0 

B0 

D3 

4A 

C328 

3 

AD 

4B 

C3 

6D 

33 

C3 

8D 

4B 

39 

C3 

AC 

51 

C3 

88 

C330 

8 

C3 

AE 

4B 

C3 

20 

9E 

C0 

AD 

EB 

C3 

AD 

52 

C3 

06 

C338 

8 

52 

C3 

CD 

50 

C3 

90 

09 

AD 

29 

BC 

56 

C3 

8C 

F4 

C340 

8 

4F 

C3 

CD 

51 

C3 

B0 

01 

60 

95 

C3 

BB 

BC 

52 

D9 

C34B 

8 

4C 

9E 

C2 

FF 

00 

FF 

00 

FF 

94 

BC 

54 

C3 

BB 

6B 












15 

90 

09 

D0 

A9 












C5 

14 

B0 

17 

86 












4C 

C3 

BD 

4F 

A5 












4D 

C3 

BD 

50 

BB 












4C 

4B 

C2 

3B 

CA 












14 

BD 

4F 

C3 

2B 












15 

BD 

50 

C3 

CB 












C3 

B0 

0F 

38 

37 












FD 

BD 

4E 

C3 

5D 












64 

C2 

ED 

4B 

B3 












AD 

50 

C3 

D0 

04 












CD 

4E 

C3 

B0 

6F 












BD 

4E 

C3 

8E 

67 

Listing 3. 

Das Maschinen- 



C3 

55 

8D 

C3 

54 

CB 

C3 

8C 

60 

29 

Programm »Draw« geben Sie bitte 

C3 

AD 

50 

C3 

C0 

mit dem MSE ein. 
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Tips und Tricks 


C 64 


212 Zeilen 37 Symbole 


0000 
0000 
0000 
0000 
0000 
0000 
0000 
0014 
OOfd 
aefd 
0000 
0000 
0000 
b7eb 
0000 
0000 
0000 
0000 
0000 
0000 
0000 
0000 
0000 
0000 
cl7B 
cl 78 
c178 60 
Cl79 

cl79 20efc2 
cl7c bOfa 
cl7e 8e09c3 
c101 8dl0c3 
c184 8c0fc3 
cl87 20efc2 
clBa bOec 
clBc 86fd 
clBe Bc0ac3 
cl91 ac0fc3 
cl94 8414 
c!96 8d0bc3 
c199 adl0c3 
cl9c B515 
cl9e aOOl 
claO 8c14c3 
ciao Bc1lc3 
cla6 Bc0fc3 
cla9 88 
claa 8c10c3 
clad 8c13c3 
clbO 8cl2c3 
clb3 B8 
clb4 

clb4 adObcS 
clb7 c515 
clb9 9009 
clbb dOle 
clbd adOac3 
clcO c514 
clc2 b017 
clc4 38 
clcS a514 
clc7 ed0ac3 
clca 8d0dc3 
clcd a315 
clcf ed0bc3 
cld2 BdOec3 
cld5 Bcl4c3 
cld8 4cecc1 
cldb 38 
cldc adOac3 
cldf e514 
clel Bd0dc3 

KloA «UÜbcS 
clo7 eS15 
clo9 BdOec3 
clec 


1 Saigon thmus basiert auf einen artikel von mike 

2 Ihiggln* erschienen in der byte august 1981 s.414-416 

3 1 

4 (das proqranun fuer den cbm 64 wurde 

5 jmichael bauer aindorferstr. 86 

6 >geschrieben. 

7 1 


von 

8000 muenche 


*14 

•fd 

»aefd 


•0000 


8 xO - 

9 yl 

10 chkcom ■ 

n i 

12 I 

13 | 

14 getcor ■ 

13 1 

16 I 

17 l 

18 plot ■ 

19 | 

20 | 

21 » 

22 I 

23 I 

24 1 

25 * - *cl78 

26 1 

27 111 rts 

28 !•*•*•••»* einsprungi aufruf 

29 drwli 

30 

31 

32 

33 

34 

35 

36 

37 

38 

39 

40 

41 

42 

43 setpa 

44 

45 

46 

47 

48 

49 

50 

51 

52 ! 

53 hegin 

54 

55 

56 

57 

58 

59 

60 drawOl sec 

61 
62 

63 

64 

65 

66 

67 

68 


Ix-koordinate 

ty-koordlnate 

jprueft ob ein komma folgt, 
wenn ja, holt das naechste 
Zeichen, wenn nein -> syntax 
error 

Iholt eine adresse <• 2 byte) 
und ein byte. die adresse wird 
in xO und xO+l, das byte im 
x-register uebergeben. 

(die adresse dieser routine 
muss hier eingesetzt werden, 
plot muss in der läge sein 
einen punkt, dessen x und y 
koordinaten uebergeben werden, 
zu setzen. 


sys49529,xO,yO,x1,y1 


jsr gcoord 

Ihole koordinaten 1. 

punkt 

bcs ill 
stx yO 
sta ct+1 

»ignoriere wert wenn 

ausserhalb 

sty ct 
jsr gcoord 

(hole koordinaten 2. 

punkt 

bcs ill 
stx yl 
sty xl 
ldy ct 
sty xO 
sta x1+1 
lda ct+1 
sta xO+l 

{ignoriere wert wenn 

ausserhalb 

ldy 0*01 

sty ix 

Kyr) - 1 


sty iy 
sty ct 
dey 

sty ct+1 
sty ax 
sty ay 

((yr) = 0 


dey 

! (vr> = - 1 
berechne dx 

646R 

lda xl+1 

ixl -> xO ? 


cmp xO+l 
bcc drawOl 

inein -> 


bne draw02 
lda xl 

I ja -> 


cmp xO 

bcs draw02 

Ija -> 


sec 

Idx = xO - xl 



69 draw02 sec 


lda xO 
sbc xl 
sta dx 
lda xO+l 
sbc x 1 ♦ 1 
sta dx + 1 
sty ix 
jmp draw03 


70 

71 

72 

73 

74 

73 
76 I 


lda xl 
sbc xO 
sta dx 
lda Hlti 
sbc >iO+l 
sta dx + 1 


c202 ed09c3 86 draw04 sbc yO 


c234 4a 

c235 8d0bc3 
c238 adOdcS 
c23b 6a 
c23c Bdöac3 
c23f 4cd5c2 
c242 


104 

105 

106 

107 

108 
109 


lsr a 
sta of+l 
lda dx 
ror a 
sta of 
jmp plotit 


om .in 


I ix = -1 


Idx - xl - xO 


clec aSfd 

77 

draw03 lda yl 

iyi 

-> yO 

clee cd09c3 

78 

cmp yO 

clfl bOOf 

79 

bcs draw04 

ij. 

-> 

cif3 38 

80 

sec 

ldy 

■ yO - 

cif4 ad09c3 

81 

lda yO 

cif7 e5fd 

82 

sbc yl 



clf9 Bd0cc3 

83 

st« dy 



cifc 8c 1 lc3 

84 

•ty iy 

Uy 

■ -1 

clfl 4cö8c2 

85 

jmp drawOS 



»dy ■ yl - yO 


c205 Bd0cc3 

87 


sta dy 



c2O0 

ad0ec3 

88 

draw05 

lda dx+1 

Idx < 

dy 7 

c20b 

d024 

89 


bne draw07 

(nein 

-> 

c20d 

adOde3 

90 


lda dx 



c210 

cdOccS 

91 


cmp dy 



C213 

bOlc 

92 


bcs draw07 

mein 

-> 

c215 

ae0cc3 

93 


Idx dy 

5 vertausche i 

c218 

Bd0cc3 

94 


sta dy 



c21b 

Be0dc3 

95 


stx dx 



c21e 

adl4c3 

96 


lda ix 

lay » 

ix 

c221 

Bdl2c3 

97 


sta ay 


C224 

adllc3 

98 


lda iy 

lax - 

iy 

c227 

Bdl3c3 

99 


sta ax 

c22a 

c8 

100 


iny 

1 <yr> 

- o 

c22b 

0cl4c3 

101 


sty ix 

lix » 

0 

c22e 

8c 1 lc3 

102 


sty iy 

liy - 

0 

c231 

adOec3 

103 

draw07 

ld« dx+1 

lof - 

dx / 2 


Iplotte 1. punkt 


110 ;###«#•#•» approximationsschleife 


c242 

adl4c3 

111 

drwlop lda 

ix 

c245 

300e 

112 


bmi 

drawOB 

c247 

18 

113 


cl c 


c248 

6514 

114 


ade 

xO 

c24a 

0514 

115 


sta 

xO 

c24c 

a515 

116 


lda 

xO+l 

c24e 

6900 

117 


ade 

0*00 

c250 

8515 

118 


sta 

xO+l 

c252 

4c62c2 

119 


jmp 

drawll 

c255 

38 

120 

drawüB 

sec 


c?56 

a5l4 

121 


lda 

xO 

c258 

e90l 

122 


sbc 

0*01 

c25a 

8514 

123 


sta 

»0 

c25c 

.515 

124 


lda 

xO+l 

c25e 

e900 

125 


sbc 

0*00 

C260 

8515 

126 


sta 

XO+l 

C262 

1B 

127 

drawll 

dlC 


C263 

ad09c3 

128 


lda 

vo 

C266 

6dl3c3 

129 


ade 

ax 

c269 

8d09c3 

130 


sta 

vo 

c26c 

18 

131 


clc 


c26d 

ad0ac3 

132 


lda 

of 

c270 

6d0cc3 

133 


ade 

dy 

c273 

8d0ac3 

134 


sta 

of 

c276 

adObc 3 

135 


lda 

of + 1 

C279 

6900 

136 


ade 

0*00 

c27b 

8d0bc3 

137 


sta 

of + 1 

c27e 

eeOfc3 

138 


inc 

ct 

c281 

d003 

139 


bne 

draw06 

c283 

eol0c3 

140 


inc 

ct+1 

c286 

ad0bc3 

141 

draw06 

lda 

of+1 

c289 

cd0ec3 

142 


cmp 

dx + 1 

c2Bc 

9047 

143 


bcc 

plotit 

c20e 

dOüS 

144 


bne 

draw09 

c290 

ad0dc3 

145 


lda 

dx 

c293 

cd0ac3 

146 


cmp 

of 

c296 

b03d 

147 


bcs 

plotit 

c290 

30 

148 

dr aw09 

sec 


c299 

ad0ac3 

149 


lda 

of 

c29c 

ed0dc3 

150 


sbc 

dx 

c29f 

Bd0ac3 

151 


sta 

of 

c2a2 

ad0üc3 

152 


lda 

of+1 

c2a5 

edOeco 

153 


sbc 

dx + 1 

c2a0 

8d0bc3 

154 


sta 

of + 1 

c2ab 

adl2c3 

155 


lda 

ay 

c2ae 

300e 

156 


bmi 

drawlO 

c2b0 

18 

157 


clc 


c2bl 

6514 

158 


ade 

xO 

c2b3 

8514 

159 


sta 

xO 

c2b5 

a515 

160 


lda 

xO+l 

c2b7 

6900 

161 


ade 

0*00 

c2b9 

8515 

162 


sta 

xO+l 

=?• 

'";cbc2 

163 


jmp 

drawl2 

c2be 

38 

164 

drawlO 

sec 


c2bf 

a514 

165 


lda 

xO 

c2cl 

e901 

166 


sbc 

0*01 

c2c3 

0514 

167 


sta 

xO 

c2c5 

a515 

168 


lda 

xO+l 

c2c7 

e900 

169 


sbc 

0*00 

c2c9 

8515 

170 


sta 

xO+l 

c2cb 

18 

171 

drawl2 

clc 


c2cc 

ad09c3 

172 


lda 

yO 

c2cf 

6dllc3 

173 


ade 

iy 

c2d2 

8d09cJ 

174 


sta 

vo 

c2d5 

ae09c3 

175 plotit 

Idx 

yO 

c2d8 

200000 

176 


J«r 

plot 

c2db 

ad10c3 

177 


lda 

ct+1 

c2de 

cd0ec3 

178 


cmp 

dx+1 

c2el 

900? 

179 


bcc 

nexpnt 

c2e3 

ad0dc3 

180 


lda 

dx 

c2e6 

cdOfcJ 

101 


cmp 

ct 

c2e9 

bOOl 

102 


bcs 

nexpnt 

c2eb 

60 

183 


rts 


c3.c 

4c42c2 

in-i 

nsHpnt 

jmp 

ür-lop 

c2ef 


105 

I 


c2ef 

20fdae 

186 gcoord 

jsr 

chkcom 

c2f 2 

20ebb7 

107 


J»r 

getcor 

c2f 5 

e0c8 

108 


cp« 

0200 

c2f 7 

bOOc 

189 


bcs 

fln»sh 

c2f 9 

«515 

190 


lda 

xO+l 

c2fb 

c901 

191 


cmp 

0*01 

c2fd 

9007 

192 


bcc 

f inis 

c2f f 

d004 

193 


bne 

finish 

c301 

a414 

194 


lay 

xO 

c303 

c040 

195 


cpy 

0*40 

c?05 

60 

196 

finish 

rts 


c306 

a414 

197 

f inls 

ldy 

xO 

c3O0 

60 

198 


rts 


C309 


199 

1 



c309 


200 

larbeltsvariable 

c309 


201 

* 



c309 


202 

yO 

■ 

• 

c30a 


203 

Xl 

■ 

yO+1 

c30a 


204 

of 

■ 

xl 

c30c 


205 dy 

■ 

of+2 

c30d 


206 

dx 

Bf 

dy+1 

c30f 


207 

ct 

■ 

dx+2 

c311 


208 

iy 

- 

ct+2 

c312 


209 

ay 

■ 

iy+1 

c313 


210 

ax 

■ 

ay+1 

c314 


211 

ix 

■ 

ax+1 

c309 


212 

.end 




lix ■ -1 ? 

5ja -> weiter 
ixO ■ xO + ix 


1x0 ■ xO - ix 


lyO ■ yO ♦ ax 


lof • of + dy 


Ict - ct ♦ 1 

»of <■ dx ? 

»ja -> zeichne punkt 


»ja -> zeichne punkt 
lof ■ of - dx 


;ay - -1 ? 

{ja -> weiter 
1x0 = xO + ay 


1x0 » xO - ay 


lyO = yO + iy 


1uebergebe yO im <xr) an plot 
{zeichne punkt 
ict <- dx ? 

mein -> naechster punkt 


llinie ist fertig gezeichnet 

Ihole und pruefe parameter 

ly > 200 ? 

|X > 320 ? 

!< 1 
l> 1 
I ■ 1 


Listing 2. Quell¬ 
code zu »Draw«. 


ly-koordinate 
Ix-koordinate 
Iappr ou 1matlonswert 
labstand yl zu yO 
lanzahl der punkte 
I schielfenzaehler 
{Inkrement 

Iwie ly 
(wie ix 
l Inkrement 


xO 

plot 

begin 

draw04 

draw08 

drawlO 

gcoord 

xl 

ct 

ix 


0014 

yl 


OOfd 

chkcom 

» 

aefd 

getcor 

> 

b7eb 

0000 

ill 

■ 

c 178 

drwl in 

■ 

C179 

setpar 

- 

cl9e 

clb4 

drawOl 

= 

Clc4 

draw02 

a 

cldb 

draw03 

B 

clec 

c202 

drawOS 

■ 

c208 

draw07 

■ 

c231 

drwlop 

8 

c242 

c255 

draw]1 

= 

c262 

draw06 

= 

c286 

draw09 

■ 

c298 

c2be 

drawl2 


c2cb 

plotit 

a 

c2d5 

nexpnt 

B 

c2ec 

c2ef 

finish 

= 

c305 

f inis 

= 

c306 

yo 

3 

c309 

c30a 

of 

= 

c30a 

dy 

a 

c30c 

dx 

= 

c30d 

c30f 

iy 

= 

c311 

ay 

■ 

c312 

ax 

3 

c313 

c314 
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C 64 


Tabellen 


Befehlssatz 
des 6510 

Hier finden Sie, alphabetisch geordnet, 
eine Auflistung aller bekannten Befehle 
des C64-Prozessors. Dazu gehören auch 
die »illegalen Opcodes«. 


.1IV'. 1 
/mV 


1 


Z uerst ein Wort zu den illegalen Opcodes, die in Tabelle 
1 enthalten sind: 

Seit Erscheinen des C 64 vor ungefähr drei Jahren sind 
einige verschiedene Versionen des Prozessors 6510 gebaut 
worden. Diese sind untereinander voll kompatibel, was den 
normalen Befehlssatz aus Tabelle 2 anbetrifft. Die illegalen 
Opcodes jedoch laufen nicht auf allen Versionen der CPU 
6510. Welche Befehle auf welchem Computer eine korrekte 
Ausführung bewirken, läßt sich nur durch Ausprobieren fest¬ 
stellen. Äußerst hilfreich dabei ist der SMON aus dieser Aus¬ 
gabe: Er zeigt einen illegalen Opcode nicht wie die meisten 
Maschinensprachmonitore durch drei Fragezeichen an, son¬ 
dern disassembliert den Befehl mit den in Tabelle 1 genann¬ 
ten Abkürzungen. Ein vorangestelltes Sternchen (*) kenn¬ 
zeichnet bei SMON den Befehl als illegalen Opcode (zum Bei¬ 
spiel *AXS). 

In Tabelle 3 finden Sie eine Übersicht über die in den beiden 
anderen Tabellen verwendeten Abkürzungen. 




■ All : AND register with *11 

Das X- beziehungsweise? Y-Reqister wird mit *11 AND- 
verknüpft und das Ergebnis X- beziehungsweise Y- 
indiziert abqeleqt 

Addressierungsartenj 

Assembler: Hex-Code: Abkürzung: Byte: 

All OP,X 9C ABX 3 

All OP,Y 9E ABY 3 


■ AAX : AND akku with X-Reqister and störe akku 
Entspricht befehlsfolge: 

AND swischon Akku und X-R»qi«ter 
STA 

Addressiecup.gsarten.: 


Assembler: 

Hex-Code: 

Abkürzung: 

Byte: 

AAX *0P 

SB 

IM 

2 

AAX OP 

B7 

ZP 

2 

AAX OP.V 

97 

ZPY 

2 

AAX OP 

BF 

ABS 

3 

AAX <0P,X> 

83 

(0P,X> 

2 

■ ASR : AND 

with akku and 

shift right 


Entspricht 

AND 

LSR 

Bef ehlsfolge: 




eddressier.MoaB.ar tSQI 



Assembler: 

Hex-Code: 

Abkürzung: 

Byte: 

ASR «OP 

6B 

IM 

2 

■ ARR : AND 

with akku and 

rotate riqht 


Entspricht 

AND 

Befeh 1sfolge: 



ROR 




Addressierungsarten.:. 



Assembler: 

Hex-Code: 

Abkürzung: 

Byte: 

ARR #OP 

4b 

IM 

2 


■ AXS : AND akku and X-reqister and subtract from data 
Der Wert wird von dem Ergebnis der AND-Verknüpfunq 
zwischen Akku und X-Register subtrahiert und in das X- 
Reqister geschrieben. 

eddrgssigryogsarten.1 

Assembler: Hex-Code: Abkürzung: Byte: 

AXS «OP CB IM 2 


■ OCP : decrement and compare with akku 
Entspricht Bef ehl sfol ge: 

DEC 

CMP 


MdtasBlacuoasacfcBQ!. 



Assembler: 

Hex-Code: 

Abkürzung: 

Byte: 

DCP OP 

C7 

ZP 

2 

DCP 0P,X 

D7 

ZPX 

2 

DCP OP 

CF 

ABS 

3 

DCP 0P,X 

DF 

ABX 

3 

DCP OP.V 

DB 

ABY 

3 

DCP (OP,X > 

C3 

(ZP,X> 

2 

DCP (OP),Y 

D3 

(ZP),Y 

2 

■ DOP : double NOP 



Folgende Codes wirken 

wie der NOP- 

•Befehl, sind aber 

zwei Byte 

lang. Das zweite 

Byte wird dabei 

übersprungen. 





04, 14, 34. 44, 54, 64, 74, D4, F4, B0, 89, 93 


■1SC : increment and subtract with carry 
Entspricht Be-f ehl sf ol ge: 

. INC 
SBC 


^ddressierungsarteni 

Assembler: Hex-Code: Abkürzung: Byte: 


ISC OP 

E7 

ZP 

2 

ISC 0P,X 

F7 

ZPX 

2 

ISC OP 

EF 

ABS 

3 

ISC 0P,X 

FF 

ABX 

3 

ISC OP,Y 

FB 

ABY 

3 

ISC (OP,X) 

E3 

<0P,X> 

2 

ISC (OP),Y 

F3 

(OP),Y 

2 


■ KIL : kill er codes 

Folgende Codes bewirken einen Absturz des Prozessors, 
dem auch mit einem RUN/STOP-RESTORE nicht mehr 
beizukommen ist. 

02, 12, 22, 32, 42, 52, 62, 72, 92, B2, D2, F2 


■ LAR ; load akku, AND with stackregi ster, transfer 
result to akku, X-register and Stackregister 
Entspricht Befehlsfolge: 

LDA 

AND 

TAX 

TXS 

QflöcesstacuQBsactaDi 

Assembler: Hex-Code: Abkürzung: Byte: 

LAR OB,Y BB ABY 3 


■ LAX : load to akku and X-register 
Entspricht Bef ehl »f ol ge: 

LDA 

TAX 

Qd.äCf?B»k8CyQQ*SC£gn!. 


Assembler: 

Hex-Code: 

Abkürzung: 

Byte: 

LAX OP 

A7 

ZP 

2 

LAX OP,Y 

B7 

ZPY 

2 

LAX OP 

AF 

ABS 

3 

LAX OP,Y 

BF 

ABY 

3 

LAX (0P,X) 

A3 

(0P,X) 

2 

LAX (OP),Y 

B3 

(OP) ,Y 

2 


■ NOP r no Operation 

Folgende Codes haben wie der Code *EA die NQP-Funktion: 
1A, 3A, 5A, 7A, DA, FA 

Tabelle 1. Die »illegalen Opcodes« des 6510-Prozessors 
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Tabellen 


C 64 



■ RLA : rotate left, AND 

with akku and störe 

akku 

Entspricht 

ROL 

AND 

STA 

Befehlsfolge: 




«Söresslerynggarteni 




Assembler: 

Hex-Code: 

Abkürzung: 

Byte: 


RLA OP 

27 

ZP 

2 


RLA OP,X 

37 

ZPX 

2 


RLA OP 

2F 

ABS 

3 


RLA OP,X 

3F 

ABX 

3 


RLA OP,Y 

3B 

ABY 

3 


RLA (OP,XI 

23 

(OP,X> 

2 


RLA (OP),Y 

33 

(OP),Y 

2 


* RRA : rotate right and 

add with carry 


Entspricht 

ROR 

ADC 

Befehlsfolge: 




Pä0r.BaB!.erunggar(;eni 




Assembler: 

Heu-Code: 

Abkürzung: 

Byte: 


RRA OP 

67 

ZP 

2 


RRA OP,X 

77 

ZPX 

2 


RRA OP 

6F 

ABS 

3 


RRA OP,X 

7F 

ABX 

S 


RRA OP,Y 

7B 

ABY 

3 


RRA (OP,X> 

63 

(OP,X> 

2 


RRA (OP),Y 

73 

(OP),Y 

2 


■ SLO : shift left and OR with akku 



Entspricht 

ASL 

Befehlsfolge: 




ORA 





SÖdressierungsartent 




Assembler: 

Hex-Code: 

Abkürzung: 

Byte: 


SLO OP 

07 

ZP 

2 


SLO OP,X 

17 

ZPX 

2 


SLO OP 

0F 

ABS 

3 


SLO OP,X 
SLO OP,Y 

1F 

1B 

ABX 

ABY 

3 

3 

S*6R Ol 

SLO <OP,X> 

13 

(OP.X) 

2 


SLO (OP),Y 

03 

(OP),Y 

2 


■ SRE : shift right and 

EOR with akku 



Entspricht 

LSR 

Befehlsfolge: 




EOR 





Rädressiecungsarteni 




Assembler: 

Hex-Code: 

Abkürzung: 

Byte: 


SRE OP 

47 

ZP 

2 


SRE OP,X 

57 

ZPX 

2 


SRE OP 

4F 

ABS 

3 


SRE OP,X 

SF 

ABX 

3 


SRE OP,Y 

5B 

ABY 

3 


SRE (OP,X) 

43 

(OP,X) 

2 


SRE (OP),Y 

53 

(OP).Y 

2 


■ TOP i triple NOP 




Folgende Codes wirken wie der NOP-E<efehl , 

sind aber 

drei Byte 

lang. Das zweite und das 

dritte 

Byte wird 

dabei übersprungen. 



0C, IC, 3C 

5C, 7C, DC, 

FC 



Tabelle 1. Die »illegalen Opcodes« des 6510-Prozessors 

(Schluß) 







■ ADC : add 

with carry 




addiere Adreoseninhalt 

plus Carry-Flag 

zum Akkumulator 

Flags: N Z 

C I D V 




+ + 

+ + 




«ddresg.igrunggarten: 




Assembler: 

Hex-Code: 

Abkürzung: 

Byte: 

Takte: 

ADC «OP 

69 

IM 

2 

2 

ADC 0F‘ 

65 

ZP 

2 

3 

ADC OP,X 

75 

ZPX 

2 

4 

ADC OP 

6 D 

ABS 

3 

4 

ADC OP,X 

7D 

ABX 

3 

4 

ADC OP,Y 

79 

ABY 

3 

4 

ADC (OP,XI 

61 

(ZP,X) 

2 

6 

ADC (OP),Y 

71 

(ZP),Y 

2 

5 







■ AND : AND akku 

verknüpfe Speicher mit 

Akku durch logische UND 

Fragst N Z C I D V 
+ + 





AddcessigruDgsacSgn: 

Assembler: Hex-Code: 

Abkürzung: 

Byte: 

Takte: 

AND (tOP 

29 

IM 

2 

2 

AND OP 

25 

ZP 

2 

3 

AND OP,X 

35 

ZPX 

2 

4 

AND OP 

2D 

ABS 

3 

4 

AND OP,X 

3D 

ABX 

3 

4 

AND OP,Y 

39 

ABY 

3 

4 

AND (OP,X) 

21 

(ZP , X) 

2 

6 

AND < OP >,Y 

31 

(ZP),Y 

2 

5 

■ ASL : arithmetic shift left 
schiebe Bits eines Speichers um eine 

Stelle nach links 

Flagsi N Z C I D V 
+ + 





ädätfsiiBcuossacSstu 

Assembler: Hex-Code: 

Abkürzung: 

Byte: 

Takte: 

ASL 

0A 

Akku 

1 

2 

ASL OP 

06 

ZP 

2 

5 

ASL OP,X 

16 

ZPX 

2 

6 

ASL OP 

0E 

ABS 

3 

6 

ASL OP,X 

IE 

ABX 

3 

7 

■ BCC : branch if carry clear 

verzweige, falls das Übertragsbit gelöscht ist 

Eiagsi N Z C I D V 
kei ne 

Addressierunqsarten: 

Assembler: Hex-Code: 

Abkürzung: 

Byte: 

Takte: 

BCC OP 

90 

REL 

2 

2 

■ : branch if carry set 

verzweige, falls das Übertragsbit gesetzt ist 

Flags: N Z C I D V 
kei ne 


^ddressierungsarten : 





Assembler: Hex-Code: 

Abkürzung: 

Byte: 

Takte: 

BCS OP 

B0 

REL 

2 

2 

■ BEQ : branch if equal 
verzweige, falls das 

(to zero) 
Ergebnis der 

letzten 

Operation 

gleich (Null) war 

EiUStL N Z C 1 D V 
keine 




6tltlCB**i*CUDB*#CSaDJL 

Awwombl..-, M»H CuUe. 

AtikUrionyi 

fc»y tei 

iakte« 

BEO OP 

F0 

REL 

2 

2 

■ BIT : teBt bite 
verknüpfe Speicher 

entsprechende Flags 

und Akku durch AND, setze 

(Akku wird nicht verändert !) 

EUfltti N Z C 1 D V 
«■ + + 





6ddr«Mi»ruoa»#ctBoi. 





Assembler: Hex-Code: 

Abkürzung: 

Byte: 

Takte: 

BIT OP 

24 

ZP 

2 

3 

BIT OP 

2C 

ABS 

3 

4 

■BMI : branch if minus 
verzweige, falls das 

Ergebnis der 

1 etzten 

Operation 

kleiner Null war 

EIämi N Z C I D V 
kei ne 





ÖÖdressiecyngsarteni 

Assembler: Hex-Code: 

Abkürzung: 

Byte: 

Takte: 

BMI OP 

30 

REL 

2 

2 

Tabelle 2. Die Befehle des 6510-Prozessors 
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■ BNE : branch if not equal (to zero) 


verzweige, falls das 
ungleich <Null> war 

Ergebnis der 

1 etzten 

Operation 

Elegsi N Z C I D V 
keine 




AdäCgasierygggartens 
Assembler: Hex-Code: 

Abkürzung: 

Byte: 

Takte: 

BNE OP D0 

REL 

2 

2 

■ BPL : branch if plus 
verzweige, falls das 
größer Null war 

Ergebnis der 

1 etzten 

Operation 

EUg»L N Z C I D V 
keine 




Qddressietyngsflrfeeni 
Assembler: Hex-Code: 

Abkürzung: 

Byte: 

Takte: 

BPL OP 10 

REL 

2 

2 

■ BRK i break 




Programmstop und Sprung 

über Breakpointer 


Flags:. N Z C I D V 
+ 




Addressigrungsartenj. 
Assembler: Hex-Code: 

Abkürzung: 

Byte: 

Takte: 

BRK 00 

- 

1 

7 


■ BVC : branch if overflow clear 

verzweige, falls das Überlaufsbit gelöscht ist 

Flagsj. N Z C I D V 
keine 

Address i.eruogsarteni 

Assembler: Hex-Code: Abkürzung: Byte: 

BVC OP 50 REL 2 


■ BVS : branch if overflow set 

verzweige, falls das überlaufsbit gesetzt ist 

Flags: N Z C I D V 
keine 

AddressiHrungaarteni 

Assemblers Hex-Code: Abkürzung: Bytes Taktes 

BVS OP 70 REL 2 2 


■ CLC s clear carry 
lösche das übertragsbit 

Flags: N Z C I D V 
+ 

aaacs*a4acao9MCSsüx 


Assembler: Hex-Code: 

Abkürzung: 

Byte: 

Takte: 

CLC ia 

- 


2 

■ CLD : clear decimal mode 

lösche das Bit für den Dezimalmodus 



EJaasi n z c i d v 
+ 

MäresgiscuagaacSeni 
Assembler: Hex-Code: 

Abkürzung: 

Byte: 

Takte: 

CLD D8 

- 

1 

2 


■ CLI s clear Interrupt flag 

lösche das Interruptbit (Interrupts nun erlaubt) 


Elagss N Z C r D V 
+ 

AddressigrunggartitDi 

Assemblers Hex-Code: Abkürzung: Bytes Taktes 

CLI 50 - i 


■ CLV s clear overflow flag 
lösche das Überlaufbit 


Taktes 

' 2 


Flagss. N Z C I D V 
+ 

0dÖCS§sierungsarterH 

Assemblers Hex-Codes Abkürzungs Bytes Taktes 
CLV B8 1 2 


■ CMP s compare with akku 
vergleiche Speicher mit Akkuinhalt 

Flagss. N Z C I D V 
+ + + 


0äÖE3?Si.9CUDgsj>r:teQi 


Assembler: 

Hex-CDde: 

Abkürzung: 

Byte: 

Takte: 

CMP »OP 

C9 

IM 

2 

2 

CMP OF 

CS 

ZP 

2 

3 

CMP OP,X 

D5 

ZPX 

2 

4 

CMP OP 

CD 

ABS 

3 

4 

CMP OP.X 

DD 

ABX 

3 

4 

CMP OP,V 

D9 

ABY 

3 

4 

CMP <OP,X> 

CI 

<ZP,X) 

2 

b 

CMP <OP),Y 

Dl 

(ZP),Y 

2 

5 


■ CPX : compare with X-register 
vergleiche Spei eherinhalt mit X-Reqister 

Flags?. N Z C I D V 
+ + + 


Addressierungsarteni 
Assembler: Hex-Code: 

Abkürzung: 

Byte: 

Takte: 

CPX #0P 

C9 

IM 

2 

2 

CPX OP 

E4 

ZP 

2 

3 

CPX OP 

EC 

ABS 

3 

4 


■ CPY : compare with Y-register 
vergleiche Spei eherinhalt mit Y-Register 


Elagsi N Z C 


I D V 


i^dr e 


Äddressierungsartgni 

Assembler: Hex-Code: Abkürzung: 


Byte 


Takte: 


CPY #0P 
CPY QP 
CPY ÜP 


C0 

IM 

2 

2 

C4 

ZP 

2 

3 

CC 

ABS 

3 

4 


■ DEC : decrement 

subtrahiere Eins von Spei eherinhalt 
Flagsi N Z C 1 D V 

•f + 

Ad^ressi ecunggar-te D : 


Assembler x 

Hex-Code: 

Abkürzunq: 

Byte: 

Takte: 

DEC OP 

C6 

ZP 

2 

5 

DEC OP,X 

D6 

ZPX 

2 

6 

DEC OP 

CE 

«DO 

3 

6 

DEC OP,X 

DE 

ABX 

3 

7 


■ DEX : decrement X-rogister 

subtrahiere Eins vom Inhalt, des X-Registers 

Flagsi N Z C I D V 
+ + 

edär«»9ier.wDgs«r.1;gQA 

Assembler: Hex-Code: Abkürzung: Byte: Takte: 

DEX CA 1 2 


■ DEY : decrement Y-register 

subtrahiere Eins vom Inhalt des Y-Registers 

Flagsi N Z C I D V 


Addressierungsarteni 

Assembler: Hex-Code: Abkürzung: Byte: 


DEY 88 - 1 


Tabelle 2. Die Befehle des 6510-Prozessors 
(Fortsetzung) 
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Tabellen 


■ EQR : exclusive-or 

verknüpfe Akku und Speicher durch logisches EXKLUSIV¬ 
ODER 

Flags?. N Z C I D V 


«ddreBsigrungsartenj 


Assembler! 

Hex-Code! 

Abkürzunq: 

Bytei 

Takte: 

EOR »OP 

49 

IM 

2 

2 

EOR OP 

45 

ZP 

2 

3 

EOR OP,X 

55 

ZPX 

2 

4 

EOR OP 

4D 

ABS 

3 

4 

EOR OP,X 

5D 

ABX 

3 

4 

EOR OP,Y 

59 

ABY 

3 

4 

EOR (OP.X) 

41 

(ZP.X) 

2 

6 

EOR (OP),Y 

51 

(ZP),Y 

2 

5 


■ INC j increment 

addiere Eins zu Spei eherinhalt 

Ei.£99! N Z C I D V 
+ + 


" ,M| ^BigcyQgiscfcBOi 

AsBemblor: Heu-Code: 

Abkürzung: 

Byte: 

Takte: 

INC OP 

E6 

ZP 

2 

5 

INC OP,X 

F6 

ZPX 

2 

6 

INC OP 

EE 

ABS 

3 

6 

INC OP.X 

FE 

ABX 

3 

7 


1 INX : increment X-reqister 
addiere Eins zu X-Register i nhalt 


Eiag»! N Z C I D V 


Bddressierungsartenx 

Assembler: Hex-Code: Abkürzung: Byte: Takte: 


INX 


E8 


■ INY : increment Y-register 
addiere Eins zu Y-Registerinhalt 




Eiägsi n z c i d v 
+ + 

Addregsierungsscten: 
Assembler: Hex-Code: 

INY C8 

Abkürzung: 

Byte: 

1 

Takte: 

2 

■ JMP : jump 




springe zu Adresse 




Flagsi N Z C 

: I D V 




kei ne 




Abdressjerungsarteni 




Assembler: 

Hex-Code: 

Abkürzung: 

Byte: 

Takte: 

JMP OP 

4C 

ABS 

3 

3 

JMP (OP) 

6C 

IND 

3 

5 

■ JSR : Jump subroutine 




Springe in Unterprogramm 



Flagsi N Z ( 

; i d v 




kei ne 




AtJdressleruDgsgrten: 




Assembler: 

Hex-Code: 

Abkürzung: 

Byte: 

Takte: 

JSR OP 

20 

ABS 

3 

6 

■ LDA : load akku 




schreibe Wert in Akku 




Flagsi N Z ( 

: I D V 




+ + 





Addressierungsar ten: 




Assembler: 

Hex-Code: 

Abkürzunq: 

Byte: 

Takte: 

LDA HOP 

A9 

IM 

2 

2 

LDA OP 

A5 

ZP 

2 

3 

LDA OP.X 

B5 

ZPX 

2 

4 

LDA OP 

AD 

ABS 

3 

4 

LDA OP.X 

BD 

ABX 

3 

4 

LDA OP.Y 

B9 

ABY 

3 

4 

LDA (ÜR,X) 

Al 

(ZP,X) 

2 

6 

LDA (OP),Y 

Bl 

(ZP),Y 

2 

5 


■ LDX : load X-reqister 
schreibe Wert ins X-Register 

N Z C I D V 


0ddresBigruD9S*CS§n; 

Assembler! Hex-Code: Abkürzung! Byte: Taktei 

LDX *0P A2 IM 2 2 

LDX OP A5 ZP 2 3 

LDX OP,Y B6 ZPY 2 4 

LDX OP AE ABS 3 4 

LDX OP,Y BE ABY 3 4 

■ LDY i load Y-register 
schreibe Wert ins Y-Register 

ElMU N Z C I D V 
+ + 

AddressierungsaciMi 

Assembler! Hex-Code: Abkürzung! Byte! Takte: 

LDY #0P AB IM 2 2 

LDY OP A4 ZP 2 3 

LDY QP,X B4 ZPX 2 4 

LDY OP AC ABS 3 4 

LDY DP,X BC ABX 3 4 

■ LSR : logical shift right 

bitweises Rechtsschieben eines Speicherinhalts 

(Bit 0 wird ins Carry-Flag geschoben, Bit 7 wird auf 

Null gesetzt) 

Eläasi N Z C I D V 


Addressierungsartenx 


Assembler: 

LSR 

LSR OP 

LSR OP,X 

LSR OP,“ 

Hex-Code: 

4A 

46 

56 

4E 

5E 

Abkürzung: 

Akku 

ZP 

ZPX 

ABS 

ABX 

Byte: 

1 

2 

2 

3 

3 

Takte: 

2 

5 

6 

6 

7 






■ NOP : no Operation 




keine Ausführung (Dummy- 

-Befehl) 



Flags: N Z 

I D V 




kei ne 




Addressieruogsarten: 




Assembler: 

Hex-Code: 

Abkürzung: 

Byte: 

Takte: 

NOP 

EA 

- 

1 

2 

■ ORA : OR 

akku 




verknüpfe Spei eherinhalt und Akku durch logisches ODER 

Flag»: N z 

I D V 




+ 





Addcgssigrungsarjeni 




Assembler: 

Hex-Code; 

Abkürzung: 

Byte: 

Takte: 

ORA »OP 

09 

IM 

2 

2 

ORA DF' 

05 

ZP 

2 

3 

ORA OP.X 

15 

ZPX 

2 

4 

ORA OP 

0D 

ABS 

3 

4 

ORA OP,X 

ID 

ABX 

3 

4 

ORA OP.Y 

19 

ABY 

3 

4 

ORA (OP,X) 

01 

(ZP.x) 

2 

b 

ORA (OP),Y 

11 

(ZP),Y 

2 

5 

■ PHA : push akku 




schiebe Akkuinhalt auf Stack 



Flags: N Z 

C 1 D V 




kei ne 




eödeesfierungsarten: 




Assembler: 

Hex-Code: 

Abkürzung: 

Byte: 

Takte: 

PHA 

48 

- 

1 

3 

■ PHP : push processor — 

Status 



schiebe Statusregister auf Stack 




Tabelle 2. Die Befehle des 6510-Prozessors 
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Elsas: N Z C I D V 
keine 

Addressierungsarterw 

Assembler: Heu-Code: Abkürzung: Byte: Takte: 


PHP 


08 


■ PLA : pull akku 

lade Akku mit oberstem Stackbyte 

Elsasj N Z C t D V 


SääcSSSlBCyngsartgn: 

Assembler: Hex-Code: Abkürzung: Byte: Takte: 


PLA 


68 


■ PLP : pull processo:—Status 

lade Statusregister mit oberstem Stackbyte 

Flags: N Z C 1 D V 
+ + + + + + 

eästcsssiacyDasactsDi 

Assembler: Hex-Code: Abkürzung: Byte: Takts 


PLP 


28 


■ ROL : rotate left 

rotiere Spei eherinhalt um ein Bit nach links 

(Bit 7 kommt ins Carryflag, Inhalt des Carry-Flaqs 

kommt ins Bit 0) 

Elaasi n z c i d v 


Addressierungsarten: 
Assembler: Hex-Code: 

Abkürzung: 

Byte: 

Takte: 

ROL 

2A 

Akku 

1 

2 

ROL OP 

26 

ZP 

2 

5 

ROL 0P,X 

36 

ZPX 

2 

6 

ROL OP 

2E 

ABS 

3 

6 

ROL 0P,X 

3E 

ABX 

3 

7 




■ ROR ; rotate right 

rotiere Speicherinhalt um ein Bit nach rechts 

(Bit 0 kommt ins Carryflag, Inhalt des Carry-flags kommt 

ins Bit 7) 

Eiaasi n z c i d v 
♦ + + 

Addressierungsacten: 


Assembler: 

Hex-Code: 

Abkürzung: 

Byte: 

Takte: 

ROR 

6A 

Akku 

1 

2 

ROR OP 

66 

ZP 

2 

5 

ROR OP,X 

76 

ZPX 

2 

6 

ROR OP 

6E 

ABS 

3 

6 

ROR OP,X 

7E 

ABX 

3 

7 


■ RTI : return from Interrupt 

nach Ausfuhren eines Interupt normales Programm weiter 
abarbeiten 

EtiaiL N Z C 1 D V 

wie vor Ausführung des Interrupts 


Adargsiiscynaaarten: 

Assembler: Hex-Code: Abkürzung: Byto 


Takts 


RTI 


«0 


■ RTS : return from subroutine 
Rücksprunq aus Unterprogramm 

Elsaai N Z C I D V 
keine 


AddressietUDgsarten: 

flesemblen Hex-Code: 
RTS 60 


Abkürjung: 


Byte 


Takte: 


■ SBC : subtract wi th carry 

subtrahiere Speicherinhalt vom Akku unter Berücksichti¬ 
gung des Vorzeichens 

Eiagsi N Z C I D V 
+ + + + 


Addressieruggsarteni 

Assembler: Hex-Code: Abkürzung: 


Byte: Takte: 


sbc eop 

SBC CP 
SBC OP,X 
SBC OP 
SBC OP,X 
SBC OP,Y 
SBC (OP,X) 
SEC (OP),Y 


E9 

E5 

F5 

ED 

FD 

F9 

El 

Fl 


IM 
ZP 
ZPX 
ABS 
ABX 
ABY 
(ZP,X> 
(ZP),Y 


■ SEC : set carry 

setze das übertragsflaq auf Eins 

Elaggi N Z C I D V 


AddregsiscMOaSSCteOi 

Assembler: Hex-Code: 

SEC 38 


Abkürzung: Byte: 


Takte 


■ SED : set decimal mode 

setze das Dezimal-Modus-Flag auf Eins 

Elsaai n z c i d v 


flddressierungsarten: 

Assembler: Hex-Code: Abkürzung: Byte: 
SED F8 - 1 


Takte: 


■ SEI : set interrupt 

setze das Interruptflag auf Eins (es werden keine 
Interrupts mehr erlaubt) 

Eisasi N Z C I D V 


Addressierungsarteni 
Assembler: Hex-Code: 


Abkürzung: 


Byte 


■ STA : störe akku 

schreibe Akkuinhalt in Speicher 

Eiägsi N Z C I D V 
keine 


AddressierungsarteQl 
Assembler: Hex-Code: 


STA OP 
STA OP,X 
STA Qp 
STA OP,X 
STA OP,Y 
STA <OP,X> 
STA (OP),Y 


B5 

95 

8D 

9D 

99 

81 

91 


Abkürzung: 

ZP 
ZPX 
ABS 
ABX 
ABY 
(ZP,X> 
(ZP),Y 


Byte: 


Takte: 


■ STX : störe X-register 

schreibe X-Regiaterinhal t in Speicher 

E1*9S1 N Z C I D V 

keine 


AddressieryogBaCiSDi 

Assembler: Hex-Code: 


STX OP 
STX OP,Y 
STX OP 


86 

96 

BE 


Abkürzung: Byte: Takte: 

ZP 2 3 

ZPY 2 4 

ABS 3 4 


■ STY : störe Y-register 

schreibe Y-Register i nhalt in Speicher 

Elsas! N Z C I D V 
keine 


Addresgigcuogsarten: 

Assembler: Hex-Code: 


STY OP 
STY OP,X 
STY OP 


84 

94 

SC 


Abkürzung: Byte: 

ZP 2 
ZPX 2 
ABS 3 
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■ TAX : transfer akku to 

schreibe Akkuinhalt ins 

X-register 
X-Reqister 



EU9B1 n z c I D V 

+ «f 




eödresBifrungsjirteni 
Assembler: Heu-Code: 

Abkürzung: 

Byte: 

Takte: 

TAX AA 

- 

1 

2 

■ TAY : transfer akku to 

schreibe Akkuinhalt ins 

Y-reqister 
Y-Reqister 



Elagai N Z C I D V 
+ + 




edörgsgj.BcyogsfCtSD:. 
Assembler: Hex-Code: 

Abkürzung: 

Byte: 

Takte: 

TAY A8 

- 

i 

2 


■ TSX : transfer stackreqister to X-register 
schreibe Stackreqister 1 nhalt ins X-Register 


Flag«?. N Z C 1 D V 


Adecgsslgrungserten: 

Assembler: He>:-Code: Abkürzung: Byte: Takte: 
TBX BA 1 2 


■ TXA : transfer X-reqister to akku 
Eiagsi N Z C I D V 


Bddressierungsgrteni 

Assembler: Her-Code: Abkürzunq: Byte: Takte: 
TXA 8A - 1 2 


■ TXS : transfer X-reqister ta Stackregister 
schreibe X-Reqisterinhalt ins Stackregister 


Flags: N Z C I D V 




kei ne 




Addressierungsarten: 
Assembler: Hex-Code: 

Abkürzung: 

Byte: 

Takte: 

TXS 9A 

- 

i 

2 


■ TYA : tranaler Y-register to akku 
schreibe Y-Registerinhalt in Akku 

Flags: N Z C I D V 


Addr B asisCyDasäCteDJ. 

mr i Hb« CqObi PibKUraurtgi Byt«. T*kt»i 

TYA 98 1 2 


Tabelle 2. Die Befehle des 6510-Prozessors (Schluß) 


■ ABS : absolute (absolut! 

Der Operand ist eine vierstellige, henadezimale 

Adresse. 

BaiSBlsli 

LDA t C000 

Der Inhalt der Adresse *C000 wird in den Akku geladen. 


■ ABX i absolut X-indiziert 

Der Operand ist eine vierstellige hexadezimale Zahl. 
Der Inhalt des X-Registers wird zum Operanden addiert 
und ergibt die Arbeits-Adresse. 

Beisgieli 
LDX #*10 
LDA *C000,X 

Der Inhalt der Spei eherstel 1 e *C010 <*C000 + *0010) 

wird in den Akku geladen. 


■ ABY s absolut Y-indiziert 

Der Operand ist eine vierstellige hexadezimale Zahl. 
Der Inhalt des Y-Registers wird zum Operanden addiert 
und ergibt die Arbeits-Adresse. 

gei=eieii 
LOY #*10 
LDA *C000,Y 

Der Inhalt der Speicherstel1e *C010 (*C000 + »0010! 

wird in den Akku geladen. 


>>Byte<< s In den Tabellen 2 und 3 gibt diese Spalte 
die jeweilige Länge des kompletten Befehls mit 
Operand an. 


>>F1ags<< : einzelne Bits des Statusregisters 

N : negative flag. Zeigt an, daß bei einer Operation 
einer der beiden Operanden zwischen *80 (128) und *FF 
(255) liegt, also das letzte Bit gesetzt ist. 

Z i zero flag. Zeigt an, daß das Ergebnis einer 
Operation im Akku gleich Null ist. 

C : carry flag. Zeigt an, daß bei einer Operation ein 
übertrag entstanden ist. 

I s Interrupt -flag. Durch Setzen dieses Bit lassen sich 
Interrupts unterbinden. 

D s decimal flag. Durch Setzen dieses Bit wir der 

Prozessor in den Dezimalmodus geschaltet. Das bedeutet, 
daß zum Beispiel das Ergebnis der Addition von *09 und 
*01 nicht * 0 A, sondern *10 ergibt. 

V s overflow -flag (Überlauf). Zeigt an, daß das 

Ergebnis einer Operation größer *FF (=255) war. 


■ IM : immediate (unmittelbar) 

Die Adressierungsart >>immediate« bedeutet, daß der 
Operand unmittelbar als Wert weiterverarbeitet wird. 



Die hexadezimale Zahl *00 wird direkt in den Akku 
geladen. 


■ OP : Operand 

Je nach Adressierungsart besteht der Operand eines 
Befehls aus einem (Adressierung >>immediate<< und 
>>zeropage«) oder zwei Byte (>>absolute<<) . 


■ ZP : zeropage 

Der Operand besteht aus einem Byte und gibt eine 
Adresse in der Zeropage (Speicherbereich *0000 bis 
*00FF> an. 

Beispiel* 

LDA *2B 

Der Inhalt der Spei eherstel1e *002B wird in den Akku 
geladen. 


■ ZPX : Zeropage X-indiziert 

Der Inhalt de« X-Reglater* wird zum zwei«teiligen, 
heicadezi malen Operanden addiert. Das Ergebnis ist eine 
Adresse in der Zeropage (Speicherbereich *0000 bis 
*00FF!. 

EeS.SEteki 

LDX «*05 
LDA *43,X 

Der Inhalt dar Adresse *0048 (*0043 ♦ *0005) wird in 
don Akku geladen. 


■ ZPY : Zeropage Y-indiziert 

Der Inhalt des Y-Registers wird zum zweistelligen, 
hexadezimalen Operanden addiert. Das Ergebnis ist eine 
Adresse in der Zeropage (Speicherbereich *0000 bis 
*00FF). 

BeLaDi-ELt 

LDY #*05 
LDA *43,Y 

Der Inhalt der Adresse *0048 (*0043 + *0005) wird in 
den Akku geladen. 


Tabelle 3. Diese Abkürzungen werden in den Tabellen 1 
und 2 verwendet 
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■ (ZP,X) : indiziert indirekt 

Der Inhalt des X-Registers wird zum zweistelligen, 
hexadezimalen Operanden addiert und ergibt eine Adresse 
in der Zeropage (Speicherbereich *0000 bis *00FF), 
Deren Inhalt und der Inhalt der darau-ffolgenden Adresse 
ergibt in der Form Lo-Byte/Hi-Byte die Arbeitsadresse. 

Beispiel; 

Adresse *20 hat den Inhalt *00 
Adresse *21 hat den Inhalt *C0 
LDX **0E 
LDA (»12,X) 

Der Inhalt der Zeropaqe-Adressen *0020 <*000E + *0012) 
und *0021 ergibt die Arbeits-Adresse *C000. Deren 
Inhalt wird in den Akku geladen. 


■ <ZP),Y i indirekt indiziert 

Der zweistellige, hekdezimale Operand ergibt eine 
Adresse in der Zeropage (Speicherbereich *0000 bis 
*00FF). Deren Inhalt und der Inhalt der darauf toigenden 
Speicherstelle erqlbt in der Form Lo-Byte/Hi-Byte eine 
Adresse, zu der der Inhalt des Y-Registers addiert 
wird. Das Ergebnis ist die Arbeitsadrease. 

BeLfBLfiU 

Adresse *20 hat den Inhalt *00 
Adresse *21 hat den Inhalt *C0 
LDY **10 
LDA (*20),Y 

Der Inhalt der Adresse *0010 <*C000 + *0010) wird in 
den Akku geladen. 


Tabelle 3. Diese Abkürzungen werden in den Tabellen 1 
und 2 verwendet (Schluß) 



ROM-Routinen 
in eigenen 
Programmen 

Das Rad ist schon erfunden! Ähnlich ver¬ 
hält es sich mit verschiedenen Routinen, 
die ein Assembler-Programmierer immer 
wieder benötigt. Aber warum soll man sich 
die Arbeit des Programmierens machen, 
wenn das Betriebssystem viele ständig 
benötigte Routinen schon enthält und man 
nur noch zu wissen braucht, ab welcher 
Adresse sie stehen? 

A ngenommen, Sie möchten in Assembler einige kom¬ 
plexe Dinge programmieren wie beispielsweise eine 
neue mathematische Funktion (wie wäre es mit dem 
Kotangens) und diese auf dem Bildschirm ausgeben. Das ist 
eine große Aufgabe, zu der zunächst einmal die Übernahme 
des Arguments in das Maschinenprogramm, dann einige 
Fließkomma-Rechenoperationen und schließlich die Aus¬ 
gabe auf dem Bildschirm geschrieben werden müßten, wenn 
da ht schon fast alles an verborgener Stelle als fertige 
Programm-Module im Computer vorhanden wäre! 

Sowohl im unteren (von $A000 bis $BFFF) als auch im obe¬ 
ren ROM-Bereich (von $E000 bis $FFFF) liegt die Firmware 
fest verschachtelt vor. Der untere ROM-Abschnitt wird 
manchmal auch Basic-Interpreter, der obere ROM-Bereich 
Betriebssystem genannt, wobei diese Einteilung aber den 
Kern der Sache nicht genau trifft, denn Interpreter, Editor und 
Betriebssystem führen ein gemischtes Dasein quer durch alle 
genannten ROM-Bereiche hindurch. 

Mindestens fünf Informationen braucht ein Assembler- 
Programmierer, wenn er das breite Programmangebot des 
ROMs nutzen möchte: 

1. Einsprungadresse 

2. Format der ElngaDeparameter 

3. Adressen der Eingabeparameter 

4. Adressen der Ausgabeparameter 

5. Format der Ausgabeparameter 
Nicht alle Routinen, die man benutzen kann, erfordern alle 
fünf Informationen, manche weniger, einige auch mehr und 
schließlich gibt es noch Programmroutinen, die noch den Auf¬ 
ruf einer oder sogar mehrerer anderer Routinen nötig 
machen. 

In der beigefügten Tabelle sind - nach Anwendungen sor¬ 
tiert - die wichtigsten Firmware-Möglichkeiten mit den erfor¬ 
derlichen Ein- und Ausgabeparametern aufgeführt. Das sind 
natürlich beileibe nicht alle. Die Auswahl erfolgte subjektiv! Es 
sind einfach diejenigen, die mir bislang am häufigsten unter¬ 
gekommen sind. Außerdem wurde auf die Kernel-Routinen 
verzichtet: Man findet diese sehr gut dokumentiert bereits in 


einer Reihe von Büchern und im Assembler-Kurs. 

Die Tabelle nennt den Label-Namen, die Einsprungadresse 
und gibt eine Kurzbeschreibung der Funktion. Das Ein- und 
auch das Ausgabeformat ist ebenso angegeben wie auch die 
Adressen, an denen diese Parameter übergeben werden. Die 
verwendeten Bezeichnungen halten sich eng an die im 
Assembler-Kurs kennengelernten. Sie sind allgemein üblich: 
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Tabellen 


FAC Fließkomma-Akku 1 

ARG Fließkomma-Akku 2 

A Akkumulator 

X,Y X-, Y-Register 

A/Y 2-Byte-Angabe im Format LSB/MSB 

im Akku/Y-Register 

FLPT Fließkommazahl im Normalformat 

MFLPT gepacktes Fließkommaformat 

Damit das alles nicht so trocken abläuft, soll noch ein klei¬ 
nes Beispiel vorgestellt werden! Die oben schon erwähnte 
Kotangens-Funktion wird in einem Maschinenprogramm 
erzeugt, das durch USR anzuspringen ist. In Bild 1 finden Sie 
ein Flußdiagramm zu dem Programm, welches hier als Hypra- 
Ass-Listing abgebildet ist (Listing 1). Ein kurzes Testpro¬ 
gramm liefert Listing 2. 

Der Einsprung mittels USR bietet den Vorteil, daß der Über¬ 
gabewert gleich im FLPT-Format im FAC »landet«. Es ist aber 
sinnvoll, den Übergabeparameter mittels der MOVMF- 
Routine zu »retten«, weil durch die Kosinus-Funktion der FAC 
verändert wird. Wenn auch das Ergebnis der Kosinus- 
Funktion mittels MOVMF beiseite gelegt wurde, holen wir 
durch MOVFM den Anfangswert wieder in den FAC und bil¬ 
den mittels SIN den Sinus davon. Schließlich teilen wir den im 
Speicher stehenden Kosinuswert durch den im FAC befindli¬ 
chen Sinuswert (unter Verwendung von FDIV). Das Ergebnis 
ist der Kotangens: 

COT X = (COS X/SIN X) 

Dieser Wert befindet sich nun im FAC und wird mit dem RTS 
an das Basic-Programm zurückgeliefert. Im Testprogramm 
weisen wir ihm dann die Variable E zu. 

Dieses kurze Beispiel soll Ihnen den Mund wässrig 
machen. Sehr viel detaillierter werden die ROM-Routinen im 
Kurs »Von Basic zu Assembler« im 64'er behandelt werden. 

(Heino Ponnath/hm) 

Literatur: 

1. Kassera/Kassera, Programmieren In Maschinensprache, München 1985: Markt&Technlk Verlag. 

MT 830 

2. West. C64 Computerhandbuch, München 1984, Te-wi 

3. Babel/Krause/Dripke, Das Interface Age Systemhandbuch zum C 64. München 1983: Interface 

Age Verlag 

4. Ponnath, C 64 Wunderland der Grafik, München 1985: Markt&Technlk Verlag MT 766. 



Bild 1. Flußdiagramm einer Kotangens-Funktion 



hypra-ass 

assembler1isting: 



10 

. li 

1,4,7 

• 

20 

. ba 

*6000 

;einsprang 
; zuvor usr — 

S 

mittels usr 
vektor einstellen! 


160 - 

.eq 

cos=*e264 


165 - 

-eq 

movfm=*bba2 


170 - 

.eq 

movmf=*bbd4 


1S0 - 

- eq 

sin=*e26b 


190 - 

.eq 

fdiv=*bb0f 


200 - 

.eq 

wert=*7000 


205 - 

.eq 

wertl=*7010 

6000 a 210 

:212 -start 

ldx 

#< <wer,tl> 

6002 a070 

: 214 - 

1 dy 

#>(wert 1) 

6004 20d4bb 

: 216 - 

jsr 

movmf 

6007 2064e2 

: 220 - 

jsr 

COS 

600a a200 

: 230 - 

ldx 

#<(wert) 

600c a070 

: 240 - 

1 dy 

#> (wert) 

600e 20d4bb 

: 250 - 

jsr 

movmf 

6011 a910 

: 252 - 

1 da 

#<(wert 1) 

6013 3070 

: 254 - 

ldy 

#><wertl> 

6015 20a2bb 

: 256 - 

jsr 

movf m 

6018 206be2 

: 260 - 

jsr 

si n 

601b a900 

: 270 - 

1 da 

#<(wert) 

601d 3070 

: 280 - 

ldy 

#>(wert) 

60 lf 200fbb 

: 290 - 

jsr 

f di v 

6022 60 

: 300 - 

rts 



320 - 

■ sy 

1,4,7 

Symbols in 

alphabetical 

order: 


cos 

f di v 
movf m 
movmf 
sin 

= *e264 
= *bb0{ 

■= *bt}£2 
= *bbd4 
= *e26b 


Listing 1. 

start 

= *6000 

Hypra-Ass-Listing der 

wert 

= *7000 

Kotangens-Funktion 

wert1 = *7010 

end of assembly 0:25.9 
base = *6000 last byte 

at *6022 



10 REM***TEST FUER COTANGENS**» 

20 PQKE785,0:P0KE786,96:REM USR-VEKTOR 
30 INPUT"WINKEL";W:W=W*it/ 1B0:REM AUF BOGENMASS 
40 E=USR(W):REM AUFRUF DES PROGRAMMES 
50 PRINTW.EsREM ERGEBNIS IN E 
60 END 

ready. Listing 2. Test der Kotangens-Funktion 


1. Routinen, die die Kooperation von Basic und 


Assembler erleichtern: 



Label 

Adresse Funktion 

Eingabe Ausgabe 




Format Adresse Format 

Adresse 

CHRGET 

0073 

Holt nächstes Byte 

1 Byte Basic-Text 1 Byte 

A 

CHRGOT 

0073 

Holt aktuelles Byte 

1 Byte Basic-Text 1 Byte 

A 

READY 

A474 

Erzeugt READY-Status 

- 

- 

LINGET 

A96B 

Holt Integerwert 

ASCII-Zahl Basic-Text 2-Byte 

14/15 



(0-63999) 

Integer 


FRMNUM AD8A 

Holt beliebigen nume- 

Basic- Basic-Text FLPT 

FAC 



rischen Ausdruck 

Ausdruck 


FRMEVL 

AD9E 

Holt beliebigen 

Basic- Basic-Text a) bei Fließkomma: 



Ausdruck 

Ausdruck FLPT 

FAC 




b) bei Integer: 




FLPT 

FAC 




c) bei String: 

Zeiger auf FAC+3i 




Descriptor 

FAC+4 



Diese Routine setzt außerdem eine Reihe von Flaggen: 




VALTYP(SOD) 0=Zahl FF=String 
INTFLAG ($0E) 0=Flle8komma 80= 

nteger 
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War Ausdruck einfache Variable, dann zeigt VARNAM ($45/6) 





das 1. Byte des Variablen-Namens 

CHKCLS 

AEF7 

Prüftauf»)« 

ASCII 

Basic-Text 

CHKOPN 

AEFA 

Prüft auf»(« 

ASCII 

Basic-Text 

CHKCOM 

AEFD 

Prüft auf»,« 

ASCII 

Basic-Text 

SYNCHR 

AEFF 

Prüft auf Zeichen 

ASCII 

Basic-Text 



im Akkumulator 


A 


Diese 4 Routinen überlesen das Zeichen, wenn vorhanden, 

Wenn nicht vorhanden, folgt SYNTAX ERROR 
ISVAR AF28 Sucht Variablenwert Name + $45/46 a) Zahl: 

Kennung FLPT FAC 

b) String: 

Descrlptor-FAC+3 

ORDVAR B0E7 Sucht Variablennamen Name+ $45/46 

Kennung Adresse $47/48 

GTBYTC B79B Holt Zahl (0-255) ASCII Basic-Text 1 Byte X 

GETNUM B7EB Liest 2 Integerzahlen ASCII Basic-Text 2Byte-lnt. $14/15 

(Trennungdurch Komma) IByte-lnt. X 

1, Zahl: Obis 65535 

2, Zahl: Obis 255 

COMBYT E200 Prüft auf»,«und holt ASCII Basic-Text 1 Byte X 

_ folgende Zahl 

2. Routinen, die Verschiebungen im Speicher 
durchführen: 


BLTUC 

A3BF 

Verschiebt Blöcke 

Adressen: 

Quelle 

Start 

$5F/60 






Ende+1 

Ziel 

$5A/5B 






Ende+1 

$58/59 

- 

- 

PUTINT 

A9C4 

Schiebt FAC als Integer FLPT 

FAC 

2 Byte- 

angegebene 



in Variable 

Adresse 

$49/50 

Integer Variable 

PTFLPT 

A9D6 

Schiebt FAC 

FLPT 

FAC 

MFLPT 

angegebene 



in Variable 

Adresse 

$49/50 


Variable 

GETSPT 

AA2C 

Schiebt String- 

Zeiger 

FAC+3 





descriptor in Variable 

Adresse 

$49/50 

Descriptor angegebene 







Variable 

STRVAL 

B7B5 

Zahlenstring in 

ASCII 

ab $22 

FLPT 

FAC 



FAC einiesen 

Lange 

A 



CONUPK 

BA8C 

LädtARGausSpeicher 

MFLPT 

A/Y 

FLPT 

ARG 

MOVFM 

BBA2 

Lädt FAC aus Speicher 

MFLPT 

A/Y 

FLPT 

ARG 

MOVMF 

BBD4 

Schiebt FAC 

FLPT 






in Speicher 

Adresse 

FAC X/Y 

MFLPT 

ange¬ 

gebener 

Speicher 

MOVFA 

BBFC 

ARG In FAC kopieren 

FLPT 

ARG 

FLPT 

FAC 

MOVAF 

BCOC 

FAC in ARG kopieren 

FLPT 

FAC 

FLPT 

ARG 

ACTOFC 

BC3C 

Akku in FAC schieben 

IByte 

A 

FLPT 

FAC 

3. Routinen 

zur Arithmetik: 





ASCADD 

AA27 

Addiert ASCII-Ziffer 

ASCII 

A 

FLPT 

FAC 



zu FAC 

Ziffer 




OROP 

AFE6 

FAC=(FAC)OR(ARG) 

FLPT 

FAC,ARG 

FLPT 

FAC 

ANDOP 

AFE9 

FAC=(FAC)AND(ARG) 

FLPT 

FAC,ARG 

FLPT 

FAC 




0 

Y 



FACINX 

B1AA 

FAC wird als Integer 

FLPT 

FAC 

2Byte- 

A/Y 



In A/Y abgelegt 



Integer 


UMULT 

B357 

16-Blt-Multiplikation 

2-Byte-lnteger 






Zahll 

$28/29 

2Byte- 

X/Y 




Zahl2 

$71/72 

Integer 


CIVAYF 

B391 

Integer (-32768 bis 

2Byte- 

A/Y 

FLPT 

FAC 



32767) in FAC 

Integer 




SGNFT 

B3A2 

Integer (0 bis 255) 
in FAC 

IByte 

y 

FLPT 

FAC 

GETADR 

B7F7 

Wandelt FAC zu 

FLPT 

FAC 

2Byte- 

Y/A 



Integer (0-65535) 



Integer 

+ $14/15 

FADDH 

B849 

FAC = FAC + 0,5 

FLPT 

FAC 

FLPT 

FAC 

FSUB 

B850 

FAC=Speicherzahl 

MFLPT 

Zeiger A/Y FLPT 

FAC 



-FAC 

FLPT 

FAC 



FSUBT 

B853 

FAC = ARG - FAC 

FLPT 

ARG,FAC 

FLPT 

FAC 

FADD 

B867 

FAC=Speicherzahl 

MFLPT 

Zeiger A/Y FLPT 

FAC 



+FAC 

MFLPT 

FAC 



FADDT 

B86A 

FAC = ARG + FAC 

FLPT 

ARG,FAC 

FLPT 

FAC 

COMPLT 

B947 

Erzeugt Zweier¬ 
komplement von FAC 

FLPT 

FAC 

FLPT 

FAC 


LOG 

B9EA 

FAC = In(FAC) 

FLPT 

FAC 

FLPT 

FAC 

FMULT 

BA28 

FAC=Speicherwert * FAC MFLPT 

Zeiger A/Y FLPT 

FAC 




FLPT 

FAC 



FMULTT 

BA30 

FAC = ARG • FAC 

FLPT 

ARG.FAC 

FLPT 

FAC 

MUL10 

BAE2 

FAC = 10 • FAC 

FLPT 

FAC 

FLPT 

FAC 

DIVIO 

BAFE 

FAC = FAC/10 

FLPT 

FAC 

FLPT 

FAC 

FDIVF 

BB07 

FAC=ARG/Speicher- 

MFLPT 

Zeiger A/Y FLPT 

FAC 



zahl 

FLPT 

ARG 



FDIV 

BBOF 

FAC=Speicherzahl/FAC MFLPT 

Zeiger A/Y FLPT 

FAC 




FLPT 

FAC 



FDIVT 

BB14 

FAC = ARG/FAC 

FLPT 

FAC,ARG 

FLPT 

FAC 

SIGN 

BC28 

Ermittelt Vorzeichen 

FLPT 

FAC 

IByte 

A 



von FAC 



1 - + 
0-0 
FF - - 


ABS 

BC58 

FAC = ABS(FAC) 

FLPT 

FAC 

FLPT 

FAC 

FCOMP 

BC5B 

Vergleicht FAC mit 

MFLPT 

Zeiger A/Y IByte: 

A 



Speicherzahl 

FLPT 

FAC 

1: FAC > Speicher 






0: FAC 

= Speicher 






FF: FAC < Speicher 

INT 

BCCC 

FAC = INT(FAC) 

FLPT 

FAC 

FLPT 

FAC 

AADD 

BD7E 

Addiert A zu FAC 

FLPT 

FAC 

FLPT 

FAC 




IByte 

A 



SQR 

BF71 

FAC = SQR(FAC) 

FLPT 

FAC 

FLPT 

FAC 

MPOT 

BF78 

FAC=Speicherwert 

FLPT 

FAC 

FLPT 

FAC 



1 FAC 








MFLPT 

Zeiger A/Y 


FPWRT 

BF7B 

FAC = ARG 1 FAC 

FLPT 

ARG.FAC 

FLPT 

FAC 

NEGOP 

BFB4 

FAC = -FAC 

FLPT 

FAC 

FLPT 

FAC 

EXP 

BFED 

FAC = elFAC 

FLPT 

FAC 

FLPT 

FAC 

POLYX 

E059 

Polynomberechnung 

Adresse 

Zeiger A/Y FLPT 

FAC 



FAC=aO+a1x+a2x 2 -+ 







Zeiger weist auf Start der Konstantentabelle. 




1. Byte = Polynomgrad 






Weitere Bytes sind die Koeffizienten des Polynoms 
in der Reihenfolge an.,aO im MFLPT-Förmat. 

CO c - 

E264 

FAC = COS(FAC) 

FLPT 

FAC 

FLPT 

FAC 

SIN 

E26B 

FAC = SIN(FAC) 

FLPT 

FAC 

FLPT 

FAC 

TAN 

E2B4 

FAC = TAN(FAC) 

FLPT 

FAC 

FLPT 

FAC 

ATN 

E30E 

FAC = ATN(FAC) 

FLPT 

FAC 

FLPT 

FAC 


4. Auswahl von Ein-/Ausgabe-Routinen: 


ERROR 

A437 

Fehlermeldung aus¬ 

Fehler¬ 

X 

ASCII 

Bildschirm 



geben und READY 

nummer 




LIST 

A69C 

Listet Basic-Programm 

- 

- 

- 

_ 

NUMDON AABC 

Druckt FAC auf 

FLPT 

FAC 

ASCII 

Bildschirm 



Bildschirm aus 





STROUT 

A81E 

Gibt String auf Bild¬ 

Adresse 

Zeiger A/Y ASCII 

Bildschirm 



schirm aus. Ende=0 





SYNERR 

AF08 

Ausgabe SYNTAX ERROR 

- 

ASCII 

Bildschirm 

OVERR 

B97E 

Ausgabe OVERFLOW ERR. 

- 

- 

ASCII 

Bildschirm 

LINPRT 

BDCD 

Druckt Inteperzahl 

2 Byte- 

X/A 

ASCII 

Bildschirm 



(0 bis 65535) aus. 

Integer 




FACOUT 

BDD7 

Druckt FAC auf 

FLPT 

FAC 

ASCII 

Bildschirm 



Bildschirm aus 





FOUT 

BDDD 

FAC wird zu ASCII- 

FLPT 

FAC 

ASCII 

ab $100 



String (Ende=0), 



(Ende= 

’0) 



Kann direkt mit STROUT 


Startadr. 



ausgegeben werden. 



A/Y 


SAVET 

E156 

Save 

Parameter aus Basic-Text 


VERFYT 

E165 

Verlfy 

Parameter aus Basic-Text 


LOADT 

E168 

Load 

Parameter aus Basic-Text 


SLPARA 

E1D4 

Holt Parameter für Save, Verlfy, Load aus dem 

Basic-Text 

PLOTK 

E50A 

Setzt Cursorposition 

Zeile 

X 






Spalte 

Y 



HOME 

E566 

Cursor in Home-Posltion 




PLOTR 

E56C 

Setzt Cursor-Position 

Zeile 

SD6 






Spalte 

$D3 



GETKBC 

E5B4 

Holt Zeichen aus 

- 

- 

IByte 

A 



Tastaturpuffer 





PRT 

E716 

Gibt Zeichen in A 

IByte 

A 

ASCII 

Bildschirm 



auf Bildschirm aus 





CLRLN 

E9FF 

Löscht xte Bild¬ 

Zellen¬ 

X 

. 

_ 



schirmzeile 

nummer 





Tabelle der ROM-Routinen 
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C 64 


Tabellen 


Die Codes 
des C 64 

Die kompletten ASCII-, CHR$- und Bild¬ 
schirmcodes und dazu noch die vollständi¬ 
gen Tastencodes des C 64 finden Sie in der 
folgenden Tabelle anwenderfreundlich, 
also so, daß man sie auch benutzen kann, 
gegenübergestellt. 

P rogrammieren in Maschinensprache beinhaltet oft Ein- 
und Ausgaben, zum Beispiel für eine Benutzerführung, 
oder um Eingaben vom Bildschirm einzulesen. Häufig 
steht man vor dem Problem, daß man nur einzelne Zeichen 
eines Textes in einem Maschinenprogramm verändern will. In 
allen Fällen benötigt man dann die CHR$- oder Bildschirmco¬ 
des, von denen hier die Rede ist. Das gleiche gilt natürlich 
auch für die Tastatur. Das Betriebssystem stellt uns die 
momentan gedrückte Taste in zwei Speicherstellen zur Verfü¬ 
gung. 

Warum verschiedene Codes? 


Vergleicht man in der Tabelle 1 die Spalten, so wird man fest¬ 
stellen, daß es einige nicht druckende Zeichen gibt, Codes, 
die auf dem Bildschirm nichts schreiben. Es sind dies die 
ASCII- beziehungsweise die CHR$-Codes von 0 bis 31 und 
von 128 bis 159. Auch findet man auf dem Bildschirm Zei¬ 
chen, die in der ASCII-Tabelle nicht auftauchen - die reversen 
Zeichen mit den Codes von 128bis255. Um alle druckenden 
ASCII-Zeichen auch auf dem Bildschirm sichtbarzu machen, 
und dabei keine sinnlos leeren Felder mitzuführen, mußte 
man die Tabelle im Computer umstellen. 

Ganz anders verhält es sich mit der Tastatur. Hier sieht die 
Codierung zunächst sehr zufällig aus. Natürlich ist dies mit 
der Anordnung der Tasten und der Methode, wie das 
Betriebssystem die Tasten abfragt, zu erklären. Uns soll es 
hier genügen, zu wissen, wie man von einem (Maschinen-) 
Programm aus einen Tastendruck registrieren kann. Man fin¬ 
det die zuletzt gedrückte Taste in den Speicherstellen 197 
($C5) und 203 ($CB), die mit PEEK beziehungsweise auf der 
Maschinensprache-Ebene mit LDA ausgelesen werden 
kann. 

Die nachfolgende Tabelle 1 bietet auf einen Blick alle 
Codes, die im C64 enthalten sind. Die Tabelle ist nach den 
CHR$-Zeichen sortiert, also eine aufsteigende Reihe von 0 
bis 255. Um das Programmieren in Maschinensprache zu 
erleichtern, sind neben den dezimalen Zahlen auch die hexa¬ 
dezimalen Werte aufgeführt. 

Die Spalten drei und vier enthalten die CHR$-Zeichen des 
C64. Spalte drei zeigt dabei die Zeichen im Groß-/Grafikmo- 
dus, Spalte vier die entsprechenden Zeichen in Klein-/Groß- 
schriftmodus. 

Die Zeichen von 0 bis 31 und von 128 bis 159 sind diejeni¬ 
gen CHR$-Codes, deren Aufruf auf dem Bildschirm kein sicht¬ 
bares Zeichen hervorbringt, so zum Beispiel das Umstellen der 
Cursorfarbe, oder die Codes der Funktionstasten, die man 
nicht schreiben kann (?CHR$(133) ergibt nicht »Fl«), aber für 
eine Abfrage (IF A$ = CHR$(133) THEN...) nutzen kann. 
Hier wird nicht zwischen den Modi unterschieden, da das 
Ergebnis in beiden Fällen das gleiche ist. Damit der Text in die 


Tabelle paßt, ließen wir ihn sogar bis in die sechste Spalte 
übergreifen. Über den Bildschirmcode kann man nicht über 
diese Funktionen verfügen! 

Die Bildschirmcodes der fünften und sechsten Spalte sind 
die Werte, die man erhält, wenn man das CHR$-Zeichen mit 
PRINT ausgibt und die entsprechende Bildschirmspeicher¬ 
stelle mit PEEK ausliest. Für Maschinensprache ist auch hier 
wieder der hexadezimale Wert angegeben. Die reversen Zei¬ 
chen erhält man durch Addition von 128, in Maschinenspra¬ 
che durch den Befehl »ORA # $80«. 

Obwohl der C64 keinen echten ASCII-Zeichensatz hat, ist 
dieser in Spalte sieben aufgeführt. Man benötigt den ASCII- 
Code vor allem für die Datenfernübertragung (DFÜ) und zur 
Ansteuerung von nicht MPS-kompatiblen Druckern, die nicht 
mit einem »intelligenten« Interface betrieben werden. Die 
Erklärungen der verwendeten Kurzzeichen stehen in der 
Tabelle 2. 

In den letzten beiden Spalten sind die Tastaturcodes enthal¬ 
ten, wie man sie beim Auslesen der Speicherstellen 197 und 
203 erhält. Bitte beachten Sie, daß der Code 63 ($3F) der 
RUN/STOP-Taste entspricht, also dem CHR$-Code 3. Da 
aber PRINT CHR$(3) ein Programm nicht anhält und sich 
nicht abfragen läßt, ist es in der Tabelle nicht aufgeführt. 

(og) 


NUL 

= 

Null 

SOH 

= 

Start of Heading 

STX 

= 

Start of Text (Textbeginn) 

ETX 

= 

End of Text (Textende) 

EOT 

= 

End of Transmission (Übertragungsende) 

ENQ — ’-nquiry (Testanfrage) 

ACK 

= 

Acknowledge (Quittierung) 

BEL 

= 

Bell (Klingelzeichen) 

BS 

= 

Backspace (Zeichen zurück) 

HT 

= 

Horizontal Tabulation 

LF 

= 

Line Feed (Zeilenvorschub) 

VT 

= 

Vertical Tabulation 

FF 

= 

Form Feed (Förmatanpassung) 

CR 

= 

Carriage Return (Wagenrücklauf) 

SO 


Shift out (Shift aus) 

Sl 

- 

Shift in (Shift ein) 

OLE 

= 

Data Link Escape (Datenverbindung abhalten) 

DC 

= 

Device Control (Gerätesteuerung) 

NAK 

= 

Negative Acknowledge (Gegenquittierung) 

SYN 

= 

Synchronous Idle (synchronlos) 

ETB 

= 

End of Transmission Block (Block Übertragungsende) 

CAN 

= 

Cancel (Stornieren, zum Beispiel Puffer leeren) 

EM 

= 

End of Medium (z. B. Papierende) 

SUB 

= 

Substitute (Austausch) 

ESC 

= 

Escape (übergehen, Druckercode) 

FS 

= 

File Separator (Filetrennung) 

GS 

= 

Group Separator (Trennung von Gruppen) 

RS 

= 

Record Separator (Aufzeichnung trennen) 

US 

= 

Unit Separator (Einheitentrenner) 

SP 

= 

Space (Leerzeichen) 

DEL 

= 

Delete (Löschen) 


Tabelle 2. Erklärung der in Tabelle 1 abgekürzten ASCII- 
Zeichen 
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Tabellen 


C 64 



Wert 

CHR$-Zeichen 

Bildschirmcode 


Tastencode 



Groß/ 

Klein/ 



ASCII- 



dez 

hex 

Grafik 

Groß 

dez 

hex 

Code 

dez 

hex 

i00 

64 

- 

D 

68 

44 

d 



101 

65 


E 

69 

45 

o 



102 

66 

- 

F 

70 

46 

f 



103 

67 

1 

G 

71 

47 

g 



104 

68 

1 

H 

72 

48 

h 



105 

69 

*. 

I 

73 

49 

i 



106 

6A 


J 

74 

4A 

j 



107 

6B 

S 

K 

75 

4B 

k 



108 

6C 

L 

L 

76 

4C 

1 



109 

6D 

'S 

M 

77 

4D 

m 



110 

6E 


N 

78 

4E 

n 



1 1 1 

6F 

r 

U 

79 

4F 

o 



112 

70 

“l 

P 

80 

50 

P 



113 

71 

• 

□ 

81 

51 

q 



114 

72 

- 

R 

82 

52 

r 



115 

73 

¥ 

s 

83 

53 

s 



116 

74 

1 

T 

84 

54 

t 



117 

75 

t 

U 

85 

55 

u 



1 1B 

76 

X 

V 

86 

56 

V 



119 

77 

0 

w 

87 

57 

w 



120 

78 

+ 

X 

88 

58 

X 



121 

79 

1 

Y 

89 

59 

y 



122 

7A 

♦ 

Z 

90 

5A 

z 



123 

7B 

4 

4 

91 

5B 

C 



124 

7C 

■ 

X 

92 

5C 

. \ 



125 

7D 

1 

i 

93 

5D 

3 



126 

7E 

0 

K 

94 

5E 

t 



127 

7F 


iS 

95 

5F 

DEL 



1 28 

80 








129 

81 

□rar 

ge 






130 

82 








131 

83 








132 

84 








133 

85 

♦ 1 





4 

04 

134 

06 

f 3 





5 

05 

135 

87 

15 





6 

06 

136 

88 

f 7 





3 

03 

137 

89 

f 2 







13B 

8A 

fA 







139 

8B 

f 6 







140 

8C 

f8 







141 

BD 

SHIFT RETURN 





142 

8E 

Umschaltungauf Groß/Grafik 




143 

8F 








144 

90 

schwarz 






1 *t: 

91 

Cursor up 






14f> 

92 

Revers aus 






147 

93 

CLR 

(Bildschirm löschen) 




148 

94 

INSERT (Zeichen einfügen) 




149 

95 

braun 






150 


hellrot 






151 

97 

grau 

1 






152 

98 

grau 

2 






153 

99 

hei 1 grün 






154 

9A 

heilblau 






ISS 

9B 

grau 

3 






156 

9C 

lila 






157 

9D 

Cursor left 





158 

9E 

gelb 







159 

9F 

cyan 







160 

AB 



96 

60 




161 

Al 

1 

1 

97 

61 




162 

A2 

■ 


98 

62 




163 

A3 

— 

- 

99 

63 




164 

A4 



100 

64 




165 

A5 

1 

1 

101 

65 




1 66 

A6 

m 

üi 

102 

66 




167 

A7 

l 

1 

103 

67 




168 

AB 

«M 

•» 

104 

68 




169 

A9 

r 

* 

105 

69 




170 

AA 

1 

i 

106 

6A 




171 

AB 


h 

107 

6B 




172 

AC 

• 

. 

100 

6C 




173 

AD 

»• 

L 

109 

6D 




174 

AE 



110 

6E 




175 

AF 

_ 


ui 

6F 




176 

B0 

r 

r 

112 

70 




177 

Bl 

-i. 


113 

71 




17B 

B2 

T 

*r 

1 14 

72 




179 

83 

4 

4 

115 

73 




180 

84 

1 

1 

1 16 

74 




181 

B5 

1 

1 

117 

75 




182 

B6 

1 

i 

118 

76 




183 

B7 

” 

“ 

119 

77 




184 

B8 

“ 

- 

120 

78 




185 

B9 

- 

mm 

121 

79 




186 

BA 

J 


122 

7A 




187 

BB 

■ 

■ 

123 

7B 




188 

BC 

■ 

• 

124 

7C 




189 

BD 

J 

-J 

125 

7D 




190 

BE 

“ 

• 

126 

7E 




191 

BF 


*■ 

127 

7F 




192 

C0 

— 


64 

40 




193 

CI 

* 

A 

65 

41 




194 

C2 

1 

B 

66 

42 




195 

C3 

~ 

C 

67 

43 




196 

C4 


D 

68 

44 




Tabelle 1. Die Codes des C64 
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Tabellen 


C 64 


w 

ärt 

CHR$-Zelchen 

Bildschirmcode 


Tastencode 



Groß/ 

Klein/ 



ASCII- 



dez 

hex 

Grafik 

GroD 

dez 

hex 

Code 

dez 

hex 

197 

C5 

- 

E 

69 

45 




198 

C6 

- ' 

F 

70 

46 




199 

C7 

1 

G 

71 

47 




200 

CB 

1 

H 

72 

40 




201 

C9 


i 

73 

49 




202 

CA 

V 

J 

74 

4A 




203 

CB 

J 

K 

75 

4B 




204 

cc 

L 

L 

76 

4C 




205 

CD 

X 

M 

77 

4D 




206 

te 

/ 

N 

7B 

4E 




207 

CF 

r 

0 

7V 

4F 




208 

D0 


P 

U0 

50 




209 

Dl 

• 

0 

81 

51 




210 

D2 

_ 

R 

B2 

52 




211 

-B3- 

* 

5- 

83 

53 




212 

D4 

1 

T 

B4 

54 




213 

D5 

/ 

U 

05 

55 




214 

D6 

X 

V 

86 

56 




213 

D7 

0 

w 

07 

57 




216 

DB 

4* 

X 

08 

58 




217 

D9 

1 

Y 

89 

59 




218 

DA 

♦ 

Z 

90 

5A 




219 

DB 

4 

4 

91 

5B 




220 

DC 

1 

K 

92 

sc 




221 

DD 

1 

1 

93 

5D 




222 

DE 

fr 


94 

5E 




223 

DF 

*« 

» 

95 

5F 




224 

E0 



96 

60 




225 

El 

1 

i 

97 

61 




226 

" E2 

■ 

m 

98 

62 




227 

E3 

~ 


99 

63 




228 

E4 


— 

100 

64 




229 

E5 

1 

1 

101 

65 




230 

E6 


» 

102 

66 




231 

fc/ 

i 

1 

103 

67 




232 

EB 

Mw 

«r 

104 

68 




233 

E9 

r 

% 

105 

69 




234 

EA 

1 

1 

106 

6A 




235 

EB 

I- 

I- 

107 

6B 




236 

EC 

■ 

■ 

108 

6C 




237 

ED 

L 

L 

109 

6D 




238 

EE 

T 


110 

6E 




239 

EF 


— 

111 

6F 




240 

F0 

r 

r 

112 

70 




241 

Fl 

L 


113 

71 




242 

F2 

-T 

T 

114 

72 


G4gf 

) Of 

243 

F3 

4 

H 

115 

73 




244 

F4 

1 

1 

1 16 

74 




245 

F5 

1 

I 

117 

75 




246 

F6 

i 

• 

118 

76 




247 

F7 



119 

77 




248 

FB 

“ 

“ 

120 

78 




249 

F9 

_ 


121 

79 




250 

FA 

J 

* 

122 

7A 




251 

FB 

■ 

■ 

123 

- 7B 




252 

FC 

• 

■ 

124 

7C 




253 

FD 

j 

j 

125 

7D 




254 

FE 

- 

■ 

126 

7E 




255 

FF 

tr 

X 

94 

5E 




Tabelle 1. Die Codes des C 64 (Schluß) 


Befehlsüber¬ 
sicht - Zusam¬ 
menfassung 

Kennen Sie die Programme Hypra-Ass, 
Reassembler und SMON? Wenn ja, dann 
wird Ihnen die Befehlsübersicht bei der 
Arbeit mit diesen Programmen sehr hilf¬ 
reich sein. 

S elbst für den eingefleischten Profi ist es fast unmöglich 
alle Befehle von Hypra-Ass, Reassembler und SMON 
zu jederzeit parat zu haben. Um aber diese Programme 
optimal zu nutzen, ist die Kenntnis aller Befehle und deren 
Wirkungsweise sehr wichtig. Die nun folgende Befehlsüber¬ 
sicht soll Ihnen das ewige Nachschlagen ersparen. Natürlich 
kann es sich bei einer Übersicht nicht um eine ausführliche 
Anleitung handeln. Bei Verständnisschwierigkeiten finden 
Sie nähere Informationen an den entsprechenden Stellen in 
den Artikeln. (ak) 


Quickreferenz Reassembler 

p arissse 

Einsprungspunkt durch Label markieren. 

T adresse, adresse 

Tabelle definieren. 

E (byte) 

Startet den Reassembler. Die einzelnen Bits des 
Bytes haben folgende Bedeutung: 

Bit 0 gesetzt 

Alle Zeropage-Adressen durch ein Label mit drei 
Buchstaben markieren. 

Bit 1 gesetzt 

Nach RTS, RTI, BRK, JMP Kommentarzeile ein- 
fügen. 

Bit 2 gesetzt 

Bei unmittelbarer Adressierung ASCII-Zeichen 
ausgeben. 

Bit 3 gesetzt 

Zwischen jede zweite Tabellenzeile Kommentar¬ 
zeile einfügen. 

Bit 4 gesetzt 

Der ASCII-Ausdruck wird bei Tabellen unter¬ 
drückt. 

Bit 5 gesetzt 

Externe- und Tabellenlabel kennzeichnen. 

Bit 6 gonotzt 

Naoh Taboilon suchen 

Bit 7 gesetzt 

Speicherbereiche unter dem RAM 
reassemblieren. 


Quickreferenz Hypra-Ass 

Editorbefehle von Hypra-Ass 

/A 100, 10 

Automatische Zeilennumerierung. (Startzelle, 
Schrittweite) 

10 

RENEW eines Quelltextes. 

ID 100-200 

Löschen von Zellen und Zeilenbereichen. 

/ E 100-200 

Listen von Zellen und Zeilenbereichen. 

TO,13;T1,24;T2,0;T3,10 


Setzen von Tabulatoren. 

TO = Tabulator für Assemblerbefehle. 

T1 = Tabulator für den Kommentar. 

T2 = Anzahl Blanks am Anfang einer Ausgabe- 


zeile. 


T3 = Tabulator für Symboltabelle. 

/X 

Verlassen des Assemblers. 

/PI,100,200 

Setzen eines Arbeitsbereichs (Page). 

/Ziffer (n) 

Formatiertes Listen der Page. 

/NI,100,10 

Neu durchnumerieren einer Page mit Start¬ 
nummer und Schrittweite. 
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C 64 


Tabellen 


Quickreferenz Hypra-Ass 

Editorbefehle von Hypra-Ass 

/Fl, "string" Suchen einer Zeichenkette in einer Page. 

/RI," string 1 ",'string2" 

String 2 wird innerhalb einer Page durch 
String 1 ersetzt. 

/U 9000 Setzen des Quelltextstartes. 

/B Anzeige der aktuellen Speicherkonfiguration. 

/S" name" ;/L" name " ;/V " name" ;/M" name " 

Kurzform der Befehle SAVE, LOAD, VERIFY, 
MERGE. 

/G9 Gerateadresse des Floppy-Laufwerks auf 9 

umstellen. 

/I Lesen des Inhaltsverzeichnisses. 

/K Lesen des Fehlerkanals. 

I® Übermittlung von Diskettenbefehlen. 

/CHO Setzen der Hintergrundfarbe. 

/CRO Setzen der Rahmenfarbe. 

/I Ausgabe der Symboltabelle (unsortiert), 

/!! Ausgabe der Symboltabelle (sortiert). 

Pseudo-Opcodes von Hypra-Ass 

BA ndresoo Definiert Startadresse des Maschinen¬ 

programms. 

EQ label = wert Weist einem Label einen Wert zu. 

.GL label = wert Weist einem globalen Label einen Wert zu. 

.BY 1,2, "a" Einfügen von Byte-Werten in den Quelltext. 


WO 1234,label Einfügen von Adressen in den Quelltext. 

,TX "text" Einfügen von Textblöcken in den Quelltext. 

.AP "file" Verketten von Quelltexten. 

.OB "file.p.w" Senden des Objektcodes zur Floppy. 

.EN Schließen des Objektfiles. 

.ON ausdruck,Sprung Bedingter Sprung, wenn Ausdruck wahr. 

,GO sprung Unbedingter Sprung. 

IF ausdruck Fortführung der Assemblierung bei .EL, falls 

Ausdruck falsch. Ansonsten hinter IF bis zu 
.EL oder .El. 

.EL ELSE Alternative zu den Zeilen, die hinter .IF 

stehen. 

.El Ende der IF-Konstruktion. 

.CO var1,var2 Übergabe von Labein und Quelltext an nachge¬ 

ladene Telle. 

.MA makro (par1,par2) 

Makrodefinitionszeile. 

.RT Ende der Makrodefinition. 

...makro (pari,par2) Makroaufruf. 

.LI Ifn.dn.ba Senden von formatierten Listlnas (entspricht 

OPEN-Befehl). 

.SY lfn,dn,ba Senden der formatierten Symboltabelle. 

.ST Beendet die Assemblierung. 

DP tO.tl,t2,t3 Setzt die Tabulatoren aus dem Quelltext 
heraus. 


Quickreferenz SMON. Die Klammern dürfen nicht mit eingegeben werden. Die Werte in den Klammern 


können, aber müssen nicht eingegeben werden. 

A 4000 

Zeilenassembler Startadresse = $4000. 

X 

Monitor verlassen. 

B 4000 4200 

Erzeugt Basic-DATA-Zeilen im Bereich $4000 

# 49152 

Dezimal umrechnen 


bis $41 FF 

$ 002B 

Vierstellige Hex-Zahl umrechnen. 

C 4010 4200 4013 

6*€R 

% oiicc -10 

Achtstellige Binärzahl umrechnen. 

4000 4200 

Verschieben eines Programmes mit Adreß- 

? 0344 + 5234 

Addition oder Subtraktion zweier vierstelliger 


Umrechnung. Entspricht W- und V-Befehl. 


Hex-Zahlen. 

D 4000 (4100) 

Disassembliert den Bereich von $4000 bis 

= 4000 5000 

Vergleicht den Speicherinhalt von $4000 bis 


$4100 


$5000. 

F 

findet Zeichenketten (F), absolute Adressen 

Z 

Ruft den Diskettenmonitor auf (falls implemen- 


(FA), relative Sprünge (FR), Tabellen (FT), 


tiert). Dieser verfügt über folgende Befehle 


Zeropage-Adressen (FZ) und Immediate- 

R (12 01) 

Liest Track $12 Sektor $01. Fehlt die Angabe 


Befehle (Fl). 


hinter »R«, wird der logisch nächste Sektor 

GO 4000 

Startet Maschinenprogramm (ab $4000) 


gelesen. 

10 1 

Ein-/Ausgabegerät auf Datasette umstellen 

W (12 01) 

Schreibt Track $12 Sektor $01 auf Diskette. 

K A000 (A100) 

Im angegebenen Bereich nach ASCII-Zeichen 


Fehlt die Angabe hinter »W«, werden die letz- 


suchen. 


ten Angaben von »R« benutzt. 

L"name" (4000) 

Laden eines Programmes an die richtige (oder 

M 

Zeigt den Pufferinhalt als Hex-Dump. 


angegebene) Adresse 

X 

Rücksprung zum Monitor. 

M 4000 (4100) 

Gibt den Inhalt des angegebenen Speicherbe- 

F 

Weitere Diskettenbefehle initialisieren (falls 


reichs als Hex-Byte und ASCII-Zeichen aus. 


implementiert). Sind die Befehle initialisiert, 

0 4000 4100 12 

Füllt den angegebenen Bereich mit $12. 


stehen folgende Befehle zur Verfügung. 

PO 5 

Setzt Drucker-Geräteadresse auf 5 

M (07) 

Memory-Dump (Floppy-RAM/ROM) ausgeben. 

R 

Registerinhalte anzelgen 

V 6000 0400 

Verschiebt einen 256-Byte-Block von $6000 

S"name" 4000 4500 


ins Floppy-RAM nach $400. 


Speichert ein Programm von $4000 bis 

@ 

Normale Diskettenbefehle senden 


$4 FFF. 

X 

Zurück In normalen Diskettenmonitor. 

TW (4000) 

Einzelschrittmodus. Mit »J« können Unterpro- 

Ist die Erweiterung »Neues vom SMON« implementiert, stehen 


gramme in Echtzeit ausgeführt werden. 

folgende Befehle zur Verfügung: 

TB 4010 (05) 

Breakpoint setzen (nach dem 5. Durchlauf) 

Z 4000 (4100) 

Gibt den Speicherinhalt von $4000 bis $40FF 

TQ 4000 

Schnellschrittmodus. Springt beim Erreichen 


binär aus (ein Byte pro Zeile). 


eines Breakpoints In die Registeranzeige. 

H 4000 (4100) 

Gibt den Speicherbereich von $4000 bis 

TS 4000 4020 

Arbeitet ein Programm ab $4000 In Echtzeit 


$40FF binär aus (drei Byte pro Zelle). 


ab und springt beim Erreichen von $4020 In 

N 4000 (4100) 

Gibt den Speicherinhalt von $4000 bis $40FF 


die Registeranzeige. 


im Bildschirmcode aus (32 Zeichen pro Zeile). 

V 6000 6200 4000 4100 4200 

U 4000 (4100) 

Wie »N« aber 40 Zeichen pro Zeile. Änderun- 


Ändert alle absoluten Adressen $4000 bis 


gen sind nicht möglich. 


$41FF, die sich auf den Bereich $6000 bis 

E 4000 (4100) 

Füllt den Speicherbereich von $4000 bis 


$6200 beziehen, auf den neuen Bereich 


$40FF mit $00. 


$4000. 

Y 40 

Verschiebt den SMON nach $4000. 

W 4000 4300 5000 Verschiebt den Speicherinhalt von $4000 bis 

Q 2000 

Kopiert den Zeichensatz nach $2000. 


$42FF nach $5000. 

J 

Bringt letzten Ausgabebefehl zurück. 
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